Rappel Connecter(NomDeLUtilisateur : Caractere, MotDePasse : Caractere);
Les paramètres NomUtilisateur et MotDePasse contiennent respectivement le nom de l'utilisateur demandé et son mot de passe.
La valeur de retour doit suivre la convention de fonctionnement de l'énuméré RappelReponse.
Cette méthode de rappel correspond à la réception des commandes :
/****************************************************************/
Rappel ClientMessagerie.Connecter(NomDeLUtilisateur : Caractere, MotDePasse : Caractere)
/* Objet : Connecte l'utilisateur. */
/****************************************************************/
Variable
/******/
MonClient : MonClientMessagerie;
U : Nul Ou Utilisateur;
Debut
EcrireExtension("AppMls", MonClient);
MonClient.Identification=Caractere(Ip1)+"."+Caractere(Ip2)+"."+Caractere(Ip3)+"."+Caractere(Ip4)+"/"+Caractere(Port, "&&&");
Si ActiverJournal Alors
EcrireJournal(MonClient, "Connecter("+NomDeLUtilisateur+")");
Fin Si
U=ChercherUtilisateur(NomDeLUtilisateur);
Si U==Nul Alors
Retourner RappelEchecFonctionnel;
Fin Si
MonClient.BoiteAuxLettres=BoiteAuxLettresElectronique(U, MotDePasse);
Retourner RappelSucces;
Fin Rappel
- | - | - | - | - | - | - | - | - |