Here is what I use for CC validation, you could just add a few more cards
,
and it works fine with NS6.
Function validate_card(){
var target = document.forms[0];
var number = target.card_number.value;
var type = target.card_type[target.card_type.selectedIndex].value;
var first_number = number.substring(0,1);
switch (type) {
case "VISA":
if ( parseInt(first_number) != 4){
alert("Invalid Visa Card Number");
return;
}
break;
case "AMEX":
var first_two_numbers = number.substring(0,2);
if ( parseInt(first_two_numbers) != 34 && parseInt(first_two_numbers) !=
37){
alert("Invalid American Express Card Number");
return;
}
break;
case "MAST":
var first_two_numbers = number.substring(0,2);
if ( parseInt(first_two_numbers) < 50 || parseInt(first_two_numbers) > 56
){
alert("Invalid Mastercard Number");
return;
}
break;
case "DISC":
var first_four_numbers = number.substring(0,4);
if( parseInt(first_four_numbers) != 6011){
alert("Invalid Discover Card Number");
return;
}
break;
}
}
Doug
----- Original Message -----
From: "Troy Montour" <[EMAIL PROTECTED]>
To: "CF-Talk" <[EMAIL PROTECTED]>
Sent: Wednesday, December 19, 2001 9:27 AM
Subject: Re: OT was wondering if any Javascript guru's could give me a ha
nd
with this code
> I could include the form no problem on that. I had it with
document.formname
> but was trying to see if that was causing my NS problem which it didn't
help
> anything. and yes I have tested it with IE 3 and it works good but with
NS
> it just basically submits the form with no error.
>
> here is the html code....
> <FORM id="JoinForm" NAME="JoinForm" ENCTYPE="multipart/form-data"
> ACTION="test3.cfm" METHOD="POST" onSubmit="return checkFields();"
>
> <input type="hidden" name="MailDomain"
value="troy.com">
> <TABLE ID="Table6" BORDER=0 CELLSPACING=0 CELLPADDING=0 WI
DTH="100%">
> <TR VALIGN=TOP>
> <TD WIDTH=757 HEIGHT=415>
> <P>
> <TABLE WIDTH=751 BORDER=0
CELLSPACING=0
> CELLPADDING=0 ALIGN=LEFT NOF=TE>
> <TR>
> <TD>
> <TABLE ID="Table11"
BORDER=0
> CELLSPACING=0 CELLPADDING=0 WIDTH="100%">
> <COLGROUP>
> <COL WIDTH=24>
> <COL WIDTH=179>
> <COL WIDTH=259>
> <COL WIDTH=289>
> </COLGROUP>
> <TR>
> <TD WIDTH=24
> BGCOLOR="#006699">
> <P> </
P>
> </TD>
> <TD WIDTH=179
> BGCOLOR="#006699">
> <P><B><FONT
> COLOR="#FFFFFF" SIZE="-1">Private Information</FONT></B></P>
> </TD>
> <TD COLSPAN=2
> BGCOLOR="#006699">
> <P> </
P>
> </TD>
> </TR>
> <TR>
> <TD WIDTH=24>
> <P> </
P>
> </TD>
> <TD WIDTH=179
>
> <P> </
P>
> </TD>
> <TD COLSPAN=2
>
> <P> </
P>
> </TD>
> </TR>
> <TR>
> <TD WIDTH=24>
> <P><B><FONT
> FACE="Arial,Helvetica,Univers,Zurich BT,sans-serif"
> SIZE="-1">1.</FONT></B></P>
> </TD>
> <TD WIDTH=179
>
> <P><B><FONT
> COLOR="#FF0000" SIZE="-1" FACE="Abadi MT Condensed
> Light,sans-serif">*</FONT><FONT FACE="Arial,Helvetica,Univers,Zurich
> BT,sans-serif" SIZE="-1">First Name:</FONT></B></P>
> </TD>
> <TD COLSPAN=2
>
> <P><INPUT
> ID="Forms Edit Field1" TYPE=TEXT NAME="First_Name" VALUE="" SIZ
E=40
> MAXLENGTH=50></TD>
> </TR>
> <TR>
> <TD WIDTH=24>
> <P><B><FONT
> FACE="Arial,Helvetica,Univers,Zurich BT,sans-serif"
> SIZE="-1">2.</FONT></B></P>
> </TD>
> <TD WIDTH=179
>
> <P><B><FONT
> COLOR="#FF0000" SIZE="-1" FACE="Abadi MT Condensed
> Light,sans-serif">*</FONT><FONT FACE="Arial,Helvetica,Univers,Zurich
> BT,sans-serif" SIZE="-1">Last Name:</FONT></B></P>
> </TD>
> <TD COLSPAN=2
>
> <P><INPUT>
>ID="FormsEditField4" TYPE=TEXT NAME="Last_Name" VALUE="" SIZ=
40
> MAXLENGTH=50></TD>
> </TR>
> <TR>
> <TD WIDTH=24>
> <P><B><FONT
> FACE="Arial,Helvetica,Univers,Zurich BT,sans-serif"
> SIZE="-1">3.</FONT></B></P>
> </TD>
> <TD WIDTH=179
>
> <P><B><FONT
> COLOR="#FF0000" SIZE="-1" FACE="Abadi MT Condensed
> Light,sans-serif">*</FONT><FONT FACE="Arial,Helvetica,Univers,Zurich
> BT,sans-serif" SIZE="-1">Address 1:</FONT></B></P>
> </TD>
> <TD COLSPAN=2
>
> <P><INPUT>
>ID="FormsEditField5" TYPE=TEXT NAME="Address_1" VALUE="" SIZ=
40
> MAXLENGTH=150></TD>
> </TR>
> <TR>
> <TD WIDTH=24>
> <P><B><FONT
> FACE="Arial,Helvetica,Univers,Zurich BT,sans-serif"
> SIZE="-1">4.</FONT></B></P>
> </TD>
> <TD WIDTH=179
>
> <P><B><FONT
> FACE="Arial,Helvetica,Univers,Zurich BT,sans-serif" SIZE="-1">Addre
ss
> 2:</FONT></B></P>
> </TD>
> <TD COLSPAN=2
>
> <P><INPUT>
>ID="FormsEditField24" TYPE=TEXT NAME="Address_2" VALUE="" SIZ=
40
> MAXLENGTH=150></TD>
> </TR>
> <TR>
> <TD WIDTH=24>
> <P><B><FONT
> FACE="Arial,Helvetica,Univers,Zurich BT,sans-serif"
> SIZE="-1">5.</FONT></B></P>
> </TD>
> <TD WIDTH=179
>
> <P><B><FONT
> COLOR="#FF0000" SIZE="-1" FACE="Abadi MT Condensed
> Light,sans-serif">*</FONT><FONT FACE="Arial,Helvetica,Univers,Zurich
> BT,sans-serif" SIZE="-1">City:</FONT></B></P>
> </TD>
> <TD COLSPAN=2
>
> <P><INPUT
> ID="FormsEditField2" TYPE=TEXT NAME="City1" VALUE="" SIZE=25
> MAXLENGTH=50></TD>
> </TR>
> <TR>
> <TD WIDTH=24
> HEIGHT=24>
> <P><B><FONT
> FACE="Arial,Helvetica,Univers,Zurich BT,sans-serif"
> SIZE="-1">6.</FONT></B></P>
> </TD>
> <TD WIDTH=179
>
> <P><B><FONT
> COLOR="#FF0000" SIZE="-1" FACE="Abadi MT Condensed
> Light,sans-serif">*</FONT><FONT FACE="Arial,Helvetica,Univers,Zurich
> BT,sans-serif" SIZE="-1">State:</FONT></B></P>
> </TD>
> <TD COLSPAN=2
>
> <P>
> <SELECT
> ID="FormsComboBox3" NAME="State1">
>
<OPTION
> VALUE="Alabama">Alabama</OPTION>
>
<OPTION
> VALUE="Alaska">Alaska</OPTION>
>
<OPTION
> VALUE="Arizona">Arizona</OPTION>
>
<OPTION
> VALUE="Arkansas">Arkansas</OPTION>
>
<OPTION
> VALUE="California">California</OPTION>
>
<OPTION
> VALUE="Colorado">Colorado</OPTION>
>
<OPTION
> VALUE="Connecticut">Connecticut</OPTION>
>
<OPTION
> VALUE="Delaware">Delaware</OPTION>
>
<OPTION
> VALUE="Florida">Florida</OPTION>
>
<OPTION
> VALUE="Georgia">Georgia</OPTION>
>
<OPTION
> VALUE="Hawaii">Hawaii</OPTION>
>
<OPTION
> VALUE="Idaho">Idaho</OPTION>
>
<OPTION
> VALUE="Illinois">Illinois</OPTION>
>
<OPTION
> VALUE="Indiana">Indiana</OPTION>
>
<OPTION
> VALUE="Iowa">Iowa</OPTION>
>
<OPTION
> VALUE="Louisiana">Louisiana</OPTION>
>
<OPTION
> VALUE="Kansas">Kansas</OPTION>
>
<OPTION
> VALUE="Kentucky">Kentucky</OPTION>
>
<OPTION
> VALUE="Maine">Maine</OPTION>
>
<OPTION
> VALUE="Maryland">Maryland</OPTION>
>
<OPTION
> VALUE="Massachusetts">Massachusetts</OPTION>
>
<OPTION
> VALUE="Michigan">Michigan</OPTION>
>
<OPTION
> VALUE="Minnesota" SELECTED>Minnesota</OPTION>
>
<OPTION
> VALUE="Mississippi">Mississippi</OPTION>
>
<OPTION
> VALUE="Missouri">Missouri</OPTION>
>
<OPTION
> VALUE="Montana">Montana</OPTION>
>
<OPTION
> VALUE="Nebraska">Nebraska</OPTION>
>
<OPTION
> VALUE="Nevada">Nevada</OPTION>
>
<OPTION
> VALUE="New_Hampshire">New Hampshire</OPTION>
>
<OPTION
> VALUE="New_Jersey">New Jersey</OPTION>
>
<OPTION
> VALUE="New_Mexico">New Mexico</OPTION>
>
<OPTION
> VALUE="New_York">New York</OPTION>
>
<OPTION
> VALUE="North_Carolina">North Carolina</OPTION>
>
<OPTION
> VALUE="North_Dakota">North Dakota</OPTION>
>
<OPTION
> VALUE="Ohio">Ohio</OPTION>
>
<OPTION
> VALUE="Oklahoma">Oklahoma</OPTION>
>
<OPTION
> VALUE="Oregon">Oregon</OPTION>
>
<OPTION
> VALUE="Pennsylvania">Pennsylvania</OPTION>
>
<OPTION
> VALUE="Rhode_Island">Rhode Island</OPTION>
>
<OPTION
> VALUE="South_Carolina">South Carolina</OPTION>
>
<OPTION
> VALUE="South_Dakota">South Dakota</OPTION>
>
<OPTION
> VALUE="Tennessee">Tennessee</OPTION>
>
<OPTION
> VALUE="Texas">Texas</OPTION>
>
<OPTION
> VALUE="Utah">Utah</OPTION>
>
<OPTION
> VALUE="Vermont">Vermont</OPTION>
>
<OPTION
> VALUE="Virginia">Virginia</OPTION>
>
<OPTION
> VALUE="Washington">Washington</OPTION>
>
<OPTION
> VALUE="West_Virgina">West Virginia</OPTION>
>
<OPTION
> VALUE="Wisconsin">Wisconsin</OPTION>
>
<OPTION
> VALUE="Wyoming">Wyoming</OPTION>
> </SELEC
T>
> </TD>
> </TR>
> <TR>
> <TD WIDTH=24>
> <P><B><FONT
> FACE="Arial,Helvetica,Univers,Zurich BT,sans-serif"
> SIZE="-1">7.</FONT></B></P>
> </TD>
> <TD WIDTH=179
>
> <P><B><FONT
> COLOR="#FF0000" SIZE="-1" FACE="Abadi MT Condensed
> Light,sans-serif">*</FONT><FONT FACE="Arial,Helvetica,Univers,Zurich
> BT,sans-serif" SIZE="-1">Zip:</FONT></B></P>
> </TD>
> <TD COLSPAN=2
>
> <P>
> <TABLE
> WIDTH="40%" BORDER=0 CELLSPACING=0 CELLPADDING=0 ALIGN=LEFT N
OF=TE>
> <TR
>
>
<TD>
>> <TABLE ID="Table28" BORDER=0 CELLSPACING=0 CELLPADDING=0 WIDT=
"100%">
>
> <COLGROUP>
>
> <COL WIDTH="100%">
>
> </COLGROUP>
>
> <TR>
>
> <TD WIDTH="100%">
>
> <P>
>> <TABLE ID="Table15" BORDER=0 CELLSPACING=0 CELLPADDING=0 WIDT=
"100%">
>
> <COLGROUP>
>
> <COL WIDTH="28%">
>
> <COL WIDTH="8%">
>
> <COL WIDTH="62%">
>
> </COLGROUP>
>
> <TR>
>
> <TD WIDTH="28%">
>
> <P><INPUT ID="FormsEditField26" TYPE=TEXT NAME="Zip" VALUE="0"
SIZE=6
> MAXLENGTH=5></TD>
>
> <TD WIDTH="8%">
>
> <P><B><FONT FACE="Arial,Helvetica,Univers,Zurich BT,sans-serif"
> SIZE="-1">-</FONT></B></P>
>
> </TD>
>
> <TD WIDTH="62%">
>
> <P><INPUT ID="FormsEditField28" TYPE=TEXT NAME="Postal" VALUE="
0" SIZE=5
> MAXLENGTH=4></TD>
>
> </TR>
>
> </TABLE>
>
> </TD>
>
> </TR>
>
> </TABLE>
>
> </TD>
> </T
R>
> </TABLE
>
> </TD>
> </TR>
> <TR>
> <TD WIDTH=24
> HEIGHT=25>
> <P><B><FONT
> FACE="Arial,Helvetica,Univers,Zurich BT,sans-serif"
> SIZE="-1">8.</FONT></B></P>
> </TD>
> <TD WIDTH=179
>
> <P><B><FONT
> COLOR="#FF0000" SIZE="-1">*</FONT><FONT
FACE="Arial,Helvetica,Univers,Zurich
> BT,sans-serif" SIZE="-1">Phone Number:</FONT></B></P>
> </TD>
> <TD COLSPAN=2
>
> <P>(<INPUT
> ID="Area" TYPE=TEXT NAME="AreaCode" VALUE="" SIZE=5 MAXLENGTH
=3>)<INPUT
> ID="FormsEditField23" TYPE=TEXT NAME="Phone_Number" VALUE="" SI
ZE=10
> MAXLENGTH=8></TD>
> </TR>
> <TR>
> <TD WIDTH=24>
> <P><B><FONT
> FACE="Arial,Helvetica,Univers,Zurich BT,sans-serif"
> SIZE="-1">9.</FONT></B></P>
> </TD>
> <TD WIDTH=179
>
> <P><B><FONT
> COLOR="#FF0000" SIZE="-1" FACE="Abadi MT Condensed
> Light,sans-serif">*</FONT><FONT FACE="Arial,Helvetica,Univers,Zurich
> BT,sans-serif" SIZE="-1">Email Address:</FONT></B></P>
> </TD>
> <TD COLSPAN=2
>
> <P><INPUT
> ID="FormsEditField12" TYPE=TEXT NAME="Email_Address" VALUE="" S
IZE=40
> MAXLENGTH=100></TD>
> </TR>
> <TR>
> <TD WIDTH=24>
> <P><B><FONT
> FACE="Arial,Helvetica,Univers,Zurich BT,sans-serif"
> SIZE="-1">10.</FONT></B></P>
> </TD>
> <TD WIDTH=179
>
> <P><B><FONT
> FACE="Arial,Helvetica,Univers,Zurich BT,sans-serif" SIZE="-1">T-shi
rt
> size:</FONT></B></P>
> </TD>
> <TD COLSPAN=2
>
> <P>
> <SELECT
> ID="Forms Combo Box9" NAME="TShirt">
>
<OPTION
> VALUE="S">Small</OPTION>
>
<OPTION
> VALUE="M">Medium</OPTION>
>
<OPTION
> VALUE="L" SELECTED>Large</OPTION>
>
<OPTION
> VALUE="XL">X-Large</OPTION>
>
<OPTION
> VALUE="XXL">XX-Large</OPTION>
> </SELEC
T>
> </TD>
> </TR>
> <TR>
> <TD WIDTH=24>
> <P><B><FONT
> FACE="Arial,Helvetica,Univers,Zurich BT,sans-serif"
> SIZE="-1">11.</FONT></B></P>
> </TD>
> <TD WIDTH=179
>
> <P><B><FONT
> FACE="Arial,Helvetica,Univers,Zurich BT,sans-serif" SIZE="-1">Credi
t Card
> Type:</FONT></B></P>
> </TD>
> <TD COLSPAN=2
>
> <P>
> <SELECT
> ID="FormsComboBox21" NAME="CardType">
>
<OPTION
> VALUE="AmExCard">American Express</OPTION>
>
<OPTION
> VALUE="DiscoverCard">Discover</OPTION>
>
<OPTION
> VALUE="MasterCard">MasterCard</OPTION>
>
<OPTION
> VALUE="VisaCard" SELECTED>Visa</OPTION>
> </SELEC
T>
> </TD>
> </TR>
> <TR>
> <TD WIDTH=24>
> <P><B><FONT
> FACE="Arial,Helvetica,Univers,Zurich BT,sans-serif"
> SIZE="-1">12.</FONT></B></P>
> </TD>
> <TD WIDTH=179
>
> <P><B><FONT
> COLOR="#FF0000" SIZE="-1" FACE="Abadi MT Condensed
> Light,sans-serif">*</FONT><FONT FACE="Arial,Helvetica,Univers,Zurich
> BT,sans-serif" SIZE="-1">Credit Card Number</FONT></B></P>
> </TD>
> <TD COLSPAN=2
>
> <P><INPUT
> ID="FormsEditField14" TYPE=TEXT NAME="CardNumber" VALUE="" SIZE
=17
> MAXLENGTH=16></TD>
> </TR>
> <TR>
> <TD WIDTH=24
> HEIGHT=18>
> <P><B><FONT
> FACE="Arial,Helvetica,Univers,Zurich BT,sans-serif"
> SIZE="-1">13.</FONT></B></P>
> </TD>
> <TD WIDTH=179
>
> <P><B><FONT
> COLOR="#FF0000" SIZE="-1" FACE="Abadi MT Condensed
> Light,sans-serif">*</FONT><FONT FACE="Arial,Helvetica,Univers,Zurich
> BT,sans-serif" SIZE="-1">Exp Date (mm/yyyy):</FONT></B></P>
> </TD>
> <TD COLSPAN=2
>
> <P>
> <TABLE
> WIDTH="40%" BORDER=0 CELLSPACING=0 CELLPADDING=0 ALIGN=LEFT N
OF=TE>
> <TR
>
>
<TD>
>> <TABLE ID="Table30" BORDER=0 CELLSPACING=0 CELLPADDING=0 WIDT=
"100%">
>
> <COLGROUP>
>
> <COL WIDTH="100%">
>
> </COLGROUP>
>
> <TR>
>
> <TD WIDTH="100%">
>
> <P>
>> <TABLE ID="Table10" BORDER=0 CELLSPACING=0 CELLPADDING=0 WIDT=
"100%">
>
> <COLGROUP>
>
> <COL WIDTH="21%">
>
> <COL WIDTH="3%">
>
> <COL WIDTH="32%">
>
> <COL WIDTH="42%">
>
> </COLGROUP>
>
> <TR>
>
> <TD WIDTH="21%">
>
> <P>
>
> <SELECT ID="FormsComboBox138" NAME="ExpMon">
>
> <OPTION VALUE="1">01</OPTION>
>
> <OPTION VALUE="2">02</OPTION>
>
> <OPTION VALUE="3">03</OPTION>
>
> <OPTION VALUE="4">04</OPTION>
>
> <OPTION VALUE="5">05</OPTION>
>
> <OPTION VALUE="6">06</OPTION>
>
> <OPTION VALUE="7">07</OPTION>
>
> <OPTION VALUE="8">08</OPTION>
>
> <OPTION VALUE="9">09</OPTION>
>
> <OPTION VALUE="10">10</OPTION>
>
> <OPTION VALUE="11">11</OPTION>
>
> <OPTION VALUE="12">12</OPTION>
>
> </SELECT>
>
> </TD>
>
> <TD WIDTH="3%">
>
> <P><B>/</B></P>
>
> </TD>
>
> <TD WIDTH="32%">
>> <P><INPUT ID="Forms Edit Field22" TYPE=TEXT NAME="ExpYear" VALU=
"" SIZE=5
> MAXLENGTH=4></TD>
>
> <TD WIDTH="42%">
>
> <P> </P>
>
> </TD>
>
> </TR>
>
> </TABLE>
>
> </TD>
>
> </TR>
>
> </TABLE>
>
> </TD>
> </T
R>
> </TABLE
>
> </TD>
> </TR>
> <TR>
> <TD VALIGN=TO
P
> WIDTH=24>
> <P><B><FONT
> FACE="Arial,Helvetica,Univers,Zurich BT,sans-serif"
> SIZE="-1">14.</FONT></B></P>
> </TD>
> <TD VALIGN=TO
P
> WIDTH=179>
> <P><B><FONT
> FACE="Arial,Helvetica,Univers,Zurich BT,sans-serif" SIZE="-1">Promo
tional
> Code,if any:</FONT></B></P>
> </TD>
> <TD COLSPAN=2
>
> <P><INPUT
> ID="FormsEditField3" TYPE=TEXT NAME="Promo" VALUE="" SIZE=31
> MAXLENGTH=30></TD>
> </TR>
> <TR>
> <TD WIDTH=24>
> <P> </
P>
> </TD>
> <TD COLSPAN=3
>
> <P><BR><FON
T
> FACE="Arial,Helvetica,Univers,Zurich BT,sans-serif" SIZE="-1">Your
> credit
card
> will not be processed until after your trial period. You may cancel an
y
> time during the trial period. This information will be sent
securely.
> Memberships are just $24.95/month after your free trial period.
>
> <BR> </FONT></P>
> </TD>
> </TR>
> <TR>
> <TD WIDTH=24>
> <P> </
P>
> </TD>
> <TD COLSPAN=3
>
> <P><FONT
> FACE="Arial,Helvetica,Univers,Zurich BT,sans-serif" SIZE="-1">Usern
ame
will
> be your shown handle name for contacting you it must also be at least
4
> characters. Password must be at least 6 characters.</FONT></P>
> </TD>
> </TR>
> <TR>
> <TD WIDTH=24>
> <P> </
P>
> </TD>
> <TD WIDTH=179
>
> <P> </
P>
> </TD>
> <TD COLSPAN=2
>
> <P> </
P>
> </TD>
> </TR>
> <TR>
> <TD WIDTH=24>
> <P><B><FONT
> FACE="Arial,Helvetica,Univers,Zurich BT,sans-serif"
> SIZE="-1">15.</FONT></B></P>
> </TD>
> <TD WIDTH=179
>
> <input
> type="Submit" name="Submit" value="check">
> </TD>
> </tr>
> </table>
> </form>
> ----- Original Message -----
> From: "BILLY CRAVENS" <[EMAIL PROTECTED]>
> To: "CF-Talk" <[EMAIL PROTECTED]>
> Sent: Wednesday, December 19, 2001 10:43 AM
> Subject: Re: OT was wondering if any Javascript guru's could give me a
hand
> with this code
>
>
> > That's a whole lotta code. Have you tried placing alerts at differen
t
> > points to see where it breaks? In order to figure out where your cod
e
is
> > breaking, someone would have to either read all of your code, or
recreate
> > your form, since you didn't include the HTML. I doubt anyone will do
> > either.
> >
> > Also, have you tested the code with older IE browsers? (4,5,5.5) I'
m
> just
> > curious why you are using document.getElementById - as far as I know,
> > document.formName seems to work in all browsers.
> >
> > ---
> > Billy Cravens
> >
> > ----- Original Message -----
> > From: "Troy Montour" <[EMAIL PROTECTED]>
> > To: "CF-Talk" <[EMAIL PROTECTED]>
> > Sent: Wednesday, December 19, 2001 10:31 AM
> > Subject: OT was wondering if any Javascript guru's could give me a ha
nd
> with
> > this code
> >
> >
> > > Hello,
> > > sorry for the OT but only place I actually get some answers to
my
> > > questions.
> > >
> > > I was wondering if somebody code point me in the right direction wh
y
> > > this form Validation won't work in NS6 it works great in IE.
> > >
> > > in NS6 all it does is submit the form and no validation happens.
> > >
> > > I have tested the function with out the credit card info in it and
works
> > > and I also tested the credit card info by it self and that works fi
ne
> > > but with them combined it doesn't work.
> > >
> > > here is the code if you want to take a look hopefully someone can
point
> > > me in the right direction.
> > >
> > > <SCRIPT LANGUAGE="JavaScript">
> > > <!-- Begin
> > > function checkFields() {
> > > missinginfo = "";
> > >
> > > FormVar = document.getElementById("JoinForm");
> > > var Cards = new makeArray(8);
> > > Cards[0] = new CardType("MasterCard", "51,52,53,54,55", "16");
> > > var MasterCard = Cards[0];
> > > Cards[1] = new CardType("VisaCard", "4", "13,16");
> > > var VisaCard = Cards[1];
> > > Cards[2] = new CardType("AmExCard", "34,37", "15");
> > > var AmExCard = Cards[2];
> > > Cards[3] = new CardType("DinersClubCard", "30,36,38", "14");
> > > var DinersClubCard = Cards[3];
> > > Cards[4] = new CardType("DiscoverCard", "6011", "16");
> > > var DiscoverCard = Cards[4];
> > > Cards[5] = new CardType("enRouteCard", "2014,2149", "15");
> > > var enRouteCard = Cards[5];
> > > Cards[6] = new CardType("JCBCard", "3088,3096,3112,3158,3337,3528
",
> > > "16");
> > > var JCBCard = Cards[6];
> > > var LuhnCheckSum = Cards[7] = new CardType();
> > > var tmpyear;
> > > if ((FormVar.CardNumber.value.length == 0) ||
> > > (FormVar.CardNumber.value.Length < 16)) {
> > > missinginfo += "\n - Please enter a Card Number.";
> > > }
> > > if (FormVar.ExpYear.value.length == 4)
> > > tmpyear = FormVar.ExpYear.value;
> > > else {
> > > missinginfo += "\n - The Expiration Year is not valid.";
> > > }
> > > tmpmonth = FormVar.ExpMon.options[FormVar.ExpMon.selectedIndex].v
alue;
> > > // The following line doesn't work in IE3, you need to change it
> > > // to something like "(new CardType())...".
> > > // if (!CardType().isExpiryDate(tmpyear, tmpmonth)) {
> > > if (!(new CardType()).isExpiryDate(tmpyear, tmpmonth)) {
> > > missinginfo += "\n - This card has already expired.";
> > > }
> > >
> > > card = FormVar.CardType.options[FormVar.CardType.selectedIndex].v
alue;
> > > var retval = eval(card + ".checkCardNumber(\"" +
> > > FormVar.CardNumber.value +
> > > "\", " + tmpyear + ", " + tmpmonth + ");");
> > > cardname = "";
> > > if (retval)
> > > // comment this out if used on an order form
> > > /* missinginfo += "\n - This card number appears to be valid
";
> > > */;
> > > else {
> > > // The cardnumber has the valid luhn checksum, but we want to know
which
> > > // cardtype it belongs to.
> > > for (var n = 0; n < Cards.size; n++) {
> > > if (Cards[n].checkCardNumber(JoinForm.CardNumber.value, tmpyear,
> > > tmpmonth)) {
> > > cardname = Cards[n].getCardType();
> > > break;
> > > }
> > > }
> > > if (cardname.length > 0) {
> > > missinginfo += "\n - This looks like a " + cardname + " numb
er,
>
> <<<Additional text truncated.>>>
>
______________________________________________________________________
Get Your Own Dedicated Windows 2000 Server
PIII 800 / 256 MB RAM / 40 GB HD / 20 GB MO/XFER
Instant Activation � $99/Month � Free Setup
http://www.pennyhost.com/redirect.cfm?adcode=coldfusionb
FAQ: http://www.thenetprofits.co.uk/coldfusion/faq
Archives: http://www.mail-archive.com/[email protected]/
Unsubscribe: http://www.houseoffusion.com/index.cfm?sidebar=lists
