%@LANGUAGE="VBSCRIPT"%> <% set rs_links = Server.CreateObject("ADODB.Recordset") rs_links.ActiveConnection = MM_cs_db_mjr_STRING rs_links.Source = "SELECT * FROM LINKS ORDER BY ID ASC" rs_links.CursorType = 0 rs_links.CursorLocation = 2 rs_links.LockType = 3 rs_links.Open() rs_links_numRows = 0 %> <% Dim Repeat1__numRows Repeat1__numRows = -1 Dim Repeat1__index Repeat1__index = 0 rs_links_numRows = rs_links_numRows + Repeat1__numRows %>
![]() |
|||||||
|
|
![]() |
|||||
|
<% If Not rs_links.EOF Or Not rs_links.BOF Then %>
Additional Links <% While ((Repeat1__numRows <> 0) AND (NOT rs_links.EOF)) %>
|
|||||||
|
|
|||||||