// ********* creditcard: *************

cStr = alltrim(document.JoinForm.CREDITCARD.value);



cValFirstChar = "456"; // the first digit in a card must match 4, 5 or 6

cFirstChar = cStr.charAt(0);

//alert(cFirstChar);

nValFirstChar = cValFirstChar.indexOf(cFirstChar);

//alert(cValFirstChar + " " + nValFirstChar);

  if (cStr.length < 16 || cStr == "" || nValFirstChar < 0 )

{cErrStr = cErrStr + " \n * Please provide a valid CreditCard Number";}



var cBadChars = "!@#$%^&*()+=][}{';.,><|?~`'ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz";

cBadChars += '"';

for(x=1; x <= cBadChars.length; x++)

{

var cChar = cBadChars.charAt(x);

var nAtChar = cStr.indexOf(cChar);

if(nAtChar >= 1)

{

cErrStr = cErrStr + " \n * Your CreditCard number can contain only numbers, spaces, dashes or underscores.  No illegal characters permitted.";

break;

}

}



CCwithDigitsOnly = cleanCardNum(cStr);

if ( ! checkCardNumWithMod10(CCwithDigitsOnly) )

{

cErrStr = cErrStr + " \n * Your CreditCard number appears to be invalid.";

}



// ********* ccexpmonth: *************

nSelectedListBoxItem = document.forms['JoinForm'].CCEXPMONTH.selectedIndex ;

nCCMonth = document.JoinForm.CCEXPMONTH.options[nSelectedListBoxItem].value ;



// ********* ccexpyear: *************

nSelectedListBoxItem = document.forms['JoinForm'].CCEXPYEAR.selectedIndex ;

nCCYear = document.JoinForm.CCEXPYEAR.options[nSelectedListBoxItem].value ;



dToday = new Date();

todayYear = dToday.getFullYear();

dCCexpiry = GetCCexpiryDate(nCCMonth, nCCYear);



//alert("todayYear=" +todayYear +"\nnCCYear=" +nCCYear +"\ndToday=" + dToday +"\ndCCexpiry="+dCCexpiry);

if (todayYear > nCCYear || dToday > dCCexpiry)

{

cErrStr = cErrStr + " \n * Invalid CreditCard Expiration Date.";

}



return cErrStr;

}

function GetCCexpiryDate(nCCMonth, nCCYear)

{

var cMos = "December";



//alert("nCCMonth="+nCCMonth + "\nnCCYear=" + nCCYear);

//alert("typeof nCCMonth: "+ typeof(nCCMonth));



switch(nCCMonth)

{

case "Jan (01)":

cMos = "January";

break;

case "Feb (02)":

cMos = "February";

break;

case "Mar (03)":

cMos = "March";

break;

case "Apr (04)":

cMos = "April";

break;

case "May (05)":

cMos = "May";

break;

case "Jun (06)":

cMos = "June";

break;

case "Jul (07)":

cMos = "July";

break;

case "Aug (08)":

cMos = "August";

break;

case "Sep (09)":

cMos = "September";

break;

case "Oct (10)":

cMos = "October";

break;

case "Nov (11)":

cMos = "November";

break;

case "Dec (12)":

cMos = "December";

break;

default:

cMos = "November";

}



//alert("cMos="+cMos);

cDate = cMos + " 28, " + nCCYear;

//alert("cDate=" + cDate);

//dReturn = Date.parse(cDate);

dReturn = new Date(cDate);

//alert("dReturn=" + dReturn);





return dReturn;

}



function checkCardNumWithMod10(cardNum)

{

var i;

var cc = new Array(16);

var checksum = 0;

var validcc;



// assign each digit of the card number to a space in the array

for (i = 0; i < cardNum.length; i++) {

cc[i] = Math.floor(cardNum.substring(i, i+1));

}



// walk through every other digit doing our magic

// if the card number is sixteen digits then start at the

// first digit (position 0), otherwise start from the

// second (position 1)

for (i = (cardNum.length % 2); i < cardNum.length; i+=2) {

var a = cc[i] * 2;

if (a >= 10) {

var aStr = a.toString();

var b = aStr.substring(0,1);

var c = aStr.substring(1,2);

cc[i] = Math.floor(b) + Math.floor(c);

} else {

cc[i] = a;

}

}



// add up all of the digits in the array

for (i = 0; i < cardNum.length; i++) {

checksum += Math.floor(cc[i]);

}



// if the checksum is evenly divisble by 10

// then this is a valid card number

validcc = ((checksum % 10) == 0);



return validcc;

}



