L.F. George, Inc. - Used Equipment

<% response.buffer=true Response.ExpiresAbsolute = Now() - 1 Response.AddHeader "Cache-Control", "private" %> L.F. George, Inc. - Used Equipment <% form_Machine_Type=request.querystring("type") ' mySQL="select * from tblEquip where Machine_Type ='" & form_Machine_Type & "' ORDER BY Priority" mySQL="select * from tblEquip where Machine_Type ='" & form_Machine_Type & "' ORDER BY Manufacturer, Model, Title" scriptresponder="equipment/equipdsp.asp" set conn=server.createobject("adodb.connection") conn.open myDSN set rs=server.createobject("adodb.recordset") rs.open mySQL, conn howmanyfields=rs.fields.count -1 %>

<% ' Now lets grab all the records do while not rs.eof %> <% rs.movenext loop rs.close set rs=nothing conn.close set conn=nothing %>

<%=form_Machine_Type%>
Photo	Make/Model	Description	Price
<% if InStr(Ucase(rs("Image1")),".JPG") <> 0 then %> ">" border="1" width="50" height="38"> <% else %> <% end if %>	"> <%=rs("Manufacturer")%> <%=rs("Model")%>	<%=rs("Addl_Description")%>	<% if rs("Price")=0 then %> Call <% end if %> <% if rs("Price")>0 then %><%=Server.HTMLEncode(formatcurrency(rs("Price")))%><% end if %>