Index
of Products
Click
on the arrow to the right of a category to view a listing.
Select your listing choice and click "Go" to view our
products.
<% Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open ("driver={Microsoft Access Driver (*.mdb)};DBQ=d:\html\users\sruinccom\database\sru.mdb") %>
<%sql="SELECT * FROM product_categories ORDER BY category_name"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn, 3, 3
On Error Resume Next
Rs.MoveFirst
DO WHILE NOT rs.eof%>
<%rs.movenext
loop
rs.close
conn.close%>
|