function cleanCardNum(cardNum) {

var i;

var ch;

var newCard = "";



// walk through the string character by character to build

// a new string with numbers only

i = 0;

while (i < cardNum.length) {

// get the current character

ch = cardNum.substring(i, i+1);

if ((ch >= "0") && (ch <= "9")) {

// if the current character is a digit then add it

// to the numbers-only string we're building

newCard += ch;

} else {

// not a digit, so check if its a dash or a space

if ((ch != " ") && (ch != "-")) {

// not a dash or a space so fail

//alert("The card number contains invalid characters.");

return "";

}

}

i++;

}



// we got here if we didn't fail, so return what we built

return newCard;

}



function checkCard(cardType, cardNum) {

var validCard;

var cardLength;

var cardLengthOK;

var cardStart;



var cardStartOK;



// check if the card type is valid

if ((cardType != "V") && (cardType != "M") && (cardType != "A") && (cardType != "D")) {

//alert("Please select a card type.");

return false;

}



// clean up any spaces or dashes in the card number

validCard = cleanCardNum(cardNum);

if (validCard != "") {

// check the first digit to see if it matches the card type

cardStart = validCard.substring(0,1);

cardStartOK = ( ((cardType == "V") && (cardStart == "4")) ||

((cardType == "M") && (cardStart == "5")) ||

((cardType == "A") && (cardStart == "3")) ||

((cardType == "D") && (cardStart == "6")) );

if (!(cardStartOK)) {

// card number's first digit doesn't match card type

alert("Please make sure the card number you've entered matched the card type you selected.");

return false;

}



// the card number is good now, so check to make sure

// it's a the right length

cardLength = validCard.length;

cardLengthOK = ( ((cardType == "V") && ((cardLength == 13) || (cardLength == 16))) ||

((cardType == "M") && (cardLength == 16)) ||

((cardType == "A") && (cardLength == 15)) ||

((cardType == "D") && (cardLength == 16)) );

if (!(cardLengthOK)) {

// not the right length

alert("Please make sure you've entered all of the digits on your card.");

return false;

}



// card number seems OK so do the Mod10

if (checkCardNumWithMod10(validCard)) {

return true;

} else {

alert("Please make sure you've entered your card number correctly.");

return false;

}

} else {

return false;

}

}



function alltrim(TRIM_VALUE)

{

if(TRIM_VALUE.length < 1)

{

return "";

}



TRIM_VALUE = RTrim(TRIM_VALUE);

TRIM_VALUE = LTrim(TRIM_VALUE);

if(TRIM_VALUE == "")

{

return "";

}

else

{

return TRIM_VALUE;

}

}



function RTrim(VALUE)

{

var w_space = String.fromCharCode(32);

var v_length = VALUE.length;

var strTemp = "";

if(v_length < 0)

{

return "";

}

var iTemp = v_length -1;



while(iTemp > -1)

{

if(VALUE.charAt(iTemp) == w_space)

{

}

else

{

strTemp = VALUE.substring(0,iTemp +1);

break;

}

iTemp = iTemp-1;

} //End While

return strTemp;

}



function LTrim(VALUE)

{

var w_space = String.fromCharCode(32);

if(v_length < 1)

{

return "";

}

var v_length = VALUE.length;

var strTemp = "";

var iTemp = 0;



while(iTemp < v_length)

{

if(VALUE.charAt(iTemp) == w_space)

{

}

else

{

strTemp = VALUE.substring(iTemp,v_length);

break;

}

iTemp = iTemp + 1;

} //End While

return strTemp;

}

//-->
https://     orders    .    webpower   .   com/    ifriends/    vpAdult  PUNTO  htm