1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18
| SI gpwOuvreConnexion("Maconnexion2","admin","","Denis-PC","Locastock_V3",hAccèsHFClientServeur,hOLectureEcriture)=Faux ALORS
Erreur(HErreurInfo(hErrComplet))
SINON
Info("Connexion ok") // A ce stade la connexion la connexion est faite
FIN
nRes4 est un entier = gpwOuvre(".\Gpw_Locastock_V3","TON_REPERTOIRE_DES_FICHIERS_UTILISATEURS")
// Si le login a échoué
SI nRes4 <> gpwOk ALORS
SELON nRes4
CAS gpwErreur : Erreur("Erreur à l'initialisation du groupware.")
CAS gpwUtilisateurInconnu : Erreur("Utilisateur inconnu.")
CAS gpwMotPasseInvalide : Erreur("Mot de passe invalide.")
FIN
FinProgramme()
SINON
//INFO("Cool")
FIN |
Partager