ich habe jetzt den Response für GETAUX geschafft. hier der Code für Visual Studio VB2010 falls Sie Ihn verwenden möchten.
Code: Alles auswählen
Imports System.Net.Sockets
Imports System.Net
Imports System.Text
Private Sub Button1_Click_2(sender As System.Object, e As System.EventArgs) Handles Button1.Click
'Einen UDP Net Socket erstellen
Dim clientUDP As New Socket(AddressFamily.InterNetwork, SocketType.Dgram, ProtocolType.Udp)
'Ip Adresse des netPIO
Dim netPIO_IP As IPAddress
Dim bytes2(200) As Byte
'einen IPEndPoint erstellen von jeder IP
'Creates an IPEndPoint to record the IP address and port number of the sender.
'The IPEndPoint will allow you to read datagrams sent from any source.
Dim ep As New IPEndPoint(IPAddress.Any, 0)
netPIO_IP = IPAddress.Parse("192.168.2.144")
'verbinden
clientUDP.Connect(New IPEndPoint(netPIO_IP, 37155))
'Befehl senden
clientUDP.Send(System.Text.Encoding.ASCII.GetBytes("GETAUX"))
'Antwort abfangen
clientUDP.ReceiveFrom(bytes2, ep)
'Bytes zum String umwandeln
Dim ReceiveStr As String = Encoding.ASCII.GetString(bytes2)
clientUDP.Close()
MsgBox(ReceiveStr)
End Sub