Count Lines in Pages
Contents of Page: checkinthemail.asp
Number of Lines: 36
Last Modified: 8/22/2018 1:32:35 PM
0001: <%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
0002: <!-- #include FILE="include/adovbs.inc" -->
0003: <!-- #include FILE="include/constants.inc" -->
0004: <%
0005:    	EmailAddress = Request.QueryString("EMail")
0006: 	numEntries = Trim(Request.Form("numbEntries"))
0007: 	CheckNo = Trim(Request.Form("CheckNo"))
0008: 	CheckAmt = Trim(Request.Form("CheckAmount"))
0009: 	
0010: 	Set rs = Server.CreateObject("ADODB.Recordset")
0011: 
0012: 			sqlString = "SELECT * FROM mmEntries WHERE EmailAddress = '" & EmailAddress & "'"
0013: 
0014: 			rs.Open sqlString, conn, adOpenStatic, adLockReadOnly, adCmdText
0015: 	
0016: FirstName = rs("FirstName").Value
0017: LastName =  rs("Name").Value
0018: 
0019: 
0020:  
0021: 
0022: EmailSubject = "March Madness - Check is in the Mail!"
0023: msg = FirstName & " " & LastName & " is submitting his donation via check.<BR><BR>Number of Entries: " & numEntries & "<br><br>Check#: " & CheckNo & "<BR><BR>Check Amount: " & CheckAmt & "<BR><BR>Thank you for participating!<BR> "
0024: 
0025:           sendEmail notifyemail, "", "", EmailSubject, msg, "HTML", emailaddress	
0026: 	
0027: %>
0028: <html>
0029: 
0030: <head>
0031: <title></title>
0032: </head>
0033: 
0034: <body>
0035: </body>
0036: </html>