function veriform(form) {
	var MelRegExp = new RegExp('^[a-z0-9\._-]+@[a-z0-9\.-]{2,}\.[a-z]{2,3}$',"gi");

	ok = false ;
	switch (form.formulaire.value)
	{
	case 'page1': 
		societe=form.Societe.value.length>2;
		nom=form.Nom.value.length;
		prenom=form.Prenom.value.length;
		adr1=form.Adr1.value.length;
		adr2=form.Adr2.value.length;
		cp=form.Cp.value.length;
		ville=form.Ville.value.length;
		//APE = form.APE.value.length>2;
		//siret = form.Siret.value.length>2;
		//TVA = form.TVA.value.length>2;
		tel=form.Tel.value.length;
		email = MelRegExp.test(form.Email.value); 
		/*adr = cp && ville*/
		ok = societe && email;
		if ( !ok )
		{   
			alerte = "Compléter ou corriger :\r\n";	
      if (!societe) alerte += "- Votre societe\r\n";	
	  //if (!APE) alerte += "- Votre code APE\r\n";
	 // if (!siret) alerte += "- Votre SIRET\r\n";
	  //if (!TVA) alerte += "- Votre numéro de TVA Intracommunautaire\r\n";	 
	 /* if (!tel) alerte += "- Votre téléphone\r\n";*/
	  if (!email) alerte += "- Votre email\r\n";
       
			
		   alert(alerte);
		}
		break;
	
	
	case 'contact': 
		email = MelRegExp.test(form.Email.value); 
		nom=form.Nom.value.length>2;
		message=form.Message.value.length>2;

		ok = email && nom && message;
		if ( !ok )
		{   
			alerte = "Compléter ou corriger :\r\n";	
      if (!nom) alerte += "- Votre nom\r\n";	
			if (!email) alerte += "- Votre email\r\n";	
      if (!message) alerte += "- Votre message\r\n";		
			alert(alerte);
		}
		break;
	case 'hotline': 
		email = MelRegExp.test(form.Email.value); 
		nom=form.Nom.value.length>2;
		produit=form.Produit.value.length>3;
		version=form.Version.value.length>2;
		message=form.Message.value.length>5;

		ok = email && nom && produit && version && message;
		if ( !ok )
		{   
			alerte = "Compléter ou corriger :\r\n";	
      if (!nom) alerte += "- Votre nom\r\n";	
			if (!email) alerte += "- Votre email\r\n";	
			if (!produit) alerte += "- Votre produit\r\n";	
			if (!version) alerte += "- Le version de votre produit\r\n";	
      if (!message) alerte += "- Votre problème\r\n";		
			alert(alerte);
		}
		break;		
	case 'maj': 
		email = MelRegExp.test(form.Email.value); 
		nom=form.Nom.value.length>2;
		produit=form.Produit.value.length>3;
		version=form.Version.value.length>2;

		ok = email && nom && produit && version;
		if ( !ok )
		{   
			alerte = "Compléter ou corriger :\r\n";	
      if (!nom) alerte += "- Votre nom\r\n";	
			if (!email) alerte += "- Votre email\r\n";	
			if (!produit) alerte += "- Votre produit\r\n";	
			if (!version) alerte += "- Le version de votre produit\r\n";		
			alert(alerte);
		}
		break;		
	}
	return ok ;
}