%@LANGUAGE="VBSCRIPT"%> <% Dim Gara Dim Gara_numRows Set Gara = Server.CreateObject("ADODB.Recordset") Gara.ActiveConnection = MM_GestPisteConn_STRING Gara.Source = "SELECT * FROM TblDesGara" Gara.CursorType = 0 Gara.CursorLocation = 2 Gara.LockType = 1 Gara.Open() Gara_numRows = 0 %>
|