Lianja

Connect a TCP or TLS Socket

Demonstrates Socket.Connect, which establishes a TCP connection to a host and port. Setting the TLS argument to _TRUE_ performs a TLS handshake after the TCP connection succeeds.

Background. The hostname may be a DNS name or a numeric IPv4/IPv6 address. The final argument bounds how long the connect attempt waits before failing. On failure, ConnectFailReason and LastErrorText provide detail.

Chilkat Lianja Downloads

Download Chilkat for Lianja

Lianja

llSuccess = .F.

loSocket = createobject("CkSocket")

//  Connect to the server using TLS.  The 3rd argument enables the TLS handshake after the TCP
//  connection succeeds; the 4th is the maximum time to wait, in milliseconds.
llBTls = .T.
lnMaxWaitMs = 5000
llSuccess = loSocket.Connect("example.com",5000,llBTls,lnMaxWaitMs)
if (llSuccess = .F.) then
    ? loSocket.LastErrorText
    release loSocket
    return
endif

//  StringCharset controls the character encoding used when sending and receiving text.
loSocket.StringCharset = "utf-8"

//  The socket is now connected and ready to send and receive data using whatever protocol the
//  application implements.
? "Connected: " + str(loSocket.IsConnected)

//  Close the connection when finished.  The argument is the maximum time to wait for a clean
//  shutdown, in milliseconds.
llSuccess = loSocket.Close(1000)
if (llSuccess = .F.) then
    ? loSocket.LastErrorText
    release loSocket
    return
endif



release loSocket