%@LANGUAGE="VBSCRIPT"%> <% Dim rsSipers Dim rsSipers_numRows Set rsSipers = Server.CreateObject("ADODB.Recordset") rsSipers.ActiveConnection = MM_Zipdata_STRING rsSipers.Source = "SELECT * FROM Dealers" rsSipers.CursorType = 0 rsSipers.CursorLocation = 2 rsSipers.LockType = 1 rsSipers.Open() rsSipers_numRows = 0 %>
| |
|
||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||