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

 wsCaD_chgMail 

 passIdent 

 Requêtes de Ça-déménage.com
Requête d'envoi de mail
Passe le contrôle d'identifiant


 newUser  Passe le contrôle d'identifiant — Dépose-minute particulier
Syntaxe submit_mail()
Paramètres 
nom  type  Description 
–  IN Données issues du client
retourne  OUT  = "" : Traitement correct
chaîne non vide : Message d'erreur
Fonctions util. 
 idtCreer Crée un nouvel identifiant
 idtEcrire Ecrit un identifiant


Code Perl 


sub passIdent { 
 local($i); 
 $wwMsg = "8";
 if ($wwIdent eq "") {$i = &idtCreer($wwFrom,\$wwIdent,\$wwAuth)} else {$i = &idtEcrire($wwFrom,\$wwIdent,\$wwAuth)}; if ($i!=0) {return "9"};
 if ($wwFromId eq "") {$wwFromId = $wwIdent; $wwMsg .= $wwFromId};
 return '';
}
Code JavaScript 


function passIdent() { 
 var i; 
 wwMsg[0] = "8";
 if (wwIdent[0]=="") {i = idtCreer(wwFrom,wwIdent,wwAuth)} else {i = idtEcrire(wwFrom,wwIdent,wwAuth)}; if (i!=0) {return "9"};
 if (wwFromId=="") {wwFromId = wwIdent[0]; wwMsg[0] += wwFromId};
 return '';
}