Count Lines in Pages
Contents of Page: PrizesList.asp
Number of Lines: 155
Last Modified: 4/8/2026 8:08:12 AM
0001: <%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
0002: <!-- #include FILE="include/adovbs.inc" -->
0003: <!-- #include FILE="include/constants.inc" -->
0004: <!-- #include FILE="include/ReturnPageSet.inc" -->
0005: <%
0006: 	user = Request.Cookies("user")	
0007: 	If user = "" Then Response.Redirect("login.asp?from=editprizes.asp")
0008: 	
0009: 		
0010: %>
0011: <html>
0012: 
0013: <head>
0014: <title>March Madness Contest - Update Prize Values</title>
0015: <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
0016: <link href="mm.css" rel="stylesheet" type="text/css">
0017: 
0018: </head>
0019: 
0020: <body bgcolor="#FFFFFF" onLoad="document.node.M1.select()">
0021: 
0022: <%
0023: 
0024: Set rs = Server.CreateObject("ADODB.Recordset")
0025: 	sqlString = "SELECT * FROM mmPrizes ORDER BY Season DESC "
0026: 	rs.Open sqlString, conn, adOpenDynamic, adLockOptimistic, adCmdText
0027: 
0028: %>
0029: 
0030: <table cellspacing="1" border="0" cellpadding="0" width="850">
0031:  
0032: <tr><td class="normbold" colspan="2"><a href="editprizes.asp?ID=0">Add New</a></td>
0033: <td class="normbold" colspan="10" align="right"><a href="displaymenu.asp?parent=35&title=Wrap%20up%20activities">Initial Set Up Menu</a></td>
0034: <td class="normbold" colspan="10" align="right"><a href="displaymenu.asp?parent=15&title=Wrap%20up%20activities">Wrap Up Menu</a></td>
0035: 
0036:   </tr>
0037:   <tr bgcolor="#ff9900" height="25">
0038: 
0039:     <td class="normbold" align="center" width="4%">Season</td>
0040:     <td class="normbold" align="center" width="4%">Sel.<br>Sunday</td>	
0041:     <td class="small" align="center" width="4%">Participants</td>
0042:     <td class="normbold" align="center" width="4%">Main<br>Entries</td>
0043:     <td class="normbold" align="center" width="4%">M1</td>
0044:     <td class="normbold" align="center" width="4%">M2</td>
0045:     <td class="normbold" align="center" width="4%">M3</td>
0046:     <td class="normbold" align="center" width="4%">M4</td>
0047:     <td class="normbold" align="center" width="4%">M5</td>
0048:     <td class="normbold" align="center" width="4%">MT10</td>
0049:     <td class="normbold" align="center" width="4%">S16<br>Entries</td>
0050:     <td class="normbold" align="center" width="4%">S1</td>
0051:     <td class="normbold" align="center" width="4%">S2</td>
0052:     <td class="normbold" align="center" width="4%">S3</td>
0053:     <td class="normbold" align="center" width="4%">S4</td>
0054:     <td class="normbold" align="center" width="4%">S5</td>
0055:     <td class="normbold" align="center" width="4%">ST10</td>
0056:     <td class="normbold" align="center" width="4%">B1</td>
0057:     <td class="normbold" align="center" width="4%">B2</td>
0058:     <td class="normbold" align="center" width="4%">B3</td>
0059:     <td class="normbold" align="center" width="4%">B4</td>
0060:     <td class="normbold" align="center" width="4%">B5</td>
0061:     <td class="normbold" align="center" width="4%">Main<br>Payout</td>
0062:     <td class="normbold" align="center" width="4%">S16<br>Payout</td>
0063:     <td class="normbold" align="center" width="4%">BL<br>Payout</td>
0064:     <td class="normbold" align="center" width="4%">Total<br>Payout</td>
0065:     <td class="normbold" align="center" width="4%">PayPal<br>Payments</td>
0066:     <td class="normbold" align="center" width="4%">PayPal<br>Fees</td>
0067: 	<td class="normbold" align="center" width="4%">Amount<br>Donated</td>	
0068:     <td class="normbold" align="center" width="5%">Profit<br><small>(95%)</td>
0069: 
0070:     </tr>
0071: <%
0072: 		Do Until rs.EOF
0073: 		Yr = rs("Season").Value
0074: 		SelSunday = rs("SelSunday").Value		
0075:         ID = rs("ID").Value
0076: 		M1 = rs("M1").Value
0077: 		M2 = rs("M2").Value
0078: 		M3 = rs("M3").Value
0079: 		M4 = rs("M4").Value
0080: 		M5 = rs("M5").Value
0081: 		MTop10 = rs("MTop10").Value
0082: 		S1 = rs("S1").Value
0083: 		S2 = rs("S2").Value
0084: 		S3 = rs("S3").Value
0085: 		S4 = rs("S4").Value
0086: 		S5 = rs("S5").Value
0087: 		STop10 = rs("STop10").Value
0088: 		B1 = rs("B1").Value
0089: 		B2 = rs("B2").Value
0090: 		B3 = rs("B3").Value
0091: 		B4 = rs("B4").Value
0092: 		B5 = rs("B5").Value
0093: 		AmountDonated = rs("AmountDonated").Value		
0094: 		PayPalPayments = rs("PayPalPayments").Value		
0095: 		MainEntries = rs("MainEntries").Value
0096: 		S16Entries = rs("S16Entries").Value
0097: 		participants = rs("Participants").Value
0098: 		TopMain = M1 + M2 + M3 + M4 + M5
0099: 		TotalMain =  Int((Int(( MainEntries  / 10)) - 5) * MTop10 + TopMain)
0100: 		TopS16 = S1 + S2 + S3 + S4 + S5
0101: 		TotalS16 = Int((Int((S16Entries / 10)) - 5) * STop10 + TopS16) 
0102: 		TotalBL = B1 + B2 + B3 + B4 + B5
0103: 		GrandTotal = TotalMain + TotalS16 + TotalBL + TotalProp
0104: 		PayPalFees = Cint(PayPalPayments * .04)
0105: 		Profit = ( MainEntries * 20 ) - GrandTotal
0106: 		Profit = Profit - PayPalFees
0107: 		Profit = Profit + AmountDonated
0108: 		
0109: 
0110: %>
0111:   <tr bgcolor="#66ff99" height="21">
0112: 
0113: <%   %>
0114: 
0115:     <td class="norm" align="center" width="4%"><a href="editprizes.asp?ID=<%= ID %>"><%= Yr %></a></td>
0116: 	   <td class="norm" align="center" width="4%"><%= SelSunday %></td>
0117:     <td class="norm" align="center" width="4%"><%= Participants %></td>
0118:     <td class="norm" align="center" width="4%"><%= MainEntries %></td>
0119:     <td class="norm" align="center" width="4%"><%= M1 %></td>
0120:     <td class="norm" align="center" width="4%"><%= M2 %></td>
0121:     <td class="norm" align="center" width="4%"><%= M3 %></td>
0122:     <td class="norm" align="center" width="4%"><%= M4 %></td>
0123:     <td class="norm" align="center" width="4%"><%= M5 %></td>
0124:     <td class="norm" align="center" width="4%"><%= MTop10 %></td>
0125:     <td class="norm" align="center" width="4%"><%= S16Entries %></td>
0126:     <td class="norm" align="center" width="4%"><%= S1 %></td>
0127:     <td class="norm" align="center" width="4%"><%= S2 %></td>
0128:     <td class="norm" align="center" width="4%"><%= S3 %></td>
0129:     <td class="norm" align="center" width="4%"><%= S4 %></td>
0130:     <td class="norm" align="center" width="4%"><%= S5 %></td>
0131:     <td class="norm" align="center" width="4%"><%= STop10 %></td>
0132:     <td class="norm" align="center" width="4%"><%= B1 %></td>
0133:     <td class="norm" align="center" width="4%"><%= B2 %></td>
0134:     <td class="norm" align="center" width="4%"><%= B3 %></td>
0135:     <td class="norm" align="center" width="4%"><%= B4 %></td>
0136:     <td class="norm" align="center" width="4%"><%= B5 %></td>
0137:     <td class="norm" align="center" width="4%"><%= TotalMain %></td>
0138:     <td class="norm" align="center" width="4%"><%= TotalS16 %></td>
0139:     <td class="norm" align="center" width="4%"><%= TotalBL %></td>
0140:     <td class="norm" align="center" width="4%"><%= GrandTotal %></td>
0141:     <td class="norm" align="center" width="4%"><%= PayPalPayments %></td>
0142:     <td class="norm" align="center" width="4%"><%= PayPalFees %></td>
0143: 	<td class="norm" align="center" width="4%"><%= AmountDonated %></td>
0144:     <td class="norm" align="center" width="5%"><b><%= Profit %></b></td>
0145:     </tr>
0146: <%
0147: 
0148:       rs.MoveNext
0149: 		Loop
0150: 		rs.Close
0151: 		Set rs = Nothing
0152: %>
0153: 
0154: </body>
0155: </html>