NetworkStream.Write : NetworkStream « System.Net « VB.Net by API






NetworkStream.Write

  

Imports System.Net.Sockets
Imports System.Net
Imports System.Threading
Imports System.Text

Public Class Tester
    
    Public Shared Sub Main
        Dim myTcpClient As New TcpClient()
        Dim myNetworkStream As NetworkStream

        Try
            myTcpClient.Connect("127.0.0.1", 12345)
            myNetworkStream = myTcpClient.GetStream()
        Catch ex As ArgumentOutOfRangeException
            Console.WriteLine(ex.Message)
        Catch ex As SocketException
            Console.WriteLine(ex.Message)
        End Try

        Dim myBytes() As Byte = Encoding.ASCII.GetBytes("asdf")

        myNetworkStream = myTcpClient.GetStream()
        myNetworkStream.Write(myBytes, 0, myBytes.Length)

        Dim bufferSize As Integer = myTcpClient.ReceiveBufferSize
        Dim myBufferBytes(bufferSize) As Byte

        myNetworkStream.Read(myBufferBytes, 0, bufferSize)
        Console.WriteLine(Encoding.ASCII.GetString(myBufferBytes, 0, bufferSize))
    End Sub
End Class

   
    
  








Related examples in the same category

1.NetworkStream.Read