function MailOk(champ_mail) {
	
	if (champ_mail.value=="") {
	
		return false;
	}
	else {
		// si la valeur ne contient pas @ 
		if (champ_mail.value.indexOf("@")==-1) {
		
			champ_mail.focus();
			return false;
		}
		else {
			longueur = champ_mail.value.length;
			position = champ_mail.value.indexOf("@");
			left_str = champ_mail.value.substring(0,position);
			right_str = champ_mail.value.substring(position+1,longueur);
			left_len = left_str.length;
			right_len = right_str.length;
		
			// si la valeur gauche ou droite du @ est vide 
			if ((left_len==0) || (right_len==0)) {
			
				champ_mail.focus();
				return false;
			}
			else {
			// s'il n'y a pas de point 
				if (right_str.indexOf(".")==-1) {
				
					champ_mail.focus();
					return false;
				}
				else {
					right_longueur = right_str.length;
					right_position = right_str.lastIndexOf(".");
					l_right_str = right_str.substring(0,right_position);
					r_right_str = right_str.substring(right_position+1,right_longueur);
					l_right_len = l_right_str.length;
					r_right_len = r_right_str.length;
				
					// s'il y a au moins 2 lettres après le point 
					if ((r_right_len < 2)||(r_right_len > 4)) {
					
						champ_mail.focus();
						return false;
					}
					else {
						// s'il y a au moins 1 lettre après le point 
						if (l_right_len==0) {
						
							champ_mail.focus();
							return false;
						}
					}
				}
			}
		}
	}
	
	return true;
}