function checkEmail(emailAddr) {
 // Cette fonction vérifie la bon format d'une adresse e-mail.
 // Comme :
 // user@domain.com ou user.perso@domain.com
 emailAddr = emailAddr.toLowerCase();
 var i;
 
 // Recherche de @
 i = emailAddr.indexOf("@");
 if (i == -1) {
  return false;
 }
 
 // Séparation du nom de l'utilisateur et du nom de domaine.
 var username = emailAddr.substring(0, i);
 var domain = emailAddr.substring(i + 1, emailAddr.length)
 
 // Recherche des espaces au début du nom de l'utilisateur.
 i = 0;
 while ((username.substring(i, i + 1) == " ") && (i < username.length)) {
  i++;
 }
 // Les enlève s'il en trouve.
 if (i > 0) {
  username = username.substring(i, username.length);
 }
 
 // Recherche d'espaces à la fin du nom de domaine.
 i = domain.length - 1;
 while ((domain.substring(i, i + 1) == " ") && (i >= 0)) {
  i--;
 }
 // Les enlève s'il en trouve.
 if (i < (domain.length - 1)) {
  domain = domain.substring(0, i + 1);
 }
 
 // Vérifie que le nom de l'utilisateur et du domaine ne soit pas vide.
 if ((username == "") || (domain == "")) {
  return false;
 }
 
 // Vérifie s'il n'y a pas de caractères interdits dans le nom de l'utilisateur.
 var ch;
 for (i = 0; i < username.length; i++) {
  ch = (username.substring(i, i + 1)).toLowerCase();
  if (!(((ch >= "a") && (ch <= "z")) || 
   ((ch >= "0") && (ch <= "9")) ||
   (ch == "_") || (ch == "-") || (ch == "."))) {
    return false;
  }
 }
 
 // Vérifie s'il n'y a pas de caractères interdits dans le nom de domaine
 for (i = 0; i < domain.length; i++) {
  ch = (domain.substring(i, i + 1)).toLowerCase();
  if (!(((ch >= "a") && (ch <= "z")) || 
   ((ch >= "0") && (ch <= "9")) ||
   (ch == "_") || (ch == "-") || (ch == "."))) {
    return false;
  }
 }
 
// Ajouter ci-dessous de nouveaux noms de domaine.
//
var aSuffix = new Array("com","net","int","aero","biz","museum","name","info","coop","pro","eu","edu","org","gov","mil","bj","dz","de","ad","be","ca","bf","bi","cm","cf","cg","cd","ci","dj","fr","ga","gp","gf","lu","mg","ml","ma","mq","mr","mc","nc","pf","re","pm","sn","ch","td","tf","tn","uk","se","it","es","gl","dk","no","se");
 var bFoundSuffix = false;
 i = 0;
 while (i < aSuffix.length) {
  if (("." + aSuffix[i]) == domain.substring(domain.length - aSuffix[i].length - 1, domain.length)) {
   return true;
  }
  i++;
 }
 // Si le nom de domaine est inconnu  : return false
 return false;
 
} 
 
 
function emailOK(emailAddr) {
 if (!(checkEmail(emailAddr))) {
  return false;
  //alert("Merci de vérifier votre adresse e-mail. Elle n\'est pas dans le bon format.");
 }
}