Chilkat HOME ASP Visual Basic VB.NET C# Visual C++ C MFC Delphi FoxPro Java Perl PHP Python Ruby SQL Server VBScript
|
TCP/IP Socket Connect to Remote Host:PortDemonstrates how to create a TCP/IP socket, connect to a remote host:port, and receive a "Hello World!" message.
<html> <head> <meta http-equiv="Content-Type" content="text/html; charset=utf-8"> </head> <body> <% set socket = Server.CreateObject("Chilkat.Socket") success = socket.UnlockComponent("Anything for 30-day trial") If (success <> 1) Then Response.Write "Failed to unlock component" & "<br>" End If ' Connect to port 5555 of localhost. ' The string "localhost" is for testing on a single computer. ' It would typically be replaced with an IP hostname, such ' as "www.chilkatsoft.com". ssl = 0 maxWaitMillisec = 20000 success = socket.Connect("localhost",5555,ssl,maxWaitMillisec) If (success <> 1) Then Response.Write socket.LastErrorText & "<br>" End If ' Set maximum timeouts for reading an writing (in millisec) socket.MaxReadIdleMs = 10000 socket.MaxSendIdleMs = 10000 ' The server (in this example) is going to send a "Hello World!" ' message. Read it: receivedMsg = socket.ReceiveString() If (receivedMsg = vbNullString ) Then Response.Write socket.LastErrorText & "<br>" End If ' Close the connection with the server ' Wait a max of 20 seconds (20000 millsec) socket.Close 20000 Response.Write receivedMsg & "<br>" %> </body> </html> |
Need a specific example? Send a request to support@chilkatsoft.com
© 2000-2008 Chilkat Software, Inc. All Rights Reserved.