récuperer les données de la fonction data arrival

Bonjour,

Je développe une application qui se sert des sockets et j'aimerais
pouvoir recuperer les données se trouvant dans la fonction
data_arrival.

Code:

---

1 2 3 4

Public sub data_arrival(byval bytes as long) dim data winsock1.getdata data end sub

---

Je pense qu'il faudrai transformer la fonction ci dessus en fonction
afin de pouvoir renvoyer le tableau dans mon programme lorsque
j'appelerais la fonction data arrival mais comment faut t'il faire ?


Quelqu'un peut il m'aider svp ?


Merci
Johnson

Citation:

---

Je pense qu'il faudrai transformer la fonction ci dessus en fonction

---

comment changer du chocolat en chocolat ?
Surveille ta terminologie (c'est important) et explique-toi avec précision sur ce que tu envoies pour traitement, comment tu l'envoies, et comment tu veux qu'il te soit renvoyé.

Sous quoi, Delphi, C++ ?? !!! :mouarf:


:roll:

désolé!

Alors tous d'abord je travaille sur VB 6

ensuite voici mon probleme :

J'utilise une apllication avec winsock.
je souhaite envoyer un paquet avec la commande send vers mon serveur je veux ensuite récupere un ACK pour me dire que mon paquet a bien été recu voici mon code

1 essai :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

dim buffer(4) as byte dim buffer1 buffer(3) = 1 Winsock1.send buffer ' une fois que mon serveur a recu mon buffer mon il doit simplement mettre ' la valeur 2 dans le buffer qu'il va me renvoyer je relit donc ensuite les données   winsock1.getdata buffer1 'je fais ensuite une condition qui me montrera que ce que je fais est correcte   if buffer1(3) = 2 then MsgBox ("reception ok")

---

Je trouve l'erreur 9 "subscript out of range"

2e essai :

Code:

---

1 2 3 4 5 6

dim buffer(4) as byte dim buffer1 buffer(3) = 1 Winsock1.send buffer ' une fois que mon serveur a recu mon buffer mon il doit simplement mettre ' la valeur 2 dans le buffer qu'il va me renvoyer je relit donc ensuite les données

---

J'utilise ensuite l'évenement data arrival afin de récuperer les données mais mon probleme est que je ne peux récuperer les données de ce sub
(j'ai essayé de transformer ce sub en fonction mais on ne peut y toucher, j'ai aussi une nouvelle fonction :

Code:

---

1 2 3 4 5

public function data_arrival () dim data winsock1.getdata data data_arrival data end function

---

ensuite dans mon programme principale je recupere le tableau mais lorsque j'esssaye de lire data(3) j'ai l'erreur 9 "subscript out range")

3 essai :
J'ai réessayer la premiere methode en déclarant data en variable globale mais ceci ne fonctionne pas non plus.

Avez vous une solution a me proposer ?

Merci
Johnson