function isEmail(emailAddress){
	emailAddressValue=emailAddress.value.toLowerCase();
	var countryTLDs=/^(ac|ad|ae|af|ag|ai|al|am|an|ao|aq|ar|as|at|au|aw|az|ba|bb|bd|be|bf|bg|bh|bi|bj|bm|bn|bo|br|bs|bt|bv|bw|by|bz|ca|cat|cc|cd|cf|cg|ch|ci|ck|cl|cm|cn|co|cr|cu|cv|cx|cy|cz|de|dj|dk|dm|do|dz|ec|ee|eg|eh|er|es|et|eu|fi|fj|fk|fm|fo|fr|ga|gd|ge|gf|gg|gh|gi|gl|gm|gn|gp|gq|gr|gs|gt|gu|gw|gy|hk|hm|hn|hr|ht|hu|id|ie|il|im|in|io|iq|ir|is|it|je|jm|jo|jp|ke|kg|kh|ki|km|kn|kp|kr|kw|ky|kz|la|lb|lc|li|lk|lr|ls|lt|lu|lv|ly|ma|mc|md|me|mg|mh|mk|ml|mm|mn|mo|mp|mq|mr|ms|mt|mu|mv|mw|mx|my|mz|na|nc|ne|nf|ng|ni|nl|no|np|nr|nu|nz|om|pa|pe|pf|pg|ph|pk|pl|pm|pn|pr|ps|pt|pw|py|qa|re|ro|rs|ru|rw|sa|sb|sc|sd|se|sg|sh|si|sj|sk|sl|sm|sn|so|sr|st|sv|sy|sz|tc|td|tf|tg|th|tj|tk|tm|tn|to|tp|tr|tt|tv|tw|tz|ua|ug|uk|um|us|uy|uz|va|vc|ve|vg|vi|vn|vu|wf|ws|ye|yt|yu|za|zm|zw)$/;
	var gTLDs=/^(aero|asia|biz|cat|com|coop|edu|geo|gov|info|int|jobs|mil|mobi|museum|name|net|org|post|pro|tel|travel)$/;
	var basicAddress=/^(.+)@(.+)$/;
	var specialChars='\\(\\)><@,;:\\\\\\\"\\.\\[\\]';
	var validChars='\[^\\s'+specialChars+'\]';
	var validCharset='ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyzöå0123456789\'-_.+';
	var quotedUser='(\"[^\"]*\")';
	var atom=validChars+'+';
	var word='('+atom+'|'+quotedUser+')';
	var validUser=new RegExp('^'+word+'(\.'+word+')*$');
	var symDomain=new RegExp('^'+atom+'(\.'+atom+')*$');
	var matchArray=emailAddressValue.match(basicAddress);
	if(emailAddress.value==''||emailAddress==null){
		return true;
	}
	if(matchArray==null){
		alert('The Email address doesn\'t seem to be correct,\nplease check syntax.');
		emailAddress.focus();
		return false;
	}else{
		var user=matchArray[1];
		var domain=matchArray[2];
		for(i=0;i<user.length;i++){
			if(validCharset.indexOf(user.charAt(i))==-1){
				alert('The Email address contains invalid characters,\nplease check the username.');
				emailAddress.focus();
				return false;
			}
		}
		for(i=0;i<domain.length;i++){
			if(validCharset.indexOf(domain.charAt(i))==-1){
				alert('The Email address contains invalid characters,\nplease check the domain.');
				emailAddress.focus();
				return false;
			}
		}
		if(user.match(validUser)==null){
			alert('The Email address doesn\'t seem to be correct,\nplease check the username.');
			emailAddress.focus();
			return false;
		}
		var atomPat=new RegExp('^'+atom+'$');
		var domArr=domain.split('.');
		var len=domArr.length;
		for(i=0;i<len;i++){
			if(domArr[i].search(atomPat)==-1){
				alert('The Email address doesn\'t seem to be correct,\nplease check the domain name.');
				emailAddress.focus();
				return false;
			}
		}
		if((domArr[domArr.length-1].length==2)&&(domArr[domArr.length-1].search(countryTLDs)==-1)){
			alert('The Email address doesn\'t seem to be correct,\nplease check domain suffix.');
			emailAddress.focus();
			return false;
		}
		if((domArr[domArr.length-1].length>2)&&(domArr[domArr.length-1].search(gTLDs)==-1)){
			alert('The Email address doesn\'t seem to be correct,\nplease check domain suffix.');
			emailAddress.focus();
			return false;
		}
		if((domArr[domArr.length-1].length<2)||(domArr[domArr.length-1].length>6)){
			alert('The Email address doesn\'t seem to be correct,\nplease check domain suffix.');
			emailAddress.focus();
			return false;
		}
		if(len<2){
			alert('The Email address doesn\'t seem to be correct,\nplease check missing hostname.');
			emailAddress.focus();
			return false;
		}
	}
	return true;
}
String.prototype.trim = function() { return this.replace(/^\s*(\b.*\b|)\s*$/, "$1");	}
function mandatoryText(input,fieldName){
	if(input.value.trim()==''||input==null){
		alert('Please enter your '+fieldName+'.');
		input.focus();
		return false;
	} else {
		return true;
	}
}
function validForm(){
	if(!mandatoryText(document.getElementById('EMAIL_FIELD'), 'Email Address')) return;
	if(!isEmail(document.getElementById('EMAIL_FIELD'))) return;
	document.getElementById('emvForm').submit();
}

