PC SOFT

DOCUMENTATION EN LIGNE
DE WINDEVWEBDEV ET WINDEV MOBILE

  • Exemple : Envoyer un message du poste client vers le serveur
NetEnvoieBuffer (Exemple)
Exemple : Envoyer un message du poste client vers le serveur
L'exemple suivant permet d'envoyer un message du poste client vers le poste serveur et de récupérer ce message sur le poste serveur grâce à la fonction Evénement.
// Sur le poste client
ConnectFTP est un entier
ConnectFTP = NetConnecte("148.61.125.245", ServeurFTP, "GUEST", "")
...
NetEnvoieBuffer(ConnectFTP, "La suite dans quelques instants")
// Sur le poste serveur
Evénement("GetBuffer", "*.*", 74)

// Procédure GetBuffer
// Déclaration de la structure pointée par _EVE.lParam
RecupChaîne est une structure
        Wdata est un entier
        lTaille est un entier
        pInfo est un entier
FIN

MaRecup est une RecupChaîne
MaChaîne est une chaîne fixe sur 2000

// Récupère la structure
Transfert(&MaRecup, _EVE.lParam, 12)
// Récupère les informations
Transfert(&MaChaîne, MaRecup:pInfo, MaRecup:lTaille)
Info(MaChaîne)
Version minimum requise
  • Version 9
Documentation également disponible pour…
Commentaires
Cliquez sur [Ajouter] pour publier un commentaire