function minuscule(texte){
	texte.value=texte.value.toLowerCase();
	} 

function bSyntaxeEmail(sMail){
	var re=/^[a-z\d]+((\.|-|_)[a-z\d]+)*@((?![-\d])[a-z\d-]{0,62}[a-z\d]\.){1,4}[a-z]{2,6}$/gi;
	return (sMail.match(re)==sMail)&&(sMail.substr(sMail.lastIndexOf("@")).length<=256);
}

function bDomainTLD(sMail){
	var re=/^(ac|ad|ae|af|ag|ai|al|am|an|ao|aq|ar|as|at|au|aw|az|ba|bb|bd|be|bf|bg|bh|bi|bj|bm|bn|bo|br|bs|bt|bv|bw|by|bz|ca|cat|cc|cd|cf|cg|ch|ci|ck|cl|cm|cn|co|cr|cu|cv|cx|cy|cz|de|dj|dk|dm|do|dz|ec|ee|eg|er|es|et|eu|fi|fj|fk|fm|fo|fr|ga|gd|ge|gf|gg|gh|gi|gl|gm|gn|gp|gq|gr|gs|gt|gu|gw|gy|hk|hm|hn|hr|ht|hu|id|ie|il|im|in|io|iq|ir|is|it|je|jm|jo|jp|ke|kg|kh|ki|km|kn|kp|kr|kw|ky|kz|la|lb|lc|li|lk|lr|ls|lt|lu|lv|ly|ma|mc|md|mg|mh|mk|ml|mm|mn|mo|mp|mq|mr|ms|mt|mu|mv|mw|mx|my|mz|na|nc|ne|nf|ng|ni|nl|no|np|nr|nu|nz|om|pa|pe|pf|pg|ph|pk|pl|pm|pn|pr|ps|pt|pw|py|qa|re|ro|ru|rw|sa|sb|sc|sd|se|sg|sh|si|sj|sk|sl|sm|sn|so|sr|st|su|sv|sy|sz|tc|td|tf|tg|th|tj|tk|tm|tn|to|tp|tr|tt|tv|tw|tz|ua|ug|uk|um|us|uy|uz|va|vc|ve|vg|vi|vn|vu|wf|ws|ye|yt|yu|za|zm|zw|aero|arpa|biz|com|coop|edu|eu|gov|info|int|mil|museum|name|net|org|pro|jobs|travel)$/gi;
	return sMail.substr(sMail.lastIndexOf(".") + 1).match(re)!=null;
}

function validation_mail(){
	champs00 = eval('document.forms["TheMail"].elements["form_mail"].value');

	ok_continue = 0;
	err_msg = 'Information :\n\n';

	if (champs00 == "" || champs00 == "votre mail" || champs00.length == 0)
		{
		err_msg = err_msg +'Merci d\'indiquer une adresse email\n';
		ok_continue = 1;
		}

	if(ok_continue == 0){
	  if (!bSyntaxeEmail(champs00)){
			err_msg = err_msg +'Votre mail est incorrect.\n\nVeuillez le vérifier.\n';
			ok_continue = 1;
			}
		}

	if(ok_continue == 0){
	  if (!bDomainTLD(champs00)){
			err_msg = err_msg +'Votre mail est incorrect.\n\nVeuillez vérifier l\'extension du nom de domaine.\n';
			ok_continue = 1;
	    }
		}

	if(ok_continue == 0)
		{
		return true;
		}
	else
		{
		alert(err_msg);
		document.forms["TheMail"].elements["form_mail"].focus();
		return false;
		}
}