<% Dim objConn Dim objRst Dim strSQL Dim ctr ctr = 1 Set objConn = Server.CreateObject("ADODB.Connection") Set objRst = Server.CreateObject("ADODB.Recordset") strSQL = "SELECT * FROM bugsfe2" objRst.Open strSQL, Session( "ADO_CONNECT_STRING" ), 1 %>

The Frontier: Elite 2 (FE2) Bug List

For full information on any issue, click the item and you will be taken to the appropriate section. 

    <% ' Now lets grab all the records do while not objRst.eof %>
  1. <%=objRst(15)%>
    2. <% ctr=ctr+1 objRst.movenext loop %>

<% objRst.Close Set objRst = Nothing Set objConn = Nothing %>