%@LANGUAGE="VBSCRIPT"%> <% set rsKarachi = Server.CreateObject("ADODB.Recordset") rsKarachi.ActiveConnection = MM_connTradeway_STRING rsKarachi.Source = "SELECT * FROM karachi ORDER BY sails ASC" rsKarachi.CursorType = 0 rsKarachi.CursorLocation = 2 rsKarachi.LockType = 3 rsKarachi.Open() rsKarachi_numRows = 0 %> <% Dim Repeat1__numRows Repeat1__numRows = -1 Dim Repeat1__index Repeat1__index = 0 rsKarachi_numRows = rsKarachi_numRows + Repeat1__numRows %>
|
||||||||||||
|
<% rsKarachi.Close() %>