Count Lines in Pages

Contents of Page: MarkAsPaid.asp Number of Lines: 64 Last Modified: 8/22/2018 1:32:50 PM
0001: <%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
0002: <!-- #include FILE="include/adovbs.inc" -->
0003: <!-- #include FILE="include/constants.inc" -->
0004: <!-- #include FILE="include/funcs.asp" -->
0005: <%
0006: 	ID = Request.QueryString("ID")
0007:   	PaidType = Request.QueryString("PaidType")  
0008:   		
0009: 
0010: 		Set rs = Server.CreateObject("ADODB.Recordset")
0011: 		sqlString = "SELECT * FROM mmEntries WHERE ID = " & ID
0012: 		rs.Open sqlString, Conn, adOpenDynamic, adLockOptimistic, adCmdText
0013: 		If rs.EOF Then
0014: 			rs.Close
0015: 			Response.Redirect("whoisdeadbeat.asp")
0016: 		End If
0017: 
0018: 			val2 = rs("Num2ndEntries").Value
0019: rs("Paid2ndEntries").Value = val2
0020: 
0021: 	Entries = rs("numEntries").Value
0022: 	EmailAddress = rs("EmailAddress").Value
0023: 	rs("PaidEntries").Value = Entries
0024: 
0025: 	If PaidType = "PayPal" Then
0026: 	rs("PayPalUsed").Value = True
0027: 		Else
0028: 	rs("PayPalUsed").Value = False
0029: 	End If	
0030: 	rs.Update
0031: 	rs.Close
0032: 	Set rs = Nothing
0033: 	
0034: 
0035:      EMailFrom = "jt@folga.org" 
0036:      EMailTo = EmailAddress
0037:      EMailSubject = "March Madness - Your donation has been received"
0038:      EMailBody = "Your donation entitles you to make " & Entries & " pick(s) in the contest.<BR><BR>Thank you for participating!<BR> "
0039: 
0040:      If PaidEntries > 1 Then
0041:        S16picks = PaidEntries - 1
0042:        EmailBody = EmailBody & "<br>P.S.: You are also eligible to make " & S16Picks & " pick(s) in the Sweet 16 Contest.<br><br>"
0043:     End If
0044:    
0045:    sendEmail EMailTo, "", "", EmailSubject, EMailBody, "HTML", ""
0046: 
0047: %>
0048: 
0049: <!-- #include FILE="include/ReturnPageUse.inc" -->
0050: 
0051: <%
0052: 
0053:  	Response.Redirect("whoisdeadbeat.asp")	
0054: 	
0055: %>
0056: <html>
0057: 
0058: <head>
0059: <title></title>
0060: </head>
0061: 
0062: <body>
0063: </body>
0064: </html>