function popUp(URL) {
	day = new Date();
	id = day.getTime();
	eval("page" + id + " = window.open(URL, '" + id + "', 'toolbar=1,scrollbars=1,location=0,statusbar=0,menubar=0,resizable=0,left=50,top=50,width=350,height=400');");
}

function checkTextRequired(obj, str) {
	if (obj.value=="")
	{
		alert(str);
		obj.focus();
		return false;
	}
	return true;
}

function checkTextLengthMin(obj, len, str) {
	if (obj.value.length < len) {
		alert(str)
		obj.focus();
		return false;
	}
	return true;
}

function checkTextLengthMax(obj, len, str) {
	if (obj.value.length > len) {
		alert(str)
		obj.focus();
		return false;
	}
	return true;
}

function checkTextValidChar(obj, str) {
	var checkOK = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz1234567890-ÄSÿÎZÿsÿÏzÿÙËçåÌ€�®‚éƒæèíêëì<ETH>„ñîïÍ…¯ôòó†Y«<THORN>§ˆ‡‰‹ŠŒ¾��Ž�‘“’”•<eth>–˜—™›š¿�œžŸy«<thorn> \t\r\n\f";
	var checkStr = obj.value;
	var allValid = true;
	for (i = 0;  i < checkStr.length;  i++)
	{
		ch = checkStr.charAt(i);
		for (j = 0;  j < checkOK.length;  j++)
			if (ch == checkOK.charAt(j))
				break;
		if (j == checkOK.length)
		{
			allValid = false;
			break;
		}
	}
	if (!allValid)
	{
		alert(str + ", " + ch);
		obj.focus();
		return false;
	}
	return true;
}

var frmUnsubFieldEmail = new Object;
frmUnsubFieldEmail.Keycode = false;
frmUnsubFieldEmail.Email = true;
frmUnsubFieldEmail.Email2 = true;
frmUnsubFieldEmail.Address1 = false;
frmUnsubFieldEmail.Address2 = false;
frmUnsubFieldEmail.City = false;
frmUnsubFieldEmail.State = false;
frmUnsubFieldEmail.Zip = false;
frmUnsubFieldEmail.Comments = false;
var frmUnsubFieldMail = new Object;
frmUnsubFieldMail.Keycode = true;
frmUnsubFieldMail.Email = false;
frmUnsubFieldMail.Email2 = false;
frmUnsubFieldMail.Address1 = true;
frmUnsubFieldMail.Address2 = true;
frmUnsubFieldMail.City = true;
frmUnsubFieldMail.State = true;
frmUnsubFieldMail.Zip = true;
frmUnsubFieldMail.Comments = true;
var frmUnsubFieldBoth = new Object;
frmUnsubFieldBoth.Keycode = true;
frmUnsubFieldBoth.Email = true;
frmUnsubFieldBoth.Email2 = true;
frmUnsubFieldBoth.Address1 = true;
frmUnsubFieldBoth.Address2 = true;
frmUnsubFieldBoth.City = true;
frmUnsubFieldBoth.State = true;
frmUnsubFieldBoth.Zip = true;
frmUnsubFieldBoth.Comments = true;

var objUnsubType = frmUnsubFieldEmail;

