<%@LANGUAGE="VBSCRIPT"%> <% Dim rsSalesMicro__MMColParam rsSalesMicro__MMColParam = "1" if (Request.QueryString("ident") <> "") then rsSalesMicro__MMColParam = Request.QueryString("ident") %> <% set rsSalesMicro = Server.CreateObject("ADODB.Recordset") rsSalesMicro.ActiveConnection = MM_yelloav_STRING rsSalesMicro.Source = "SELECT id, ident, model, brand, description, daily, week, rrp FROM products WHERE ident LIKE '%" + Replace(rsSalesMicro__MMColParam, "'", "''") + "%' ORDER BY id DESC" rsSalesMicro.CursorType = 0 rsSalesMicro.CursorLocation = 2 rsSalesMicro.LockType = 3 rsSalesMicro.Open() rsSalesMicro_numRows = 0 %> <% Dim rsCopy__MMColParam rsCopy__MMColParam = "1" if (Request.QueryString("ident") <> "") then rsCopy__MMColParam = Request.QueryString("ident") %> <% set rsCopy = Server.CreateObject("ADODB.Recordset") rsCopy.ActiveConnection = MM_yelloav_STRING rsCopy.Source = "SELECT ident, copy FROM copy WHERE ident = '" + Replace(rsCopy__MMColParam, "'", "''") + "'" rsCopy.CursorType = 0 rsCopy.CursorLocation = 2 rsCopy.LockType = 3 rsCopy.Open() rsCopy_numRows = 0 %> <% Dim Repeat1__numRows Repeat1__numRows = -1 Dim Repeat1__index Repeat1__index = 0 rsSalesMicro_numRows = rsSalesMicro_numRows + Repeat1__numRows %> Yello AV - Audio Visual Specialists - Projector Hire, Sales and Service
Home Sales Hire Installation About Us Contact Us

 

 

SALES / <%= Request.QueryString("ident") %>

<%=(rsCopy.Fields.Item("copy").Value)%>

<% While ((Repeat1__numRows <> 0) AND (NOT rsSalesMicro.EOF)) %>
 <%=(rsSalesMicro.Fields.Item("brand").Value)%> <%=(rsSalesMicro.Fields.Item("model").Value)%>  
 
 Description

<%=(rsSalesMicro.Fields.Item("description").Value)%>
R.R.P. -  <%= FormatCurrency((rsSalesMicro.Fields.Item("rrp").Value), 2) %>
Daily Hire Rate -  <%= FormatCurrency((rsSalesMicro.Fields.Item("daily").Value), 2)%>
Weekly Hire Rate -  <%= FormatCurrency((rsSalesMicro.Fields.Item("week").Value), 2)%>
  &ident=<%= Request.QueryString("ident")%>" class="boldOrNav">More info | &model=<%=(rsSalesMicro.Fields.Item("model").Value)%>&brand=<%=(rsSalesMicro.Fields.Item("brand").Value)%>&inq=demo" class="boldOrNav">Free Demo | &brand=<%=(rsSalesMicro.Fields.Item("brand").Value)%>&id=<%=(rsSalesMicro.Fields.Item("id").Value)%>" class="boldOrNav">Hire Inquiry
   
<% Repeat1__index=Repeat1__index+1 Repeat1__numRows=Repeat1__numRows-1 rsSalesMicro.MoveNext() Wend %>

 
 
 
Projectors Large display screens Projection Screens Installations
Micro
Portable
Large Venue
Home Theatre		 Plasma Screens
 Projector Screens Meeting rooms
DVD
Lecterns
Wireless Mics
.jpg">

 

   

 

 

 

  
<% rsSalesMicro.Close() %> <% rsCopy.Close() %>