%@LANGUAGE="VBSCRIPT"%> <% set rsCategory = Server.CreateObject("ADODB.Recordset") rsCategory.ActiveConnection = MM_BinderyEquipmentConnection_STRING rsCategory.Source = "SELECT Distinct Category FROM listings WHERE Category <> '' ORDER BY Category" rsCategory.CursorType = 0 rsCategory.CursorLocation = 2 rsCategory.LockType = 3 rsCategory.Open() rsCategory_numRows = 0 %> <% set rsManufacturer = Server.CreateObject("ADODB.Recordset") rsManufacturer.ActiveConnection = MM_BinderyEquipmentConnection_STRING rsManufacturer.Source = "SELECT DISTINCT Manufacturer FROM listings WHERE Manufacturer <> '' ORDER BY Manufacturer" rsManufacturer.CursorType = 0 rsManufacturer.CursorLocation = 2 rsManufacturer.LockType = 3 rsManufacturer.Open() rsManufacturer_numRows = 0 %> <% set rsLocation = Server.CreateObject("ADODB.Recordset") rsLocation.ActiveConnection = MM_BinderyEquipmentConnection_STRING rsLocation.Source = "SELECT DISTINCT Name, Abreviation FROM state WHERE Name <> '' ORDER BY Name" rsLocation.CursorType = 0 rsLocation.CursorLocation = 2 rsLocation.LockType = 3 rsLocation.Open() rsLocation_numRows = 0 %>
|
Copyright © 2001 |