%@LANGUAGE="VBSCRIPT"%> <% Dim Repeat2__numRows Dim Repeat2__index Repeat2__numRows = -1 Repeat2__index = 0 city1_numRows = city1_numRows + Repeat2__numRows %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = -1 Repeat1__index = 0 city1_numRows = city1_numRows + Repeat1__numRows %>
|
<%
'response.Write(Server.MapPath)
set city1 = Server.CreateObject("ADODB.Recordset")
city1.ActiveConnection = MM_cnRetailers_STRING
city1.Source = "SELECT distinct City from BookRetailers order by City;"
city1.CursorType = 0
city1.CursorLocation = 2
city1.LockType = 3
city1.Open()
'retail1.filter = "Province = 'AB' and ProdTypeID = 3"
city1_numRows = 0
set retail1 = Server.CreateObject("ADODB.Recordset")
retail1.ActiveConnection = MM_cnRetailers_STRING
retail1.Source = "SELECT * from BookRetailers order by Retailer;"
retail1.CursorType = 0
retail1.CursorLocation = 2
retail1.LockType = 3
retail1.Open()
'retail1.filter = "Province = 'AB' and ProdTypeID = 3"
retail1_numRows = 0
%>
|
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||