PC SOFT

GRUPOS DE DISCUSSÃO PROFISSIONAL
WINDEVWEBDEV e WINDEV Mobile

Inicio → WINDEV 2024 → NetEnvoieBuffer reception du message grace à l'evenement windows 74
NetEnvoieBuffer reception du message grace à l'evenement windows 74
Iniciado por a_s_3_1, jun., 29 2005 12:13 AM - 3 respostas
Publicado em junho, 29 2005 - 12:13 AM
Bonjour,
j'ai des problemes avec la reception des message avec la fonction NetEnvoieBuffer avec l'evement windows 74, meme l'exemple fournit avec windev ne marche pas pour la reception des messages, le compilateur me dit kil y a des erreur, je croie c'est dans la structure ou peut etre dans la fonction transfert. voici le code exemple fournit avec windev:

//L'envoie du message du poste client
// c'est l'identifiant de la connection
hConnect est un entier hConnect = NetConnecte("148.61.125.245", ServeurFTP, "GUEST", "")
// la fonction d'envoie du message
NetEnvoieBuffer(hConnect, "le message à envoyer")

//La reception du message sur le serveur
Evénement("GetBuffer", "*.*", 74)
// La Procédure GetBuffer (c'est ici mon probleme dans cette procedure et surtout dans la structure et la fonction transfert où il ya l'erreur.)
// 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
MaChaîne est une chaîne fixe sur 2000
// Récupère la structure
Transfert(&RecupChaîne, _EVE.lParam, 12)
// Récupère les informations
Transfert(&MaChaîne, RecupChaîne:pInfo, RecupChaîne:lTaille)
Info(MaChaîne)

j'espère bien que je trouverais la bonne soluce ici sur ce forum, comme j'prefere bien d'avoire des reponces exactes(une chose tester pas du n'importe koi).
Mérci d'avance pour tout le monde sur ce forum et pour le support technique de PCSOFT.
j'espère que je serais pas tromper pour choisir WINDEV. @+ ;)
Publicado em junho, 29 2005 - 10:48 AM
Bonjour,

Exemple corrigé :

//au niveau du client :
ValeuraEnvoyer est un entier long
ChaineaEnvoyer est une chaine fixe sur 4096

ChaineaEnvoyer="La suite dans quelques instants"
NetEnvoieBuffer(hConnect, ChaineaEnvoyer,ValeuraEnvoyer)

//Et sur le serveur :
Evénement("GetBuffer", "*.*", 74)

//Procedure GetBuffer
Recup est une structure
Wdata est un entier long
lTaille est un entier long
pInfo est un entier long
fin

RecupChaine est un recup
MonEntierLong est un entier long
MaChaine est une chaine fixe sur 4096

Transfert(&RecupChaine,_EVE.lParam,12)
Transfert(&MaChaine,RecupChaine:pInfo,RecupChaine:lTaille)
Transfert(&MonEntierLong,RecupChaine:wdata,4)

Info(MaChaine)
Info(MonEntierLong)

--
Ed en Ligne


"Stephane As" <a_s_3_1@yahoo.fr> a écrit dans le message de news:
42c1a4b9$1@news.pcsoft.fr...
Bonjour,
j'ai des problemes avec la reception des message avec la fonction
NetEnvoieBuffer avec l'evement windows 74, meme l'exemple fournit avec
windev ne marche pas pour la reception des messages, le compilateur me dit
kil y a des erreur, je croie c'est dans la structure ou peut etre dans la
fonction transfert. voici le code exemple fournit avec windev:

//L'envoie du message du poste client
// c'est l'identifiant de la connection
hConnect est un entier hConnect = NetConnecte("148.61.125.245",
ServeurFTP, "GUEST", "")
// la fonction d'envoie du message
NetEnvoieBuffer(hConnect, "le message à envoyer")

//La reception du message sur le serveur
Evénement("GetBuffer", "*.*", 74)
// La Procédure GetBuffer (c'est ici mon probleme dans cette procedure et
surtout dans la structure et la fonction transfert où il ya l'erreur.)
// 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
MaChaîne est une chaîne fixe sur 2000
// Récupère la structure
Transfert(&RecupChaîne, _EVE.lParam, 12)
// Récupère les informations
Transfert(&MaChaîne, RecupChaîne:pInfo, RecupChaîne:lTaille)
Info(MaChaîne)

j'espère bien que je trouverais la bonne soluce ici sur ce forum, comme
j'prefere bien d'avoire des reponces exactes(une chose tester pas du
n'importe koi).
Mérci d'avance pour tout le monde sur ce forum et pour le support
technique de PCSOFT.
j'espère que je serais pas tromper pour choisir WINDEV. @+ ;)
Publicado em junho, 29 2005 - 9:56 PM
bonjour ED,

Je vous remerci vraiment bien pour l'exemple corrigé qui m'a aider à mieux manipuler la recepetion ddu message avec l'evenement windows 74 et mieux le comprendre.
je l'ai essayer, ça marche bien.

Mais ça ser à quoi ce code "Transfert(&MonEntierLong,RecupChaine:wdata,4)" il me fait une erreur dans le programme.
en tout cas, je ne croie pas que j'aurais besion de ce code mais c pas mal de connaitre quelque chose de+ .

encore je vous remerci tres tres bien pour votre aide @+.
Publicado em junho, 30 2005 - 6:54 PM
Bonjour,

Ce code permet de transférer le contenu de la structure en mémoire vers la
structure RecupChaîne qui elle est accessible dans votre application.

--
Ed en Ligne


"Stephane As" <a_s_3_1@yahoo.fr> a écrit dans le message de news:
42c2d640$1@news.pcsoft.fr...
bonjour ED,

Je vous remerci vraiment bien pour l'exemple corrigé qui m'a aider à mieux
manipuler la recepetion ddu message avec l'evenement windows 74 et mieux
le comprendre.
je l'ai essayer, ça marche bien.

Mais ça ser à quoi ce code "Transfert(&MonEntierLong,RecupChaine:wdata,4)"
il me fait une erreur dans le programme.
en tout cas, je ne croie pas que j'aurais besion de ce code mais c pas mal
de connaitre quelque chose de+ .

encore je vous remerci tres tres bien pour votre aide @+.