Sample code for 30+ languages & platforms
Visual Basic 6.0

Send Encoded Bytes over a Socket

See more Socket/SSL/TLS Examples

Demonstrates Socket.SendBytesENC, which decodes text using a named encoding (such as base64) and sends the resulting binary bytes.

Background. The ENC methods move raw binary data to and from printable text using a named encoding such as base64 or hex, which is convenient for logging or for handling binary data as strings.

Chilkat Visual Basic 6.0 Downloads

Visual Basic 6.0
Dim success As Long
success = 0

Dim socket As New ChilkatSocket

'  Connect to the server using TLS.
Dim bTls As Long
bTls = 1
Dim maxWaitMs As Long
maxWaitMs = 5000
success = socket.Connect("example.com",5000,bTls,maxWaitMs)
If (success = 0) Then
    Debug.Print socket.LastErrorText
    Exit Sub
End If

'  Decode the text using the named encoding, then send the resulting binary bytes.  Here the base64
'  text "SGVsbG8=" decodes to the bytes for "Hello".
success = socket.SendBytesENC("SGVsbG8=","base64")
If (success = 0) Then
    Debug.Print socket.LastErrorText
    Exit Sub
End If

Debug.Print "Bytes sent."