%@LANGUAGE="VBSCRIPT"%> <% Dim wnew Dim wnew_numRows Set wnew = Server.CreateObject("ADODB.Recordset") wnew.ActiveConnection = MM_MedebizCorp_STRING wnew.Source = "SELECT * FROM wnew ORDER BY datefrom ASC" wnew.CursorType = 0 wnew.CursorLocation = 2 wnew.LockType = 1 wnew.Open() wnew_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = -1 Repeat1__index = 0 wnew_numRows = wnew_numRows + Repeat1__numRows %>
![]() |
|
||||||||||||||||||||||||||||||||||||
Contact Webmaster | Terms and Conditions | Sitemap | ©2003 Great Lakes Behavioral Research Institute. All Rights Reserved |