bonjour

j'essaye d'automatiser certains tache que j'effectue sur un serveur distant.
pour cela mon objectif est d’envoyé des commande en telnet

pour l'instant je suis en train d’étudier la négociation préalable avant de se connecter

j'utilise wireshark pour sniffer mes paquet quant j'e me connecte avec le terminal Windows (commande telnet ip)
mon problème est pour l'envoi des commandes en vb.net
en effet j'ai beau convertir des commandes en binaire, ils passent pas
je joint un exemple

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
 
Public tcpSocket As TcpClient
tcpSocket = New TcpClient("ip", 23)
 
 
            If tcpSocket.Connected = False Then
            Else
                Do
 
                    Dim strMoi As String = ""
                    Dim strAs400 As String = tcpSocket.GetStream.ReadByte().ToString()
 
                    If strAs400 = "253" Then
                        strMoi = "251"
                        tcpSocket.GetStream.WriteByte(CType(251, Byte))
 
                        System.Console.WriteLine("moi :" & strMoi)
                    End If
 
                    System.Console.WriteLine("as400 :" & strAs400)
 
                Loop While tcpSocket.Available > 0
 
            End If
les donnée envoyé sous wireshark apparaissent avec ce format \357\277\275