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

Join Us


Curious? Come down and visit us at one of our upcoming events or meetings. Feel free to contact one of our club officers below with any questions you may have.

<% While ((Repeat1__numRows <> 0) AND (NOT officers.EOF)) %> "> <% Repeat1__index=Repeat1__index+1 Repeat1__numRows=Repeat1__numRows-1 officers.MoveNext() Wend %>
Name Position
<% if (officers.Fields.Item("MEmail").Value) <> "" then%>"><%=(officers.Fields.Item("MFName").Value)%> <%=(officers.Fields.Item("MLName").Value)%><% else %><%=(officers.Fields.Item("MFName").Value)%> <%=(officers.Fields.Item("MLName").Value)%><% end if%> <%=(officers.Fields.Item("MPosition").Value)%>

 

 

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