Discussion :

[lerefouler]

Bonjour a tous

Pour mes besions proffessionnels, j'utlise une console telnet pour faire des diagnostics de controleurs de machine industriels. J'aimerais automatiser cela, extraire des résultats dans les réponses consoles.
Je ne voudrais pas ré-ecrire tous le protocole telnet dans mon apli.
J'ai cherché tout simplement à lancer telnet.exe et faire des SendKeys mais je n'ai pas trouvé de solution pour récupérer la réponse.
A savoir, qu'il me faudra passer a travers des serveurs linux et donc la redirection dans un fichier n'est pas la solution.

Avez-vous une solution pour moi ?

(librairie, ActiveX de préférence en VB .Net 2005)

[LaChips]

Bonjour,
Est ce que tu as pensé à utiliser les Sockets?
Tu te connectes à ton client sur un certain port et tu dialogues avec lui

[lerefouler]

Oui biensur mais il faut se payer le developpement du protocol Telnet ! C'est ce que je veux éviter.

- ouvrir une session telnet
- emuler l'appuis de command sur le clavier
- récupérer la réponse

[LaChips]

Je ne comprend pas pourquoi tu veux redévelopper le protocole telnet,
en 3 lignes de codes VB.NET tu peux te connecter, envoyer un message, et en recevoir un...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
Dim So As TcpClient = New TcpClient(10.10.10.10, 23)
Dim FluxClient As NetworkStream = So.GetStream
Dim sr As StreamReader = New StreamReader(FluxClient)
Dim sw As StreamWriter = New StreamWriter(FluxClient)
sw.WriteLine("Message envoyé")
sw.Flush()
console.writeline(sr.ReadLine)
sr.Close()
sw.Close()
FluxClient.Close()
So.Close()

Voilà un petit exemple, je t'épargne les Try Catch...

[lerefouler]

Non désolé, ce code ne marche pas.
le sr.ReadLine ne se termine pas.
Je m'en suis sorti par un sr.BaseStream.ReadTimeout = 1000 (1s)
Mais on récupere le protocol telnet !
La premiere trame recu : "FF-FB-01-FF-FB-03-FF-FD-18-FF-FD-1F"

Mais ton code est interressant, je ne connaisais pas les stream !

[LaChips]

C'est exactement le code que j'utilise dans une de mes applis (avec quelques lignes en plus) et cela fonctionne très bien, essaye de l'adapter pour ton code avec l'article de Lainé Vincent :
http://vincentlaine.developpez.com/t...nchrone/vbnet/

[lerefouler]

Après quelques temps de développement en pointillé, voila le composant client Telnet est développé.

Si cela intéresse quelqu'un, il suffit de me le demander, j'enverrais mes sources (projet DLL en VB .net 2005) lerefouler@hotmail.com.

Avec ce composant, je me connecte sur serveurs Linux et service telnet de Win XP.