function checkMail(fld_content)
  {
  var count,pt;
  var res;

    for(res=true,count=0;(count<fld_content.length)&&res;count++)
      {
      if(fld_content.charAt(count)=='@')
        break;

      if(
        (fld_content.charAt(count)!='.')&&(fld_content.charAt(count)!='_')&&(fld_content.charAt(count)!='-')&&
        ((fld_content.charAt(count)<'a')||(fld_content.charAt(count)>'z'))&&
        ((fld_content.charAt(count)<'A')||(fld_content.charAt(count)>'Z'))&&
        ((fld_content.charAt(count)<'0')||(fld_content.charAt(count)>'9'))
	)
	break;
      }

    if((fld_content.charAt(count)!='@')||(count==0))
      res=false;

    for(count++,pt=0;(count<fld_content.length)&&res;count++)
      {
      if(fld_content.charAt(count)=='.')
        pt=count;
      else if(
        (fld_content.charAt(count)!='.')&&(fld_content.charAt(count)!='_')&&(fld_content.charAt(count)!='-')&&
        ((fld_content.charAt(count)<'a')||(fld_content.charAt(count)>'z'))&&
        ((fld_content.charAt(count)<'A')||(fld_content.charAt(count)>'Z'))&&
        ((fld_content.charAt(count)<'0')||(fld_content.charAt(count)>'9'))
	)
	res=false;
      }

    if(!res||!pt||((count-pt)>5)||(count<fld_content.length))
      return(false);

  return(true);
}

function verifRadio(kel){
	trouve=false;
	for (i=0;i<kel.length;i++)
		if (kel[0].checked) trouve=0;
		if (kel[1].checked) trouve=1;
		if (kel[2].checked) trouve=2;
	return trouve;
}

	function verifRadi(kel){
	trouve=false;
	for (i=0;i<kel.length;i++)
		if (kel[i].checked) trouve=true;
	return trouve;
	}
	
function verifCheck(kol){
	accept=false;
//	for (i=0;i<kol.length;i++)
//		if (kol[i].checked) accept=true;
		if (kol.checked) accept=true;
	return accept;
}

function valide()
  {
	var numErrors = 0;
  var fin="\n";
  var intros="Ce champ est obligatoire :";
  var introp="Ces champs sont obligatoires :";
  var text="";
  var textMail="";
  var blanc='  ';
 // if (!document.formulaire.tracabilite.checked)
 // 	alert('Vous devez cocher : "Je souhaite être informé de toute l\'actualité de TRACABILITE 2004" pour vous inscrire');
 // else{
	  if(!verifRadi(document.formulaire.civilite)){
		text+="- civilité" + fin;
					numErrors++;}
	  if(document.formulaire.nom.value==""){
		text+="- nom" + fin;
					numErrors++;}
	  if(document.formulaire.prenom.value==""){
		text+="- prénom" + fin;
					numErrors++;}
	  if(document.formulaire.adresse.value==""){
		text+="- adresse" + fin;
					numErrors++;}
	  if(document.formulaire.code_postal.value==""){
		text+="- code postal" + fin;
					numErrors++;}
	  if(document.formulaire.ville.value==""){
		text+="- ville" + fin;
					numErrors++;}
	  if(document.formulaire.pays.value==""){
		text+="- pays" + fin;
					numErrors++;}
	  if(!checkMail(document.formulaire.dest.value)){
		text+="- e-mail" + fin;
					numErrors++;}
	  if((document.formulaire.messecr.value=="")&&(document.formulaire.fic.value=="")){
		text+="- texte du message ou" + fin + blanc + "saisie d'un fichier" + fin;
					numErrors++;}
					

	  if(text=="" && textMail=='')
		{
		 document.formulaire.submit();
		}
	  else{
	  if (numErrors>1) {
	  		text=introp+''+fin+''+text;
		textAlert=text+''+textMail;
		alert(textAlert);}
			
			else {
		  		text=intros+''+fin+''+text;		
		textAlert=text+''+textMail;
		alert(textAlert);
			}
		}
	}
function validecr()
  {
	var numErrors = 0;
  var fin="\n";
  var intros="Ce champ est obligatoire :";
  var introp="Ces champs sont obligatoires :";
  var text="";
  var textMail="";
  var blanc='  ';
 // if (!document.formulaire.tracabilite.checked)
 // 	alert('Vous devez cocher : "Je souhaite être informé de toute l\'actualité de TRACABILITE 2004" pour vous inscrire');
 // else{
	  if(!verifRadi(document.formulaire.civilite)){
		text+="- civilité" + fin;
					numErrors++;}
	  if(document.formulaire.nom.value==""){
		text+="- nom" + fin;
					numErrors++;}
	  if(document.formulaire.prenom.value==""){
		text+="- prénom" + fin;
					numErrors++;}
	  if(document.formulaire.adresse.value==""){
		text+="- adresse" + fin;
					numErrors++;}
	  if(document.formulaire.code_postal.value==""){
		text+="- code postal" + fin;
					numErrors++;}
	  if(document.formulaire.ville.value==""){
		text+="- ville" + fin;
					numErrors++;}
	  if(document.formulaire.pays.value==""){
		text+="- pays" + fin;
					numErrors++;}
	  if(!checkMail(document.formulaire.dest.value)){
		text+="- e-mail" + fin;
					numErrors++;}
	  if(document.formulaire.messecr.value==""){
		text+="- texte du message" + fin;
					numErrors++;}
					

	  if(text=="" && textMail=='')
		{
		 document.formulaire.submit();
		}
	  else{
	  if (numErrors>1) {
	  		text=introp+''+fin+''+text;
		textAlert=text+''+textMail;
		alert(textAlert);}
			
			else {
		  		text=intros+''+fin+''+text;		
		textAlert=text+''+textMail;
		alert(textAlert);
			}
		}
	}

  function busi()
  {
  document.formulaire.secteur.value = document.formulaire.activite.options[document.formulaire.activite.selectedIndex].value;
  }