(VB.NET) Send Bytes on a Socket Connection
Demonstrates how to send a mixture of binary (non-text) and text bytes on a socket connection.
' This example requires the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.
Dim socket As New Chilkat.Socket
' Connect to some host:port
Dim ssl As Boolean = False
Dim maxWaitMillisec As Integer = 20000
Dim port As Integer = 5555
Dim success As Boolean = socket.Connect("test.com",port,ssl,maxWaitMillisec)
If (success <> True) Then
Debug.WriteLine(socket.LastErrorText)
Exit Sub
End If
' We wish to send a 0x00 byte followed by the us-ascii string "10800"
Dim bd As New Chilkat.BinData
bd.AppendByte(0)
bd.AppendString("10800","utf-8")
' Send the entire contents of bd.
success = socket.SendBd(bd,0,0)
If (success <> True) Then
Debug.WriteLine(socket.LastErrorText)
Exit Sub
End If
|