function rdoType_onchange(rdo)
{
	if (rdo==undefined) {
		if ($('rdoTypeMail').checked)
			rdo = $('rdoTypeMail');
		else if ($('rdoTypeBoth').checked)
			rdo = $('rdoTypeBoth');
		else
		{
			rdo = $('rdoTypeEmail');
			rdo.checked = true;
		}
	}
	if (rdo.value=='mail')
		objUnsubType = frmUnsubFieldMail;
	else if (rdo.value=='both')
		objUnsubType = frmUnsubFieldBoth;
	else
		objUnsubType = frmUnsubFieldEmail;
	$('rowKeycode').style.display = (objUnsubType.Keycode) ? '' : 'none';
	$('rowEmail').style.display = (objUnsubType.Email) ? '' : 'none';
	$('rowEmail2').style.display = (objUnsubType.Email2) ? '' : 'none';
	$('rowAddress1').style.display = (objUnsubType.Address1) ? '' : 'none';
	$('rowAddress2').style.display = (objUnsubType.Address2) ? '' : 'none';
	$('rowCity').style.display = (objUnsubType.City) ? '' : 'none';
	$('rowState').style.display = (objUnsubType.State) ? '' : 'none';
	$('rowZip').style.display = (objUnsubType.Zip) ? '' : 'none';
	$('rowComments').style.display = (objUnsubType.Comments) ? '' : 'none';
}

function frmUnsubscribe_Validator(theForm)
{
	if (!checkTextRequired($('FirstName'), "Please enter a value for the \"First Name\" field."))
		return false;
	if (!checkTextLengthMax($('FirstName'), 15, "Please enter at most 15 characters in the \"First Name\" field."))
		return false;
	if (!checkTextValidChar($('FirstName'), "Please enter only letter and whitespace characters in the \"First Name\" field."))
		return false;
	if (!checkTextRequired($('LastName'), "Please enter a value for the \"Last Name\" field."))
		return false;
	if (!checkTextLengthMin($('LastName'), 3, "Please enter at least 3 characters in the \"Last Name\" field."))
		return false;
	if (!checkTextLengthMax($('LastName'), 30, "Please enter at most 30 characters in the \"Last Name\" field."))
		return false;
	if (!checkTextValidChar($('LastName'), "Please enter only letter and whitespace characters in the \"Last Name\" field."))
		return false;
	if (objUnsubType.Email)
	{
		if (!checkTextRequired($('email'), "Please enter your email address in the \"email address\" field."))
			return false;
	}
	if (objUnsubType.Email2)
	{
		if (!checkTextRequired($('email2'), "Please enter your email address in the \"email address\" field."))
			return false;
	}
	if (objUnsubType.Email && objUnsubType.Email2)
	{
		if (theForm.email.value != theForm.email2.value)
		{
			alert("The two email addresses are not the same.");
			theForm.email2.focus();
			return false;
		}
	}
	if (objUnsubType.Address1)
	{
		if (!checkTextRequired($('address1'), "Please enter a value for the \"Address 1\" field."))
			return false;
		if (!checkTextLengthMin($('address1'), 3, "Please enter at least 3 characters in the \"Address 1\" field."))
			return false;
		if (!checkTextValidChar($('address1'), "Please enter only letter and whitespace characters in the \"Address 1\" field."))
			return false;
	}
	if (objUnsubType.Address2)
	{
		if ($('address2').value!='')
		{
			if (!checkTextValidChar($('address2'), "Please enter only letter and whitespace characters in the \"Address 2\" field."))
				return false;
		}
	}
	if (objUnsubType.City)
	{
		if (!checkTextRequired($('city'), "Please enter a value for the \"City\" field."))
			return false;
		if (!checkTextLengthMin($('city'), 3, "Please enter at least 3 characters in the \"City\" field."))
			return false;
		if (!checkTextValidChar($('city'), "Please enter only letter and whitespace characters in the \"City\" field."))
			return false;
	}
	if (objUnsubType.State)
	{
		if (!checkTextRequired($('state'), "Please enter a value for the \"State\" field."))
			return false;
	}
	if (objUnsubType.Zip)
	{
		if (!checkTextRequired($('zip'), "Please enter a value for the \"Zip\" field."))
			return false;
		if (!checkTextLengthMin($('zip'), 2, "Please enter at least 2 characters in the \"Zip\" field."))
			return false;
		if (!checkTextValidChar($('zip'), "Please enter only letter and whitespace characters in the \"Zip\" field."))
			return false;
	}

  return (true);
}