<% Dim sql Response.buffer=True SQL = "select * from Product_cat ORDER BY ID DESC" strconn.Open SQL, Connect, 3,3 %>

Products
Click on the manufacturer's name to see the products

<% Do until strconn.EOF %> <% strconn.MoveNext Loop %>
">

Manufacturers


"><%Response.write (strconn("Cat_name")) %>