Count Lines in Pages

Contents of Page: biggestloserpick.asp Number of Lines: 299 Last Modified: 8/22/2018 1:32:33 PM
0001: <% @Language = "VBScript" %>
0002: <!-- #include FILE="include/adovbs.inc" -->
0003: <!-- #include FILE="include/constants.inc" -->
0004: <!-- #include FILE="include/funcs.asp" -->
0005: <%
0006:   	Demo = Request.QueryString("Demo")
0007: 
0008: 	yr = Request.QueryString("yr")
0009: 	If yr = "" Then yr = season
0010: 	If Demo <> "YES" Then	  
0011: 	If noMorePicks <> False Then
0012: 	Response.Redirect("biggestloserpick.asp?yr=2010&Demo=YES")
0013: 	End If
0014: '	Response.Write("noMorePicks=" & noMorePicks & "=")
0015: 	user = Request.Cookies("user")
0016: '	If user = ""  Or (user <> "" And Session("loggedIn") = "") Then Response.Redirect("login.asp?from=biggestloserpick.asp")
0017: 	If user = ""  Then Response.Redirect("login.asp?from=biggestloserpick.asp")
0018: 
0019: 
0020: 	Set rsEntry = Server.CreateObject("ADODB.Recordset")
0021: 	sqlString = "SELECT Name, FirstName, RegNumber FROM mmEntries " & _
0022: 			"WHERE Season = " & yr & " "  & _
0023: 			"AND EmailAddress = '" & user & "' "  
0024: 	rsEntry.Open sqlString, conn, adOpenStatic, adLockReadOnly, adCmdText
0025: 	lastName = rsEntry("Name").Value
0026: 	firstName = rsEntry("FirstName").Value
0027: 	RegNumber = rsEntry("RegNumber").Value	
0028: 	rsEntry.Close
0029: 	Set rsEntry = Nothing
0030: 
0031: 	 Response.Write("<b>Hi there, " & FirstName & "</b>")
0032: 
0033:     Else
0034: 
0035: 	yr = season - 1
0036: 
0037: 	End If
0038: 
0039: 	
0040:   		Set rsg = Server.CreateObject("ADODB.Recordset")
0041: 		sqlString = "SELECT * FROM mmBiggestLoser " & _
0042: 			"WHERE RegNumber = '" & RegNumber & "' " & _
0043: 			"AND Season = " & yr
0044: 
0045: '	rsg.Open sqlString, conn, adOpenDynamic, adLockOptimistic, adCmdText
0046: 		rsg.Open sqlString, conn, adOpenStatic, adLockReadOnly, adCmdText	  
0047: 
0048: 
0049:     	
0050: 	If rsg.EOF Then
0051: 	'
0052: 	Else
0053: 	Response.Redirect("biggestloserdisplay.asp?RegNumber=" & RegNumber & "&Repost=Y")
0054: 	End If
0055: 
0056: 		lineColor = "#cccccc"
0057: 
0058: 	Dim Regions(4)
0059: 	
0060: 	Set rsRegion = Server.CreateObject("ADODB.Recordset")
0061: 	sqlString = "SELECT * FROM mmRegionals " & _
0062: 			"WHERE Season = " & yr & " " & _
0063: 			"ORDER By Region"
0064: '			"AND Region = " & region
0065: 	rsRegion.Open sqlString, conn, adOpenStatic, adLockReadOnly, adCmdText
0066: 	If Not rsRegion.EOF Then
0067: 	RGCount = 0
0068: 	Do Until rsRegion.EOF
0069: 		RGCount = RGCount + 1
0070: 		Regions(RGCount) = rsRegion("RegionName").Value
0071: 		rsRegion.MoveNext
0072: 	Loop
0073: 	rsRegion.Close
0074: 	Set rsRegion = Nothing
0075: 
0076: 	End If
0077: 
0078: %>
0079: <html>
0080: 
0081: <head>
0082: <meta http-equiv="Content-Language" content="en-us">
0083: <meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
0084: <link href="mm.css" rel="stylesheet" type="text/css">
0085: <title>March Madness - Which seed will have the &quot;early exit&quot;?</title>
0086: </head>
0087: <%	
0088: 
0089: 	Set rst = Server.CreateObject("ADODB.Recordset")
0090: 	sqlString = "SELECT * FROM mmTeams WHERE Season = " & yr
0091: 	rst.Open sqlString, conn, adOpenStatic, adLockReadOnly, adCmdText
0092: 
0093: 
0094: If noMorePicks and user <> "jt@folga.org" And Demo <> "YES" Then 	%>
0095: 
0096: 
0097: 
0098: 
0099: <body>
0100: 
0101: <p>Games Have Started. Selections may NOT be Changed. 
0102: 
0103: <%	Else	%> </p>
0104: 
0105: <form method="POST" action="biggestloserpost.asp?yr=<%= yr %>&Demo=<%= Demo %>">
0106: <input type="hidden" name="RegNumber" value="<%= RegNumber %>">
0107: <table border="0" cellpadding="0" width="850">
0108:     <tr>
0109:       <td></td>
0110:       <td align="center"><font face="Arial">
0111:       Select the worst 16 teams (one for each seed) in the field of this year's NCAA tournament.<br>
0112: <% 	If Demo = "YES" Then %>	
0113: <br><small><b><i>(This is sample using the <%= yr %> tournament teams)</b><i><br></small>
0114: <% End If %>
0115: 	  <br>
0116: 	  </td>
0117:     </tr>
0118: </table>
0119: <table border="0" cellpadding="0" width="850">
0120:     <tr>
0121: 		<td width="5%" align="right"></td>
0122: 		<td width="20%"  class="bigblue"><big><i><%= Regions(1) %></big></i></td>
0123: 		<td width="5%" align="right"></td>
0124: 		<td width="20%"  class="bigblue"><big><i> <%=  Regions(2) %></big></i></td>
0125: 		<td width="5%" align="right"></td>
0126: 		<td width="20%"  class="bigblue"><big><i><%=  Regions(3) %></big></i></td>
0127: 		<td width="5%" align="right"></td>
0128: 		<td width="20%"  class="bigblue"><big><i><%=  Regions(4) %></big></i></td>
0129:     </tr>
0130:     <tr>
0131:       <td  align="right" class="medium">#1</td>
0132:       <td   class="medium"><input type="radio" name="Seed1" value="A01" checked> <%= rst("A01").Value %></td>
0133:       <td align="right" class="medium">#1</td>
0134:       <td   class="medium"><input type="radio" name="Seed1" value="B01"> <%= rst("B01").Value %></td>
0135:       <td align="right" class="medium">#1</td>
0136:       <td   class="medium"><input type="radio" name="Seed1" value="C01"> <%= rst("C01").Value %></td>
0137:       <td align="right" class="medium">#1</td>
0138:       <td   class="medium"><input type="radio" name="Seed1" value="D01"> <%= rst("D01").Value %></td>
0139:     </tr>
0140:     <tr>
0141:       <td align="right" class="medium">#2</td>
0142:       <td class="medium"><input type="radio" name="Seed2" value="A02" checked> <%= rst("A02").Value %></td>
0143:       <td align="right" class="medium">#2</td>
0144:       <td class="medium"><input type="radio" name="Seed2" value="B02"> <%= rst("B02").Value %></td>
0145:       <td align="right" class="medium">#2</td>
0146: 	  <td class="medium"><input type="radio" name="Seed2" value="C02"> <%= rst("C02").Value %></td>
0147:       <td align="right" class="medium">#2</td>
0148: 	  <td class="medium"><input type="radio" name="Seed2" value="D02"> <%= rst("D02").Value %></td>
0149:     </tr>
0150:     <tr>
0151:       <td  align="right" class="medium">#3</td>
0152:       <td  class="medium"><input type="radio" name="Seed3" value="A03" checked> <%= rst("A03").Value %></td>
0153:       <td  align="right" class="medium">#3</td>
0154:       <td  class="medium"><input type="radio" name="Seed3" value="B03"> <%= rst("B03").Value %></td>
0155:       <td  align="right" class="medium">#3</td>
0156:       <td  class="medium"><input type="radio" name="Seed3" value="C03"> <%= rst("C03").Value %></td>
0157:       <td  align="right" class="medium">#3</td>
0158:       <td  class="medium"><input type="radio" name="Seed3" value="D03"> <%= rst("D03").Value %></td>
0159:     </tr>
0160:     <tr>
0161:       <td  align="right" class="medium">#4</td>
0162:       <td  class="medium"><input type="radio" name="Seed4" value="A04" checked> <%= rst("A04").Value %></td>
0163:       <td  align="right" class="medium">#4</td>
0164:       <td  class="medium"><input type="radio" name="Seed4" value="B04"> <%= rst("B04").Value %></td>
0165:       <td  align="right" class="medium">#4</td>
0166:       <td  class="medium"><input type="radio" name="Seed4" value="C04"> <%= rst("C04").Value %></td>
0167:       <td  align="right" class="medium">#4</td>
0168:       <td  class="medium"><input type="radio" name="Seed4" value="D04"> <%= rst("D04").Value %></td>
0169:     </tr>
0170: 	<tr  height="2"><td height="2">&nbsp </td></tr>
0171:      <tr>
0172:       <td  align="right" class="medium">#5</td>
0173:       <td  class="medium"><input type="radio" name="Seed5" value="A05" checked> <%= rst("A05").Value %></td>
0174:       <td  align="right" class="medium">#5</td>
0175:       <td  class="medium"><input type="radio" name="Seed5" value="B05"> <%= rst("B05").Value %></td>
0176:       <td  align="right" class="medium">#5</td>
0177:       <td  class="medium"><input type="radio" name="Seed5" value="C05"> <%= rst("C05").Value %></td>
0178:       <td  align="right" class="medium">#5</td>
0179:       <td  class="medium"><input type="radio" name="Seed5" value="D05"> <%= rst("D05").Value %></td>
0180:     </tr>
0181:     <tr>
0182:       <td  align="right" class="medium">#6</td>
0183:       <td  class="medium"><input type="radio" name="Seed6" value="A06" checked> <%= rst("A06").Value %></td>
0184:       <td  align="right" class="medium">#6</td>
0185:       <td  class="medium"><input type="radio" name="Seed6" value="B06"> <%= rst("B06").Value %></td>
0186:       <td  align="right" class="medium">#6</td>
0187:       <td  class="medium"><input type="radio" name="Seed6" value="C06"> <%= rst("C06").Value %></td>
0188:       <td  align="right" class="medium">#6</td>
0189:       <td  class="medium"><input type="radio" name="Seed6" value="D06"> <%= rst("D06").Value %></td>
0190:     </tr>
0191:     <tr>
0192:       <td   class="medium"align="right">#7</td>
0193:       <td  class="medium"><input type="radio" name="Seed7" value="A07" checked> <%= rst("A07").Value %></td>
0194:       <td   class="medium"align="right">#7</td>
0195: 	  <td  class="medium"><input type="radio" name="Seed7" value="B07"> <%= rst("B07").Value %></td>
0196:       <td   class="medium"align="right">#7</td>
0197: 	  <td  class="medium"><input type="radio" name="Seed7" value="C07"> <%= rst("C07").Value %></td>
0198:       <td   class="medium"align="right">#7</td>
0199: 	  <td  class="medium"><input type="radio" name="Seed7" value="D07"> <%= rst("D07").Value %></td>
0200:     </tr>
0201:     <tr>
0202:       <td  align="right" class="medium">#8</td>
0203:       <td  class="medium"><input type="radio" name="Seed8" value="A08" checked> <%= rst("A08").Value %></td>
0204:       <td  align="right" class="medium">#8</td>
0205:       <td  class="medium"><input type="radio" name="Seed8" value="B08"> <%= rst("B08").Value %></td>
0206:       <td  align="right" class="medium">#8</td>
0207:       <td  class="medium"><input type="radio" name="Seed8" value="C08"> <%= rst("C08").Value %></td>
0208:       <td  align="right" class="medium">#8</td>
0209:       <td  class="medium"><input type="radio" name="Seed8" value="D08"> <%= rst("D08").Value %></td>
0210:     </tr>
0211: 	<tr><td>&nbsp </td></tr>
0212:     <tr>
0213:       <td   class="medium"align="right">#9</td>
0214:       <td  class="medium"><input type="radio" name="Seed9" value="A09" checked> <%= rst("A09").Value %></td>
0215:       <td   class="medium"align="right">#9</td>
0216:       <td  class="medium"><input type="radio" name="Seed9" value="B09"> <%= rst("B09").Value %></td>
0217:       <td   class="medium"align="right">#9</td>
0218:       <td  class="medium"><input type="radio" name="Seed9" value="C09"> <%= rst("C09").Value %></td>
0219:       <td   class="medium"align="right">#9</td>
0220:       <td  class="medium"><input type="radio" name="Seed9" value="D09"> <%= rst("D09").Value %></td>
0221:     </tr>
0222:     <tr>
0223:       <td  align="right" class="medium">#10</td>
0224:       <td  class="medium"><input type="radio" name="Seed10" value="A10" checked> <%= rst("A10").Value %></td>
0225:       <td  align="right" class="medium">#10</td>
0226:       <td  class="medium"><input type="radio" name="Seed10" value="B10"> <%= rst("B10").Value %></td>
0227:       <td  align="right" class="medium">#10</td>
0228:       <td  class="medium"><input type="radio" name="Seed10" value="C10"> <%= rst("C10").Value %></td>
0229:       <td  align="right" class="medium">#10</td>
0230:       <td  class="medium"><input type="radio" name="Seed10" value="D10"> <%= rst("D10").Value %></td>
0231:     </tr>
0232:     <tr>
0233:       <td   class="medium"align="right">#11</td>
0234:       <td  class="medium"><input type="radio" name="Seed11" value="A11" checked> <%= rst("A11").Value %></td>
0235:       <td   class="medium"align="right">#11</td>
0236:       <td  class="medium"><input type="radio" name="Seed11" value="B11"> <%= rst("B11").Value %></td>
0237:       <td   class="medium"align="right">#11</td>
0238:       <td  class="medium"><input type="radio" name="Seed11" value="C11"> <%= rst("C11").Value %></td>
0239:       <td   class="medium"align="right">#11</td>
0240:       <td  class="medium"><input type="radio" name="Seed11" value="D11"> <%= rst("D11").Value %></td>
0241:     </tr>
0242:     <tr>
0243:       <td  align="right" class="medium">#12</td>
0244:       <td  class="medium"><input type="radio" name="Seed12" value="A12" checked> <%= rst("A12").Value %></td>
0245:       <td  align="right" class="medium">#12</td>
0246:       <td  class="medium"><input type="radio" name="Seed12" value="B12"> <%= rst("B12").Value %></td>
0247:       <td  align="right" class="medium">#12</td>
0248:       <td  class="medium"><input type="radio" name="Seed12" value="C12"> <%= rst("C12").Value %></td>
0249:       <td  align="right" class="medium">#12</td>
0250:       <td  class="medium"><input type="radio" name="Seed12" value="D12"> <%= rst("D12").Value %></td>
0251:     </tr>
0252: 	<tr><td>&nbsp </td></tr>
0253:     <tr>
0254:       <td   class="medium"align="right">#13</td>
0255:       <td  class="medium"><input type="radio" name="Seed13" value="A13" checked> <%= rst("A13").Value %></td>
0256:       <td   class="medium"align="right">#13</td>
0257:       <td  class="medium"><input type="radio" name="Seed13" value="B13"> <%= rst("B13").Value %></td>
0258:       <td   class="medium"align="right">#13</td>
0259:       <td  class="medium"><input type="radio" name="Seed13" value="C13"> <%= rst("C13").Value %></td>
0260:       <td   class="medium"align="right">#13</td>
0261:       <td  class="medium"><input type="radio" name="Seed13" value="D13"> <%= rst("D13").Value %></td>
0262:     </tr>
0263:     <tr>
0264:       <td  align="right" class="medium">#14</td>
0265:       <td  class="medium"><input type="radio" name="Seed14" value="A14" checked> <%= rst("A14").Value %></td>
0266:       <td  align="right" class="medium">#14</td>
0267:       <td  class="medium"><input type="radio" name="Seed14" value="B14"> <%= rst("B14").Value %></td>
0268:       <td  align="right" class="medium">#14</td>
0269:       <td  class="medium"><input type="radio" name="Seed14" value="C14"> <%= rst("C14").Value %></td>
0270:       <td  align="right" class="medium">#14</td>
0271:       <td  class="medium"><input type="radio" name="Seed14" value="D14"> <%= rst("D14").Value %></td>
0272:     </tr>
0273:     <tr>
0274:       <td   class="medium"align="right">#15</td>
0275:       <td  class="medium"><input type="radio" name="Seed15" value="A15" checked> <%= rst("A15").Value %></td>
0276:       <td   class="medium"align="right">#15</td>
0277:       <td  class="medium"><input type="radio" name="Seed15" value="B15"> <%= rst("B15").Value %></td>
0278:       <td   class="medium"align="right">#15</td>
0279:       <td  class="medium"><input type="radio" name="Seed15" value="C15"> <%= rst("C15").Value %></td>
0280:       <td   class="medium"align="right">#15</td>
0281:       <td  class="medium"><input type="radio" name="Seed15" value="D15"> <%= rst("D15").Value %></td>
0282:     </tr>
0283:     <tr>
0284:       <td  align="right" class="medium">#16</td>
0285:       <td  class="medium"><input type="radio" name="Seed16" value="A16" checked> <%= rst("A16").Value %></td>
0286:       <td  align="right" class="medium">#16</td>
0287:       <td  class="medium"><input type="radio" name="Seed16" value="B16"> <%= rst("B16").Value %></td>
0288:       <td  align="right" class="medium">#16</td>
0289:       <td  class="medium"><input type="radio" name="Seed16" value="C16"> <%= rst("C16").Value %></td>
0290:       <td  align="right" class="medium">#16</td>
0291:       <td  class="medium"><input type="radio" name="Seed16" value="D16"> <%= rst("D16").Value %></td>
0292:     </tr>
0293: 	<tr><td>&nbsp </td></tr>
0294: 	<tr><td>&nbsp </td><td><input type="submit" value="Submit" name="B1"></td><td><input type="reset" value="Reset" name="B2"></td>
0295:   </table>
0296: </form>
0297: </body>
0298: <%	End If	%>
0299: </html>