Naviguation dans :  Perl  JavaScript  Détail  - load.cgi?Appel=identAdmin
 présentée :  par cas d'appel   par traitements 
Retour à l'accueil
  
   
 Requêtes 

 load – Admin 

 identAdmin 

Requêtes de Ça-déménage.com
Accès professionnel
Identification
 submit | Finer | Errer | Execer | fromClient | toDBase | fromDBase | toClient 
 
 
 Bibliothèque CaD 

 Mail 

 Mailer 

Bibliothèque de Ça-déménage.com
Diverses fonctions de gestion des mails
Envoi d'un mail
 


 Mailer  Envoi d'un mail
Syntaxe Mailer(x)
Paramètres 
nom  type  Description 
 IN Mail à envoyer
retourne  OUT  0 : Traitement correct
2 : Erreur à l'envoi du mail
Fonctions util. 
 printLog Ecriture de la log
 nomBox Racine des adresses e-mail


Code Perl 

sub Mailer {local($x) = @_; 
 local $nomMail = '/usr/sbin/sendmail'; 
 open(MAIL,"|".$nomMail." -oi -t -f ".$nomBox."lookup\@ca-demenage.com") || return 2; print MAIL $x; close(MAIL);
 &printLog("Send","Log",$x);
 return 0;
}
Code JavaScript 

function Mailer(x) { 
 var nomMail = '/usr/sbin/sendmail'; 
 alert(x); 
 return 0;
}