Count Lines in Pages

Contents of Page: postMessage.asp Number of Lines: 63 Last Modified: 2/17/2025 2:27:54 PM
0001: <% @Language = "VBScript" %>
0002: 
0003: <!-- #include FILE="include/adovbs.inc" -->
0004: <!-- #include FILE="include/constants.inc" -->
0005: 
0006: <%
0007: 	user = Request.Cookies("user")
0008: 	If user = ""  Then Response.Redirect("login.asp?from=postMessage.asp")
0009: 
0010: 	Set rs = Server.CreateObject("ADODB.Recordset")
0011: 	sqlString = "SELECT * FROM mmEntries " & _
0012: 			"WHERE Season = " & season & " " & _
0013: 			"AND EmailAddress = '" & user & "'"
0014: 	rs.Open sqlString, conn, adOpenStatic, adLockReadOnly, adCmdText
0015: 	If rs("FirstName").Value <> "" Then
0016: 		name = rs("FirstName").Value
0017: 		lastinit = Left(rs("Name").Value,1)
0018: 		name = name & " " & lastinit & ". - " & rs("City").Value & ", " & rs("State").Value
0019: 	Else
0020: 		name = rs("Name").Value
0021: 	End If
0022: 	rs.Close
0023: 	Set rs = Nothing
0024: %>
0025: 
0026: <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
0027: 
0028: <html>
0029: <head>
0030: <meta name="viewport" content="width=device-width">
0031: 	<title>March Madness - Post Message</title>
0032: 	<link href="mm.css" rel="stylesheet" type="text/css">
0033: 	<link href="https://mychinodes.org/desb.css" rel="stylesheet" type="text/css">	
0034: </head>
0035: 
0036: <body bgcolor="#ffffff" onload="document.postMsg.Message.focus()">
0037: 
0038: <form name="postMsg" method="post" action="processMessage.asp">
0039: 	<table border="0" cellpadding="0" cellspacing="0" align="center" width="250">
0040: 
0041: 			<tr><td colspan="2" height="1" bgcolor="#eeeeee"><spacer type="block"></td></tr>
0042: 			<tr valign="top">
0043: 				<td class="normbold">Message:&nbsp;</td>
0044: 				<td class="norm">
0045: 					<textarea cols="50" name="Message" class="norm" rows="7"></textarea>
0046: 				</td>
0047: 			</tr>
0048: 			<tr><td colspan="2" height="1" bgcolor="#eeeeee"><spacer type="block"></td></tr>
0049: 			<input type="Hidden" name="From" value="<%= name %>">
0050: 			<input type="Hidden" name="EmailAddress" value="<%= user %>">
0051: 			<input type="Hidden" name="MessageDate" value="<%= todayDate %>">
0052: 		<tr>
0053: 			<td colspan="2" align="center" class="norm">
0054: 				&nbsp;<br>
0055: 				<input type="Submit" value="Post Message" style="background-color:#FAD2B8;" class="button-40">&nbsp;&nbsp;&nbsp;
0056: 				<input type="Button" value="Return" style="background-color:#FAD2B8;" onclick="window.close()" class="button_close">
0057: 			</td>
0058: 		</tr>
0059: 	</table>
0060: </form>
0061: 
0062: </body>
0063: </html>