Submission
<HTML>
<HEAD>
<TITLE>The SRC Attribute</TITLE>
<SCRIPT SRC="Validate.inc" LANGUAGE="VBScript" > </SCRIPT>
</HEAD>
<BODY>
<SCRIPT LANGUAGE="VBScript">
Private Function frmInfo_OnSubmit()
With Document.frmInfo
If IsBlank(.txtName.Value) Or _
IsBlank(.txtAddress.Value) Or _
IsBlank(.txtCity.Value) Or _
IsBlank(.txtState.Value) Then
frmInfo_OnSubmit = False
Alert "Please make sure the Name, Address, City, " & _
"State fields are not blank."
End If
End With
</SCRIPT>
<H3>Please enter the following data</H3>
<FORM METHOD=POST ACTION="Submission.asp" NAME="frmInfo">
Name: <INPUT TYPE="Text" NAME="txtName"> <P>
Address: <INPUT TYPE="Text" NAME="txtAddress"> <P>
City: <INPUT TYPE="Text" NAME="txtCity">
State <INPUT TYPE="Text" NAME="txtState">
Zip Code <INPUT TYPE="Text" NAME="txtZip"><P>
<INPUT TYPE="submit">
</BODY>
</HTML>
页:
[1]