// JavaScript Document
<!--
 function Trim(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;
     }
} //End Function

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;
} //End Function

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;
} //End Function

function ControllaEmail(stringa) {
var v_stringa=stringa;
var v_stringa=Trim(v_stringa);
var v_lunghezza=v_stringa.length
var v_chiocciola="@"
var v_punto="."
var e_manca=0;
var e_manca2=0;
var v_pezzi;
var v_pezzi2;
var v_prima="";
var v_seconda="";
var v_terza="";
var v_dominio1="";
var v_dominio2="";
var v_ciclo;
var NoCar="|!£$%&/()=?^\'ìè+é*[]òàùç°§#,;: ";
var e_Alert="email invalida\n";
var e_Alert2="";

if (v_lunghezza>8) { // se l'email e' lunga abbastanza
	if (v_stringa.indexOf(v_chiocciola)==-1){ // ci dev'essere @
		e_manca=1;
		} else {
			if (v_stringa.indexOf(v_chiocciola)==0){ // la @ non puo' andare per prima
				e_manca=1;
			}
			if (v_stringa.indexOf(v_chiocciola)>=(v_lunghezza-5)){ // la @ e' troppo vicina alla fine
				e_manca=1;
			}
			v_pezzi=v_stringa.split(v_chiocciola); // spezziamo l'email in due
			v_prima=v_pezzi[0];
			v_seconda=v_pezzi[1];
			if ((!v_prima.length==0) && (!v_seconda.length==0)) {
				if (v_seconda.indexOf(v_punto)==-1){ // non c'e' il punto nella seconda parte
					e_manca=1;
					e_Alert="devi dare un'email valida";
					} else {
						v_pezzi2=v_seconda.split(v_punto);
						v_dominio2=v_pezzi2[0];
						v_dominio1=v_pezzi2[1];
						if (v_dominio1.length<2) { // il top level domain e' troppo corto
							e_manca=1;
						}
						if (v_dominio2.length<3) { // il secondo level domain e' troppo corto
							e_manca=1;
						}
				}
				for (var v_ciclo=0; v_ciclo < v_stringa.length; v_ciclo++) { // caratteri invalidi
					var carattere = v_stringa.charAt(v_ciclo).toLowerCase();
					if (NoCar.indexOf(carattere) != -1) {
						e_Alert2=e_Alert2 + carattere + " ";
						e_manca=1;
						e_manca2=1;
					}
				}
				if (e_manca2==1) {
					e_Alert2="caratteri invalidi: '" + e_Alert2 + "'";
					e_Alert=e_Alert + e_Alert2;
				}
			} else { // se primo o secondo pezzo e' vuoto
			e_manca=1;
			}
		}
	} else { // se l'email non ha almeno 8 caratteri
	e_manca=1;
	e_Alert="devi dare un'email valida";
	}
	if (e_manca==1) {
		return false
	} else {
		return true
}
}
-->
