Bonjour,
Je débute en VB.net et j'ai du mal à importer Wrapped.

Normalement je vais dans gérer les packages NuGet mais je ne le trouve pas, et quand j'importe cela ne marche pas.
Nom : 12dcd4fff1ec406287e2ddc8dd1c8b4f.png
Affichages : 435
Taille : 10,4 Ko

Voici ma fonction:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
Private Function PingServer(ByVal IP As String, ByVal port As Integer)
        Dim MySocket As New TcpClient(IP, port)
        Dim Socket As New Wrapped.Wrapped(MySocket.GetStream)
        Socket.writeByte(254)
        Socket.writeByte(1)
        If Socket.readByte() = 255 Then
            Dim mystring As String = Socket.readString()
            Dim mysplit() As String mystring.Split(ChrW(CByte(0)))
			Return "Ok: " & mysplit(3) & " " & mysplit(4) & "/" & mysplit(5) & " -- MC Ver. " & mysplit(2)
        Else
            Return "Error"
        End If
    End Function
Je vous remercie d'avance pour votre aide,
Cordialement