You've got ASP and JavaScript in this same file. Make sure the
error is related to JavaScript, not ASP. Or else please ask it in ASP
lists.
As a remark, line 3 doesn't correspond to any code.
> -----Message d'origine-----
> De : John Foisy [mailto:jfoisy@t...]
> Envoy=C3=A9 : mardi 28 janvier 2003 19:14
> =C3=80 : javascript
> Objet : [javascript] form validation error
>
>
> below is the code and the Validate_form function
> the error I get is expected ; Line 3 column 31
> can anybody shed some light on this for a newbie programmer
>
>
> <html>
>
> <head>
> <meta name=3D"GENERATOR" content=3D"Microsoft FrontPage 5.0">
> <meta name=3D"ProgId" content=3D"FrontPage.Editor.Document">
> <meta http-equiv=3D"Content-Type" content=3D"text/html;
> charset=3Dwindows-1252">
> <title></title>
>
> <script language=3D"javascript" src=3D"medilrt.js">
> </script>
> </head>
>
> <body background=3D"images/dirtypaper.gif">
> <table align=3D"center">
> <%
> 'Insert into database information from form
> SELECT Case request("subaction")
>
> Case "Send"
>
> 'Clean up the data for database insertion
> 'RepID =3D session("RepID")
> FName =3D trim(request("FName"))
> LName =3D trim(request("LName"))
> Address =3D trim(request("Address"))
> City =3D trim(request("City"))
> Postalcode =3D LTrim(RTrim(request("Postalcode")))
> Province =3D trim(request("Province"))
> Country =3D trim(request("Country"))
> Email =3D trim(request("Email"))
> ExpiryDate =3D request("ExpiryDate")
> Price =3D request("Price")
> CardNumber =3D request("CardNumber")
>
> SQL =3D "SELECT Reps.FName, Reps.LName, Reps.Email, Reps.RepID" _
> &" FROM RepZone INNER JOIN Reps ON RepZone.RepID =3D
> Reps.RepID" _
> &" WHERE (((RepZone.postalcodezone)=3D'" & Postalcode
> & "' ));"
> response.write SQL
> set rsreportsale =3D conn.execute(SQL)
> If not rsreportsale.eof then
> Email =3D rsreportsale("Email")
> %>
> <!--
> Dim objemail
> Set objemail =3D CreateObject("cdonts.NewMail")
> objemail.From
> =3D "http://www.medilrt.com/recordsale.asp"
> objemail.To =3D Email
> objemail.Subject =3D "Order Placed on website"
> MyBody =3D "Customer Name: "&FName&"
> "&LName &vbcrlf_
> MyBody =3D MyBody & "Address: " &Address&vbcrlf_
> MyBody =3D MyBody & "City: "&City&vbcrlf_
> MyBody =3D MyBody & "Province: "&Province&vbcrlf_
> MyBody =3D MyBody & "Postal
> Code: "&PostalCode&vbcrlf_
> MyBody =3D MyBody & "ProductID: "&request
> ("ProductID")&vbcrlf_
> MyBody =3D MyBody & "Date: "&Date&vbcrlf_
> MyBody =3D MyBody & "Time: "&Time&vbcrlf&vbcrlf_
> MyBody =3D MyBody & "Thank You!"&vbcrlf&vbcrlf
> MyBody =3D MyBody & "This is a courtesy
> Email to let
> you know that a sale has been made in your Postal Code Area"&vbcrlf
> MyBody =3D MyBody & "You will be notified
> when the
> credit card has been processed"
> objemail.Body =3D MyBody
> objemail.Send
> set objemail =3D nothing
> -->
> <%
> End If
> 'insert statement into Customers
> RepID =3D request("RepID")
> SQL =3D "INSERT into Customers (RepID, FName, LName, Address, City,
> Province, Postalcode, Country, Email)" _
> &" Values( " & RepID & ",'" & FName & "','" & LName
> & "','" & Address & "','" & City &"','" & Province & "','" &
> Postalcode
> & "' , '" & Country & "' , '" & Email & "');"
> response.write SQL
> 'conn.execute(SQL)
> %>
> <!--
> Set objemail =3D CreateObject("cdonts.NewMail")
> objemail.From
> =3D "http://www.medilrt.com/recordsale.asp"
> objemail.To =3D "customcuttin@a..."
> objemail.Subject =3D "Order Placed"
> MyBody =3D "Customer Name: "&FName&"
> "&LName &vbcrlf_
> MyBody =3D MyBody & "Address: " &Address&vbcrlf_
> MyBody =3D MyBody & "City: "&City&vbcrlf_
> MyBody =3D MyBody & "Province: "&Province&vbcrlf_
> MyBody =3D MyBody & "Postal
> Code: "&PostalCode&vbcrlf_
> MyBody =3D MyBody & "ProductID: "& request
> ("ProductID") & vbcrlf_
> MyBody =3D MyBody & "Date: "& Date & vbcrlf_
> MyBody =3D MyBody & "Time: "& Time &
> vbcrlf&vbcrlf_
> MyBody =3D MyBody & "Thank You!"
> objemail.Body =3D MyBody
> objemail.Send
> set objemail =3D nothing
>
>
> Set objemail =3D CreateObject("cdonts.NewMail")
> objemail.From
> =3D "http://www.medilrt.com/recordsale.asp"
> objemail.To =3D "daniel@m..."
> objemail.Subject =3D "Order Placed"
> MyBody =3D "Customer Name: "&FName&"
> "&LName & vbcrlf
> MyBody =3D MyBody & "Address: "& Address & vbcrlf
> MyBody =3D MyBody & "City: "&City & vbcrlf_
> MyBody =3D MyBody & "Province: "&Province
> & vbcrlf_
> MyBody =3D MyBody & "Postal Code: "&PostalCode &
> vbcrlf_
> MyBody =3D MyBody & "ProductID: "&request
> ("ProductID") & vbcrlf_
> MyBody =3D MyBody & "Date: "& Date & vbcrlf_
> MyBody =3D MyBody & "Time: "& Time &
> vbcrlf&vbcrlf_
> MyBody =3D MyBody & "Thank You!"
> objemail.Body =3D MyBody
> objemail.Send
> Set objemail =3D Nothing
> -->
> <%
> SQL =3D "SELECT CustID From Customers where ((FName) =3D '" &
> FName & "') AND
> ((LName) =3D '" & LName & "') AND ((Address) =3D '" & Address & "');"
> 'response.write SQL
> set rscustid =3D conn.execute(SQL)
> CustID =3D rscustid("CustID")
> rscustid.close
> set rscustid =3D nothing
>
> ProductID =3D trim(request("ProductID"))
> 'response.write ProductID
> Quantity =3D request("quantity")
> CardType =3D request("CardType")
> 'insert statement into Orders
> RepID =3D request("RepID")
> 'response.write RepID
> SQL =3D "INSERT INTO Orders " _
> & "(CustID, ProductID, Quantity, CardNumber, CardType,
> ExpiryDate,
> Price, OrderDate)" _
> & " Values( " & CustID & "," & ProductID & "," &
> Quantity & "," &
> CardNumber & "," & CardType & ",'" & ExpiryDate & "'," &
> Price & ",#" &
> Date & "# );"
> response.write SQL
> 'conn.execute(SQL)
>
>
> Case "Else"
> 'Do nothing
> End SELECT
>
>
> %>
>
> <table>
> <tr>
> <td align=3D"center" colspan=3D"2">
> <font color=3D"#0000ff" size=3D"6">
> Medi-Lert Order Form
> </font>
> </td>
> </tr>
> <tr>
> <td height=3D"5" colspan=3D"7">
> <img src=3D"images/topbar.gif" border=3D"0">
> </td>
> </tr>
> <tr>
> <td height=3D"10" colspan=3D"2">
> </td>
> </tr>
> <!--Here we begin the form data fields-->
> <tr>
> <td colspan=3D"2" align=3D"center" width=3D"80%">
> <font color=3D"#000000" size=3D"5">
> <b>
> <u>
> Please complete the
> form below in
> full
> </u>
> </b>
> </font>
> </td>
> </tr>
> <tr>
> <td height=3D"30" colspan=3D"2">
> </td>
> </tr>
>
> <form name=3D"form" action=3D"recordsalepublic.asp" method=3D"POST"
> onSubmit=3D"return Validate_form(this)">
> <input type=3D"hidden" name=3D"RepID"
value=3D"<%=3Drequest("RepID")%>">
> <tr>
> <td width=3D"100" align=3D"left" ><b><font color=3D"#0000ff"
size=3D"3">First
> Name:</font></b></td>
> <td width=3D"100" align=3D"left"><input type=3D"text" name=3D"FName"
> maxlength=3D"25" size=3D"20"></td>
> </tr>
> <tr>
> <td width=3D"100" align=3D"left" ><b><font color=3D"#0000ff"
size=3D"3">Last
> Name:</font></b></td>
> <td width=3D"100" align=3D"left"><input type=3D"text" name=3D"LName"
> maxlength=3D"25" size=3D"20"></td>
> </tr>
> <tr>
> <td width=3D"100" align=3D"left" ><b><font color=3D"#0000ff"
> size=3D"3">Email:</font></b></td>
> <td width=3D"100" align=3D"left"><input type=3D"text" name=3D"Email"
> maxlength=3D"25" size=3D"20"></td>
> </tr>
>
> <tr>
> <td width=3D"100" align=3D"left" ><b><font color=3D"#0000ff"
> size=3D"3">Address:</font></b></td>
> <td width=3D"100" align=3D"left"><input type=3D"text"
name=3D"Address"
> maxlength=3D"25" size=3D"20"></td>
> </tr>
> <tr>
> <td width=3D"100" align=3D"left" ><b><font color=3D"#0000ff"
> size=3D"3">City:</font></b></td>
> <td width=3D"100" align=3D"left"><input type=3D"text" name=3D"City"
> maxlength=3D"25"
> size=3D"20"></td>
> </tr>
> <tr>
> <td width=3D"100" align=3D"left" ><b><font color=3D"#0000ff"
> size=3D"3">Province:</font></b></td>
> <td width=3D"100" align=3D"left">
>
>
> <select name=3D"Province">
> <option>Select One</option>
> <option name=3D"Province" value=3D"0">Select One</option><br>
>
> <option value=3D"AL">ALABAMA</option>
>
> <option value=3D"AK">ALASKA</option>
>
> <option value=3D"AB">ALBERTA</option>
>
> <option value=3D"AZ">ARIZONA</option>
>
> <option value=3D"AR">ARKANSAS</option>
>
> <option value=3D"BC">BRITISH
> COLUMBIA</option>
>
> <option value=3D"CA">CALIFORNIA</option>
>
> <option value=3D"CO">COLORADO</option>
>
> <option value=3D"CT">CONNECTICUT</option>
> =09
> <option value=3D"DC">DISTRICT OF
> COLUMBIA</option>
>
> <option value=3D"DE">DELAWARE</option>
>
> <option value=3D"FL">FLORIDA</option>
>
> <option value=3D"GA">GEORGIA</option>
>
> <option value=3D"HI">HAWAII</option>
>
> <option value=3D"ID">IDAHO</option>
>
> <option value=3D"IL">ILLINOIS</option>
>
> <option value=3D"IN">INDIANA</option>
>
> <option value=3D"IW">IOWA</option>
>
> <option value=3D"KS">KANSAS</option>
>
> <option value=3D"KY">KENTUCKY</option>
>
> <option value=3D"LA">LOUISIANA</option>
>
> <option value=3D"ME">MAINE</option>
>
> <option
> value=3D"MANITOBA">MANITOBA</option>
>
> <option value=3D"MD">MARYLAND</option>
>
> <option
> value=3D"MA">MASSACHUSETTS</option>
>
> <option value=3D"MI">MICHIGAN</option>
>
> <option value=3D"MN">MINNESOTA</option>
>
> <option value=3D"MS">MISSISSIPPI</option>
>
> <option value=3D"MO">MISSOURI</option>
>
> <option value=3D"MT">MONTANA</option>
>
> <option value=3D"NE">NEBRASKA</option>
>
> <option value=3D"NV">NEVADA</option>
>
> <option value=3D"NB">NEW
> BRUNSWICK</option>
>
> <option value=3D"NH">NEW
> HAMPSHIRE</option>
>
> <option value=3D"NJ">NEW JERSEY</option>
>
> <option value=3D"NM">NEW MEXICO</option>
>
> <option value=3D"NY">NEW YORK</option>
>
> <option value=3D"NL">NEWFOUNDLAND</option>
>
> <option value=3D"NC">NORTH
> CAROLINA</option>
>
> <option value=3D"ND">NORTH DAKOTA</option>
>
> <option value=3D"NT">NORTHWEST
> TERRITORIES</option>
>
> <option value=3D"NS">NOVA SCOTIA</option>
>
> <option value=3D"OH">OHIO</option>
>
> <option value=3D"OK">OKLAHOMA</option>
>
> <option value=3D"ON">ONTARIO</option>
>
> <option value=3D"OREGON">OREGON</option>
>
> <option value=3D"PA">PENNSYLVANIA</option>
>
> <option value=3D"PE">PRINCE EDWARD
> ISLAND</option>
>
> <option value=3D"PR">PUERTO RICO</option>
>
> <option value=3D"QC">QUEBEC</option>
>
> <option value=3D"RI">RHODE ISLAND</option>
>
> <option value=3D"SK">SASKATCHEWAN</option>
>
> <option value=3D"SC">SOUTH
> CAROLINA</option>
>
> <option value=3D"SD">SOUTH DAKOTA</option>
>
> <option value=3D"TN">TENNESSEE</option>
>
> <option value=3D"TX">TEXAS</option>
>
> <option value=3D"UT">UTAH</option>
>
> <option value=3D"VT">VERMONT</option>
>
> <option value=3D"VI">VIRGIN
> ISLANDS</option>
>
> <option value=3D"VA">VIRGINIA</option>
>
> <option value=3D"WA">WASHINGTON</option>
>
> <option value=3D"DC">Washington
> DC</option>
>
> <option value=3D"WV">WEST
> VIRGINIA</option>
>
> <option value=3D"WI">WISCONSIN</option>
>
> <option value=3D"WY">WYOMING</option>
>
> <option value=3D"YK">YUKON</option>
>
>
> </select></td>
> </tr>
> <tr>
> <td width=3D"100" align=3D"left" ><b><font color=3D"#0000ff"
> size=3D"3">Postal
> Code:</font></b></td>
> <td width=3D"100" align=3D"left"><input type=3D"text"
name=3D"Postalcode"
> maxlength=3D"25" size=3D"20"></td>
> </tr>
> <tr>
> <td width=3D"100" align=3D"left" ><b><font color=3D"#0000ff"
> size=3D"3">Country:</font></b></td>
> <td width=3D"100" align=3D"left">
> <select name=3D"Country">
> <option>Select One</option>
> <option value=3D"CA">Canada</option>
> <option value=3D"US">United States</option>
> </select></td>
> </tr>
> <tr>
> <td width=3D"100" align=3D"left" ><b><font color=3D"#0000ff"
> size=3D"3">Product
> Identification Number:</font></b></td>
> <td width=3D"100" align=3D"left"><input type=3D"text"
name=3D"ProductID"
> maxlength=3D"3" size=3D"3"> <a
> href=3D"javascript:doThePopUp()">Not
> Sure?</a></td>
>
> </tr>
> <tr>
> <td width=3D"100" align=3D"left" ><b><font color=3D"#0000ff"
size=3D"3">Units
> Ordered:</font></b></td>
> <td width=3D"100" align=3D"left"><input type=3D"text"
name=3D"quantity"
> maxlength=3D"3" size=3D"3"></td>
> </tr>
>
> <tr>
> <td width=3D"100" align=3D"left" ><b><font color=3D"#0000ff"
> size=3D"3">Purchase
> Price inc.
> taxes:</font></b></td>
> <td width=3D"100" align=3D"left"><input type=3D"text" name=3D"Price"
> maxlength=3D"25" size=3D"20"></td>
> </tr>
> <tr>
> <td width=3D"100" align=3D"left" ><b><font color=3D"#0000ff"
> size=3D"3">Credit
> Card:</font></b></td>
> <td width=3D"100" align=3D"left">
> <select align=3D"left" name=3D"CardType">
> <option>Select One</option>
> <option value=3D"2">Visa</option>
> <option value=3D"1">Mastercard</option>
> <option value=3D"3">American Express</option>
> =09
>
> </select>
> </td>
> </tr>
> <tr>
> <td width=3D"100" align=3D"left" >
> <font size=3D"3" color=3D"#0000ff"><b>Card Number:</b>
> </font>
> </td>
> =09
> <td>
> <input type=3D"text" length=3D"15" maxlength=3D"17"
> name=3D"CardNumber" size=3D"20">
> </td>
> </tr>
> <tr>
> <td width=3D"100" align=3D"left" ><b><font color=3D"#0000ff"
> size=3D"3">Expiry
> Date:</font></b></td>
> <td align=3D"left">
> <select name=3D"ExpiryDate">
> <option value=3D"01/2003">01/2003</option>
> <option value=3D"02/2003">02/2003</option>
> <option value=3D"03/2003">03/2003</option>
> <option value=3D"04/2003">04/2003</ption>
> <option value=3D"05/2003">05/2003</option>
> <option value=3D"06/2003">06/2003</option>
> <option value=3D"07/2003">07/2003</option>
> <option value=3D"08/2003">08/2003</option>
> <option value=3D"09/2003">09/2003</option>
> <option value=3D"10/2003">10/2003</option>
> <option value=3D"11/2003">11/2003</option>
> <option value=3D"12/2003">12/2003</option>
> <option value=3D"1/2004">1/2004</option>
> <option value=3D"2/2004">2/2004</option>
> <option value=3D"3/2004">3/2004</option>
> <option value=3D"4/2004">4/2004</option>
> <option value=3D"5/2004">5/2004</option>
> <option value=3D"6/2004">6/2004</option>
> <option value=3D"7/2004">7/2004</option>
> <option value=3D"8/2004">8/2004</option>
> <option value=3D"9/2004">9/2004</option>
> <option value=3D"10/2004">10/2004</option>
> <option value=3D"11/2004">11/2004</option>
> <option value=3D"12/2004">12/2004</option>
> <option value=3D"1/2005">1/2005</option>
> <option value=3D"2/2005">2/2005</option>
> <option value=3D"3/2005">3/2005</option>
> <option value=3D"4/2005">v</option>
> <option value=3D"5/2005">5/2005</option>
> <option value=3D"6/2005">6/2005</option>
> <option value=3D"7/2005">7/2005</option>
> <option value=3D"8/2005">8/2005</option>
> <option value=3D"9/2005">9/2005</option>
> <option value=3D"10/2005">10/2005</option>
> <option value=3D"11/2005">11/2005</option>
> <option value=3D"12/2005">12/2005</option>
>
> </select>
> </td>
> </tr>
> <tr>
> <td height=3D"35" colspan=3D"2" align=3D"center">
> =09
> </td>
> </tr>
>
> <tr>
> <td colspan=3D"2" align=3D"center">
> <input type=3D"submit" name=3D"subaction" value=3D"Send">
> </td>
> </tr>
> <tr>
> <td colspan=3D"8" height=3D"20">
> </td>
> </tr>
>
> <td height=3D"5"
> align=3D"center" colspan=3D"8">
> <image
> border=3D"0"
> width=3D"100%" src=3D"images/topbar.gif">
> </td>
> </tr>
>
> =09
> <tr>
> <td height=3D"50" colspan=3D"8" align=3D"center"><A
HREF=3D"index.html"><font
> size=3D"4">Back to Main Page</font></td>
> </tr>
>
> <tr>
> <td height=3D"50" colspan=3D"8" align=3D"center"><A
> HREF=3D"JavaScript:history.back
> ();"><font size=3D"4">Back</font></td>
> </tr>
>
>
> </form>
> </table>
> </body>
> and the function is here
>
>
> function Validate_form(theForm) {
> If (theForm.FName.Value =3D=3D ""){
> alert("Please enter your First Name");
> theForm.FName.focus();
> return (false);
> }
> =09
> If (theForm.FName.Length < 2) {
> alert("Sorry, First Name must be more than 1 character
> in length");
> theForm.Fname.focus();
> return (false);
> }
> =09
> If (theForm.LName.Value =3D=3D ""){
> alert("Please enter your Last Name");
> theForm.LName.focus();
> return (false);
> }
> =09
> If (theForm.LName.Length < 2){
> alert("Sorry, your Last Name must be more than 1 chracter in
> length");
> theForm.LName.focus();
> return (false);
> }
> =09
> If (theForm.Email.Value =3D=3D ""){
> alert("Please enter an Email address");
> theForm.Email.focus();
> return (false);
> }
> If (theForm.Email.Value !=3D ""){
> var str=3DtheForm.Email.Value;
> var
> filter=3D/^([\w-]+(?:\.[\w-]+)*)@((?:[\w-]+\.)*\w[\w-]{0,66})\.([a-z]
> {2,6}(?:\.[a-z]{2})?)$/i;
> if (filter.test(str))
> testresults=3Dtrue;
> else{
> alert("Please input a valid email address!");
> testresults=3Dfalse;
> }
> return (testresults);
> }
>
> If (theForm.Address.Length < 5){
> alert("Your Address seems to be invalid");
> theForm.Address.focus();
> return (false);
> }
>
> If (theForm.Address.Value =3D=3D ""){
> alert("Please enter an Address");
> theForm.Address.focus();
> return (false);
> }
>
> If (theForm.City.Value =3D=3D ""){
> alert("Please enter a value for City");
> theForm.City.focus();
> return (false);
> }
>
> If (theForm.City.Length < 2){
> alert("Sorry, there are no abbreviations allowed");
> theForm.City.focus();
> return (false);
> }
>
> if (theForm.Province.selectedIndex =3D=3D 0){
> alert("The first \"State Selection\" option is not a
> valid selection.
> Please choose one of the other options.");
> theForm.Province.focus();
> return (false);
> }
>
>
> =09
> if (theForm.Postalcode.Value =3D=3D ""){
> alert("Please enter a value for the Postal/Zip Code");
> theForm.Postalcode.focus();
> return (false);
> }
> return (true);
> }=09
>
>
>
View Cart
