<%@ Language=VBScript %> <% Dim cn, rs, thisPage thisPage = 1 set cn=server.createobject("adodb.connection") cn.Open "LifesWorkServices" set rs=cn.execute("select * from Sheet1 ORDER BY Id") 'set rsG = server.CreateObject("ADODB.recordset") 'rsG.Open "select * from GameDays", cn, adOpenKeyset, adlockoptimistic %> <% do while not rs.eof %> <%=rs("Name")%>
"> "> ">

<%=rs("Notes")%> <% rs.movenext loop %> View Cart: