Perl-JavaScript - Requêtes > wsCaD_chgMail > newUser

Naviguation dans :	Perl	JavaScript	Détail	- wsCaD_chgMail.cgi?Appel=newUser
présentée :	par cas d'appel par traitements

newUser

Requêtes de Ça-déménage.com
Requête d'envoi de mail
Dépose-minute particulier

passIdent

Dépose-minute particulier — Passe le contrôle d'identifiant

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 '';
}