function emailCheck (emailStr) { 
var checkTLD=0; 
var knownDomsPat=/ ^(com|net|org|edu|int|mil|gov|arpa|biz|aero|name|coop|info|pro|museum|be|fr|nl|ch|eu)$/;

var emailPat=/^(.+)@(.+)$/; 
var specialChars="\\(\\)><@,;:\\\\\\\"\\.\\[\\]"; 
var validChars="\[^\\s" + specialChars + "\]"; 
var quotedUser="(\"[^\"]*\")"; 
var ipDomainPat=/^\[(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})\]$/; 
var atom=validChars + '+'; 
var word="(" + atom + "|" + quotedUser + ")"; 
var userPat=new RegExp("^" + word + "(\\." + word + ")*$"); 
var domainPat=new RegExp("^" + atom + "(\\." + atom +")*$"); 
var matchArray=emailStr.match(emailPat); 

if (emailStr=="") { 
 return true;
}

if (matchArray==null) { 
 alert("L'adresse e-mail n'est pas correcte");
 return false;
}
var user=matchArray[1]; 
var domain=matchArray[2]; 
for (i=0; i<user.length; i++) { 
 if (user.charCodeAt(i)>127) { 
  alert("Le user de l'adresse e-mail contient des caractères non corrects."); 
 return false; 
 } 
} 
for (i=0; i<domain.length; i++) { 
 if (domain.charCodeAt(i)>127) { 
  alert("Le domaine de l'adresse e-mail contient des caractères non corrects."); 
  return false; 
 } 
} 
if (user.match(userPat)==null) { 
 alert("Le user de l'adresse e-mail n'est pas correct."); 
 return false; 
} 
var IPArray=domain.match(ipDomainPat); 
if (IPArray!=null) { 
 for (var i=1;i<=4;i++) { 
  if (IPArray>255) { 
   alert("L'adresse IP de destination n'est pas correcte."); 
   return false; 
  } 
 } 
 return true; 
} 
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("Le nom de domaine de l'adresse e-mail n'est pas correct."); 
  return false; 
 } 
} 
//if (checkTLD && domArr[domArr.length-1].length!=2 && 
//domArr[domArr.length-1].search(knownDomsPat)==-1) { 
//alert("L'extention du domaine n'est pas correcte"); 
//return false; 
//} 
if (len<2) { 
 alert("Adresse e-mail non correcte."); 
 return false; 
 }
return true;
}
