%@LANGUAGE="VBSCRIPT"%> <% Dim rsAdmin Dim rsAdmin_numRows Set rsAdmin = Server.CreateObject("ADODB.Recordset") rsAdmin.ActiveConnection = MM_cotec_STRING rsAdmin.Source = "SELECT * FROM signAdmin" rsAdmin.CursorType = 0 rsAdmin.CursorLocation = 2 rsAdmin.LockType = 1 rsAdmin.Open() rsAdmin_numRows = 0 %>
|
||||||||||||||||||