<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> [an error occurred while processing this directive] <% Dim resources Dim resources_numRows Set resources = Server.CreateObject("ADODB.Recordset") resources.ActiveConnection = MM_rcdb_STRING resources.Source = "SELECT * FROM Resources ORDER BY RName ASC" resources.CursorType = 0 resources.CursorLocation = 2 resources.LockType = 1 resources.Open() resources_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = -1 Repeat1__index = 0 resources_numRows = resources_numRows + Repeat1__numRows %> Tarheel R/C Resources
Home Members Events Forums Resources Contact/Join Us
 

Resources & Links


<% While ((Repeat1__numRows <> 0) AND (NOT resources.EOF)) %> "> <% Repeat1__index=Repeat1__index+1 Repeat1__numRows=Repeat1__numRows-1 resources.MoveNext() Wend %>
" target="_blank"><%=(resources.Fields.Item("RName").Value)%>

 

 

Members, check your email here.
<% resources.Close() Set resources = Nothing %>