<%@LANGUAGE="VBSCRIPT"%> <% Dim rsLinks Dim rsLinks_numRows Set rsLinks = Server.CreateObject("ADODB.Recordset") rsLinks.ActiveConnection = MM_boa_STRING rsLinks.Source = "SELECT * FROM LINK ORDER BY title ASC" rsLinks.CursorType = 0 rsLinks.CursorLocation = 2 rsLinks.LockType = 1 rsLinks.Open() rsLinks_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = -1 Repeat1__index = 0 rsLinks_numRows = rsLinks_numRows + Repeat1__numRows %> BOA NSW - Links

Resource Centre

Useful Websites

Listed below are some links you may find useful:

<% rsLinks.Close() Set rsLinks = Nothing %>