Dim tcpClient As New System.Net.Sockets.TcpClient() tcpClient.Connect("192.168.1.4", 2000) Dim networkStream As NetworkStream = tcpClient.GetStream() If networkStream.CanWrite And networkStream.CanRead Then ' Send some data. Dim sendBytes As [Byte]() = Encoding.ASCII.GetBytes("IE") & Chr(13) networkStream.Write(sendBytes, 0, sendBytes.Length)
Dim localEP As System.Net.EndPoint = "192.168.1.10:7777" tcpClient.Client.Bind(localEP)
tcpClient.Connect("192.168.1.10", 7777)
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)