Ah mais oui bien sur kel idiot je suis !
merci beaucoup pour ta précieuse aide et ton esprit de solidarité ;o)
On en manque de gens comme ca ....
Merci Encore.
None.
-------------------------------
Réponse au message :
-------------------------------
> rajoute dans le dataarrival :
> Dim Buffer as string
>
> tu verras ca marche vachement mieux
>
>
BasicInstinct
>
>
> -------------------------------
> Réponse au message :
> -------------------------------
>
> >
> > Bah non, je viens d'essayer, tu vois d'ou ca peut venir?
> >
> > -------------------------------
> > Réponse au message :
> > -------------------------------
> >
> > > et quand tu teste mon code tel quel ca fonctionne ?
> > >
> > >
BasicInstinct
> > >
> > >
> > > -------------------------------
> > > Réponse au message :
> > > -------------------------------
> > >
> > > > Salut,
> > > >
> > > > j'ai testé le source que tu m'a filé excellent, Merci.
> > > > Cepedant, un pb subsiste:
> > > > Je recois n'importe koi kom message sur le serveur.
> > > > c'est a dire des "????"
> > > > ce ki diffère de ton code
> > > > J'ai juste changé le numéro de port, et j'ai ajouté
> > > > x = MsgBox("Des données sont arrivées", vbOKOnly, "Message Reçu")
> > > > dans le Data Arrival.
> > > >
> > > > D'ou cela peut il venir?
> > > > Ca fonctionne pour toi ou po?
> > > >
> > > > Merci
> > > >
> > > > -------------------------------
> > > > Réponse au message :
> > > > -------------------------------
> > > >
> > > > 'Lut
> > > > le client
> > > >
> > > > Private Sub Command1_Click()
> > > > With wskConnexion
> > > > '.Protocol = sckUDPProtocol
> > > > .RemoteHost = "127.0.0.1"
> > > > .RemotePort = 1827
> > > > .SendData "ENVOIE !!"
> > > > end sub
> > > >
> > > >
> > > > le Serveur
> > > >
> > > > private sub form_load()
> > > > WskConnect.LocalPort = 1827
> > > > WskConnect.Bind 1827
> > > > end sub
> > > >
> > > > Private Sub WskConnect_DataArrival(ByVal bytesTotal As Long)
> > > >
> > > > WskConnect.GetData Buffer
> > > > msgbox buffer
> > > > end sub
> > > > BasicInstinct
> > > >
> > > >
> > > > -------------------------------
> > > > Réponse au message :
> > > > -------------------------------
> > > >
> > > > > Bonjour,
> > > > >
> > > > > je recherche un simple code pour Winsock. PROTOCOLE UDP .
> > > > >
> > > > > Un serveur qui écoute sur un port et qui prévient de l'arrivée de données à l'aide d'une MsgBox
> > > > >
> > > > > Et un client qui envoi kelke choz sur l'appui d'un bouton.
> > > > >
> > > > > je vous remercie beaucoup, c'est juste pour comprendre le fonctionnement car, sur le net je trouve plein de choz beaucoup trop complètent ou par CLAIR du tout !
> > > > >
> > > > > Ceci doit fonctionner au sein d'une même machine.
> > > > > kelk'un peut-il m'aider SVP?
> > > > >
> > > > > Merci
> > > >
> > >
> >
>