function Ctrl_Envoi_Abonnement(){
var ind_ok = "O"

if (fr_courrier.ef_mail.value != "")
 {
  a=Ctl_Email(document.fr_courrier.ef_mail.value);
  if (a==1)
   {
    ind_ok = "N";
   }
 }

/* Pas de blocage, on envoie le devis */
if (ind_ok == "O")
        {
        fr_courrier.submit()
        }
}