var NOMBRE_CLICKS = 0 ;var CTRL_ON_OFF_FL = 1 ;function ctrl_on_off() {if(CTRL_ON_OFF_FL == 1) {CTRL_ON_OFF_FL = 0 ;alert('Messages d\'erreur désactivés.\nPour les réactiver, cliquez à nouveau. ') ;}else{CTRL_ON_OFF_FL = 1 ;alert('Messages d\'erreur activés. \n(usage normal) ') ;}return false ;}function valider_test_lg(nom_tst, msg_tst, lg_mini_tst) {var ok_tst = true ;if(typeof(nom_tst) == 'undefined') return true ;if(typeof(nom_tst.value) == 'undefined') return true ;else if(nom_tst.value.length < lg_mini_tst) ok_tst = false ;if(! ok_tst) {alert(msg_tst + '... ') ;nom_tst.focus() ;return false ;}return true ;}function valider(ffrm) {if(NOMBRE_CLICKS > 0) {if(NOMBRE_CLICKS < 3) {NOMBRE_CLICKS ++ ;return(false) ;}alert("Veuillez patienter S.V.P. ") ;return (false);}if(CTRL_ON_OFF_FL == 0) return true ;if(!test_e_mail(ffrm.email, 1)) return false ;if(!test_e_mail(ffrm.email1,0)) return false ;if(!test_e_mail(ffrm.email2,0)) return false ;if(!test_e_mail(ffrm.email3,0)) return false ;if(!test_e_mail(ffrm.email4,0)) return false ;if(!test_e_mail(ffrm.email5,0)) return false ;if(! valider_test_lg(ffrm.marque, 'marque incomplete', 2)) return false ;if(! valider_test_lg(ffrm.modele, 'modele incomplet', 2)) return false ;if(! valider_test_lg(ffrm.Km, 'Km garantis incomplets', 5)) return false ;if(! valider_test_lg(ffrm.annee, 'annee incomplete', 2)) return false ;if(! valider_test_lg(ffrm.Euros, 'prix Euros incomplet', 4)) return false ;if(! valider_test_lg(ffrm.Garage, 'Nom du Garage incomplet', 6)) return false ;if(! valider_test_lg(ffrm.Telephone, 'No téléphone FIXE incomplet', 10)) return false ;if(! valider_test_lg(ffrm.message, 'message incomplet', 5)) return false ;NOMBRE_CLICKS ++ ;return true ;}function test_e_mail(champ_form,obligatoire) {if(typeof(champ_form) == 'undefined') return true ;var e_mail = champ_form.value ;if((! obligatoire) && (e_mail == '')) return true ;var ret = false, tmp = "", tmpleft = "", tmpright = "", ps = 0 ;tmp = e_mail.toLowerCase() ;while (1) {ps = tmp.indexOf(" ") ;if(ps == -1) break ;tmpleft = tmp.substring(0, ps) ;tmpright = tmp.substring(ps + 1) ;tmp = tmpleft + tmpright ;}ps = tmp.indexOf("www") ;if(ps != -1) { ret = confirm('L\'adresse e-mail ne doit pas contenir "www".\n\nCliquez sur :\n[ OK ] pour corriger ou [Annuler] pour annuler ce message.') ;if(ret){ champ_form.focus() ; champ_form.select() ; return false ; }}ps = tmp.indexOf("http") ;if(ps != -1) { ret = confirm('L\'adresse e-mail ne doit pas contenir "http".\n\nCliquez sur :\n[ OK ] pour corriger ou [Annuler] pour annuler ce message.') ;if(ret){ champ_form.focus() ; champ_form.select() ; return false ; }}ps = tmp.indexOf("starmoteurs@") ;if(ps == -1 ) ps = tmp.indexOf("starmoteur@") ;if(ps == -1 ) ps = tmp.indexOf("star.moteur@") ;if(ps == -1 ) ps = tmp.indexOf("star.moteurs@") ;if(ps == -1 ) ps = tmp.indexOf("carsandtrucks@ifrance.com") ;if(ps != -1 ) {alert(" utilisateur non autorisé "); return false ;}e_mail = tmp ; var email_ok_tst = true ;champ_form.value = e_mail ;tmp = escape(e_mail) ;ps = tmp.indexOf("%40") ;if(ps != -1) {tmpleft = tmp.substring(0, ps) ;tmpright = tmp.substring(ps + 3) ;tmp = tmpleft + "@" + tmpright ;}ps = tmp.indexOf("%") ; if(ps != -1) email_ok_tst = false ;ps = tmp.indexOf("/") ; if(ps != -1) email_ok_tst = false ;ps = tmp.indexOf("*") ; if(ps != -1) email_ok_tst = false ;ps = tmp.indexOf("+") ; if(ps != -1) email_ok_tst = false ;ps = e_mail.indexOf('@') ;if(e_mail.indexOf('@') < 2) email_ok_tst = false ;ps = e_mail.length - e_mail.lastIndexOf('.') ;if(ps > 7) email_ok_tst = false ;if(ps < 3) email_ok_tst = false ;if(! email_ok_tst) {alert("adresse e-mail incorrecte ") ;champ_form.focus() ;champ_form.select() ;}return email_ok_tst ;}
