cook = document.cookie;
dateExp = new Date(2020,11,11);
dateExp = dateExp.toGMTString();

function recup(libelle)
{
	libelle += "=";

	plac = cook.indexOf(libelle,0);
	if (plac <= -1) 
	{
		return "";
	}
	else 
	{
		
		end = cook.indexOf(";",plac);
		if (end <= -1) end = cook.length;
		//alert (cook+' -- '+plac+' -- '+end+' -- '+cook.substring(plac,end));
		return cook.substring(plac+libelle.length, end);
	}
}

function RecupDataAll(formul)
{
  formul.Email.value = recup("email");
  formul.Nom.value = recup("nom");
  formul.Prenom.value = recup("prenom");
  formul.Adr1.value = recup("adr1");
  formul.Adr2.value = recup("adr2");
  formul.Cp.value = recup("cp");
  formul.Ville.value = recup("ville");
  formul.Pays.value = recup("pays");
  formul.Tel.value = recup("tel");
}

function RecupDataAllNonVide(formul)
{
  if (formul.Email.value == "") formul.Email.value = recup("email");
  if (formul.Nom.value == "") formul.Nom.value = recup("nom");
  if (formul.Prenom.value == "") formul.Prenom.value = recup("prenom");
  if (formul.Adr1.value == "") formul.Adr1.value = recup("adr1");
  if (formul.Adr2.value == "") formul.Adr2.value = recup("adr2");
  if (formul.Cp.value == "") formul.Cp.value = recup("cp");
  if (formul.Ville.value == "") formul.Ville.value = recup("ville");
  if (formul.Pays.value == "") formul.Pays.value = recup("pays");
  if (formul.Tel.value == "") formul.Tel.value = recup("tel");
}

function c_chn_cook(chmp,etiq) 
{
 if (chmp.value != "") 
  document.cookie = etiq +'='+ chmp.value + '; expires=' + dateExp + ';';  
}

function SendFormAll(formul)
{
 c_chn_cook(formul.Email, 'email');
 c_chn_cook(formul.Nom, 'nom');
 c_chn_cook(formul.Prenom, 'prenom');
 c_chn_cook(formul.Adr1, 'adr1');
 c_chn_cook(formul.Adr2, 'adr2');
 c_chn_cook(formul.Cp, 'cp');
 c_chn_cook(formul.Ville, 'ville');
 c_chn_cook(formul.Pays, 'pays');
 c_chn_cook(formul.Tel, 'tel');
 
 formul.provenance.value = recup("provena");
 formul.nbvisite.value = recup("pagearr");
 formul.pagearrive.value = recup("nbvisit");
 
 if (EmailOk(formul.Email.value) == true)
   formul.submit();
}

function TestChp(chp,texte)
{
 if (chp.value == "")
  return "Vous devez renseigner la rubrique : "+texte+"\n";
 else return ""; 
}

function SendFormAllCtrlAdr(formul)
{
var res;
 res = "";
 res = res + TestChp(formul.Nom,"Nom");
 res = res + TestChp(formul.Adr1,"Adr1");
 res = res + TestChp(formul.Cp,"Cp");
 res = res + TestChp(formul.Ville,"Ville");
 res = res + TestChp(formul.Email,"E-mail"); 	
 
 if (res != "") {
  alert(res);
  return false;
 }
 	
 SendFormAll(formul);
}
function checktout(formul)
{
var res;
 res = "";
 res = res + TestChp(formul.Nom,"Nom");
 res = res + TestChp(formul.Adr1,"Adr1");
 res = res + TestChp(formul.Cp,"Cp");
 res = res + TestChp(formul.Ville,"Ville");
 res = res + TestChp(formul.Email,"E-mail"); 	
 
 if (res != "") {
  alert(res);
  return false;
 }
}
function validation (formul)
{
	checktout(formul);
	if (checktout(formul)==true) {
		SendFormAll(formul);
		formul.action="http://cdip.com/cgi-bin/cgi_comm"
		formul.method="POST"
		formul.submit();
	}
}