PC SOFT

DOCUMENTATION EN LIGNE
DE WINDEVWEBDEV ET WINDEV MOBILE

  • Utilisation d'un Webservice
DéclareContexteWebservice (Exemple)
Utilisation d'un Webservice
Cet exemple permet de lancer un Webservice avec toutes les initialisations nécessaires.
//-----Déclarations globales du Webservice
// Nom du client
gsNomClient est une chaîne
// Gestion du nom du client :
// si le nom du client est déjà renseigné,
// cela signifie que l'utilisateur est déjà authentifié
DéclareContexteWebservice(gsNomClient)
//---- Procédure globale Connexion au Webservice,
// à appeler une fois pour initialiser le Webservice
PROCÉDURE Connexion(sUtilisateur, sMotDePasse)
// Vérifie que le client existe
SI PAS HLitRecherchePremier(CLIENT, NOM, sUtilisateur) ALORS
RENVOYER Faux
SINON
// Vérifie le mot de passe
SI CLIENT.MOTDEPASSE = sMotDePasse ALORS
// Mémorise le nom du client
// dans la variable mémorisée par DéclareContexteWebservice
gsNomClient = sUtilisateur
RENVOYER Vrai
SINON
RENVOYER Faux
FIN
FIN
//---- Procédure globale de vérification
// s'il y a bien eu une connexion avec un utilisateur/mot de passe correct
PROCÉDURE VerifieConnexion()
SI gsNomClient  ="" ALORS RENVOYER Faux SINON RENVOYER Vrai
//-----Procédure globale qui nécessite une connexion préalable (avec la méthode connexion)
PROCÉDURE Calcul(nParam1 est un entier, nParam2 est un entier)
// Vérifie si la connexion a été faite
SI PAS VerifieConnexion() ALORS ExceptionDéclenche(1, "Connexion/authentification incorrect")
// Connexion OK, effectue le calcul
nRésultat est un entier
nRésultat = nParam1 + nParam2
RENVOYER nRésultat
Version minimum requise
  • Version 16
Documentation également disponible pour…
Commentaires
Cliquez sur [Ajouter] pour publier un commentaire