You cannot select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

19 lines
522 B
Plaintext

<form method ="post" action="<%= Request.ServerVariables("SCRIPT_NAME") %>">
<input type ="text" name="date"><br>
<input type="submit">
</form>
<%
Dim strDate , blnValid , dteDate
If Request.ServerVariables("CONTENT_LENGTH") <>0 Then
strDate = Trim(Request.Form("date"))
If isDate(strDate) Then
dteDate = CDate(strDate)
blnValid = True
Else
Response.Write "You entered an invalid date"
End If
If blnValid = True Then
Response.Write "The date you entered was " & dteDate
End If
End If
%>