Module1
- Imports System.Net
- Imports System.Net.Sockets
- Imports System.Text
- Module Module1
- Sub Main()
- Dim udpClient As UdpClient
- Dim message() As Byte
- Console.WriteLine("Client sending packet...")
- udpClient = New UdpClient()
- message = Encoding.Unicode.GetBytes("Hello")
- udpClient.Send(message, message.Length, "127.0.0.1", 5555)
- Console.ReadKey()
- End Sub
- End Module
No comments:
Post a Comment