Bonjour,
j’apprends le vbs depuis maintenant 2 semaines, j'ai quelques bases en programmation, mais je galère sur des trucs simples...
Je veux établir une communication par socket entre deux machines ( concrètement entre une machine qui gère la supervision de l'usine et une imprimante qui doit s'adapter aux changements de production)le tout en vbs.
J'utilise socketTest pour simuler un serveur à l'écoute (l'imprimante), le programme, jusque la me permet de me connecter et d'envoyer une donnée qui contient le nouveau message à imprimer (globalement).
Sur socketTest je vois bien apparaitre le client se connecter au serveur et mon nouveau message. A partir de la, le logiciel SocketTest me permet de renvoyer un message. J'aimerais pouvoir faire à mon programme :" soit tu reçois la chaine de caractère "ABC" et tu fais "CA" , soit tu reçois la chaine de caractère "ZYX" et tu fais "CI" sinon tu me demandes "écrit ABC ou ZYX".
Dans mon programme je recupére la strdata et la stock dans recieveData pour comparer recieveData au deux chaines de caractere ABC et ZYX.
je suppose que c'est mon utilisation de la librairie Winsock qui foire quelque part.
code:
Si quelqu'un à une idée, une piste de réflexion ... quelque chose ....
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12 '// WINSOCK DATA ARRIVES Sub winsock_dataArrival(bytesTotal) Dim strData winsock.GetData strData, vbString RecieveData = strData if RecieveData="ABC" then MsgBox("ci") Elseif RecieveData ="ZYX" then MsgBox("ca") Else winsock.SendData "plz write ABC or ZYX"
Partager