<% 'This is where we get data to build the table 'We are going to use our already established connection. if Request.Form("chkFootballCollegeFull") <> "" then sLength = "Game" sLeague = "College" sTableSwitch = "Final" sCaption = "College Football [Full Game]" Set oRS = Server.CreateObject("ADODB.Recordset") oRS.CursorType = 3 oRS.CursorLocation = 3 oRS.Open "Exec AvailableFootballLinesFull College", oConn %> <% Do while not oRS.EOF 'response.write ("Recordcount :") & oRS.recordcount %> <% 'This is where we get data to build the table 'We are going to use our already established connection. if Request.Form("chkFootballCollegeHalf") <> "" then sLength = "1stHalf" sLeague = "College" sTableSwitch = "1stHalfTime" sCaption = "College Football [1st Half Time]" Set oRS = Server.CreateObject("ADODB.Recordset") oRS.CursorType = 3 oRS.CursorLocation = 3 oRS.Open "Exec AvailableFootballLines1stHalf College", oConn %> <% Do while not oRS.EOF 'response.write ("Recordcount :") & oRS.recordcount %> <% 'This is where we get data to build the table 'We are going to use our already established connection. if Request.Form("chkFootballCollegeHalf") <> "" then sLength = "2ndHalf" sLeague = "College" sTableSwitch = "2ndHalfTime" sCaption = "College Football [2nd Half Time]" Set oRS = Server.CreateObject("ADODB.Recordset") oRS.CursorType = 3 oRS.CursorLocation = 3 oRS.Open "Exec AvailableFootballLines2ndHalf College", oConn %> <% Do while not oRS.EOF 'response.write ("Recordcount :") & oRS.recordcount %> <% 'This is where we get data to build the table 'We are going to use our already established connection. if Request.Form("chkFootballCollegeQuarter") <> "" then sLength = "1stQtr" sLeague = "College" sTableSwitch = "1st" sCaption = "College Football [1st Quarter]" Set oRS = Server.CreateObject("ADODB.Recordset") oRS.CursorType = 3 oRS.CursorLocation = 3 oRS.Open "Exec AvailableFootballLines1stQuarter College", oConn %> <% Do while not oRS.EOF 'response.write ("Recordcount :") & oRS.recordcount %> <% 'This is where we get data to build the table 'We are going to use our already established connection. if Request.Form("chkFootballCollegeQuarter") <> "" then sLength = "2ndQtr" sLeague = "College" sTableSwitch = "2nd" sCaption = "College Football [2nd Quarter]" Set oRS = Server.CreateObject("ADODB.Recordset") oRS.CursorType = 3 oRS.CursorLocation = 3 oRS.Open "Exec AvailableFootballLines2ndQuarter College", oConn %> <% Do while not oRS.EOF 'response.write ("Recordcount :") & oRS.recordcount %> <% 'This is where we get data to build the table 'We are going to use our already established connection. if Request.Form("chkFootballCollegeQuarter") <> "" then sLength = "3rdQtr" sLeague = "College" sTableSwitch = "3rd" sCaption = "College Football [3nd Quarter]" Set oRS = Server.CreateObject("ADODB.Recordset") oRS.CursorType = 3 oRS.CursorLocation = 3 oRS.Open "Exec AvailableFootballLines3rdQuarter College", oConn %> <% Do while not oRS.EOF 'response.write ("Recordcount :") & oRS.recordcount %> <% 'This is where we get data to build the table 'We are going to use our already established connection. if Request.Form("chkFootballCollegeQuarter") <> "" then sLength = "4thQtr" sLeague = "College" sTableSwitch = "4th" sCaption = "College Football [4th Quarter]" Set oRS = Server.CreateObject("ADODB.Recordset") oRS.CursorType = 3 oRS.CursorLocation = 3 oRS.Open "Exec AvailableFootballLines4thQuarter College", oConn %> <% Set oRS = Server.CreateObject("ADODB.Recordset") oRS.CursorType = 3 oRS.CursorLocation = 3 oRS.Open "Exec AvailableFootballLines4thQuarter College", oConn Do while not oRS.EOF 'response.write ("Recordcount :") & oRS.recordcount %>