/*
---------------------------------------------
-     This JS code was last modified by     -
-     Gianluigi Cosari on January  2002     -
-          E-mail: glcosari@isys.it         -
-       Subject : Active Document 3.0       -
---------------------------------------------
*/

// Fa la validazione dell'indirizzo di E-Mail
function ckEmailAddr(eAddr,lang){ // Gianluigi Cosari Set00
// Ritorna 0 se ok, >0 se non ok
	var DomainValidChars="1234567890abcdefghijklmnopqrstuvwxyz-.",UserValidChars=DomainValidChars+"_";
	var eInvalid=0,atPos,strCk;
	var msgEmpt="L'indirizzo di E-Mail è vuoto.",msgInva="L'indirizzo di E-Mail non è valido o contiene caratteri illegali.";
	if(lang=="en"){msgEmpt="The E-Mail address is empty.",msgInva="The E-Mail address is not valid or contains illegal characters.";
	}
	if(eAddr==""){alert(msgEmpt);return 1;
	}
	atPos=eAddr.indexOf("@");
	atPos!=eAddr.lastIndexOf("@")||atPos<1||atPos>(eAddr.length-5)?eInvalid+=1:null;
	strCk=eAddr.substring(0,atPos);
	for(i=0;i<strCk.length;i++){UserValidChars.indexOf(strCk.charAt(i))<0?eInvalid+= 1:null;
	}
	strCk=eAddr.slice(atPos+1);
	for(i=0;i<strCk.length;i++){DomainValidChars.indexOf(strCk.charAt(i))<0?eInvalid+=1:null;
	}
	strCk.indexOf(".")<0?eInvalid+=1:null;
		strCk=strCk.charAt(strCk.length-1);
	strCk=="."||strCk=="-"?eInvalid+=1:null;
	if(eInvalid!=0)
	{alert(msgInva);
		return 1;
	}
	return 0;
}