<!--

	function Send(pForm,pChampsRequired){
		if(CheckForm(pForm,pChampsRequired)){
			pForm.submit();
			}
		}
		
	//----------
	
	function Init(pForm,pChampsInit){
		var champsName=String(pChampsInit).split(/##/);
		var i;
		
		//----------
		
		if (!pChampsInit) return;
		for(i=0;i<champsName.length;i++){
			switch (pForm.elements[champsName[i]].type){
				case "select-one":
					pForm.elements[champsName[i]].selectedIndex=0;
					break;
				case "hidden":
					break;
				default:
					pForm.elements[champsName[i]].value="";
				}
			}
		}
		
	//----------
	
	function CheckForm(pForm,pChampsRequired){
		var champsName=String(pChampsRequired).split(/##/);
		var champsToFill=new Array();
		var champs;
		var i,j=0;
	
		//----------
		
		for (i=0;i<champsName.length;i++){
			if (pForm.elements[champsName[i]].value=="")
				champsToFill[j++]=champsName[i];
			}
		if (champsToFill!=""){
			alert(displayChampsToFill(champsToFill));
			return false;
			}
		//pForm.elements['champsNameRequired'].value="";
		return true;
		}
		
	//----------
	
	function displayChampsToFill(pChamps){
		var list="Champ(s) manquant(s):\n";
		var i;
		
		//----------
		
		for(i=0;i<pChamps.length;i++)
			list=list.concat("    " + pChamps[i] + "\n");
		return list;
		}
		
	//----------
	
	function checkMail(p_mail){
		var adresse=new Array();
		var chars=new Array("é","è","ê","ë","à","â","ä","î","ï","ô","ö","û","ü","ù","ç",";"," ",":",",","/");
		var i,n;
		var indice=true;
		
		//----------
		
		if (p_mail.lastIndexOf(".")==p_mail.length-1 || p_mail.indexOf(".")==1)n=0;
		adresse=split(p_mail,"@");
		n=adresse.length;
		if (n==2){
			if (adresse[0].length==0 || adresse[1].length==0) indice=false;
			if (adresse[1].indexOf(".")==-1) indice=false;
			if (adresse[0].substring(0,1)=="." || adresse[0].substring(adresse[0].length,adresse[0].length-1)=="." || adresse[1].substring(0,1)=="." || adresse[1].substring(adresse[1].length,adresse[1].length-1)==".") indice=false;
			for (i=0;i<chars.length;i++){
				if (adresse[0].indexOf(chars[i])>-1 || adresse[1].indexOf(chars[i])>-1) indice=false;
				}
			}
		else indice=false;
		return indice;
		}
		
//-->
