Sample code for 30+ languages & platforms
Classic ASP

Move a Connection into a Socket Set

See more Socket/SSL/TLS Examples

Demonstrates Socket.TakeSocket, which moves a connection into a newly created member of this object's socket set. After one or more calls, the object acts as a set of sockets.

Background. A socket set groups multiple connections so they can be monitored together with the SelectForReading and SelectForWriting methods. After success, the source socket holds no connection.

Chilkat Classic ASP Downloads

Classic ASP
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body>
<%
success = 0

set listenSock = Server.CreateObject("Chilkat.Socket")

success = listenSock.BindAndListen(5000,25)
If (success = 0) Then
    Response.Write "<pre>" & Server.HTMLEncode( listenSock.LastErrorText) & "</pre>"
    Response.End
End If

set connectedSock = Server.CreateObject("Chilkat.Socket")
success = listenSock.AcceptNext(20000,connectedSock)
If (success = 0) Then
    Response.Write "<pre>" & Server.HTMLEncode( listenSock.LastErrorText) & "</pre>"
    Response.End
End If

'  Move the connection out of connectedSock and into a newly created member of this object's socket
'  set.  After one or more such calls, socketSet acts as a set of connected sockets (useful with the
'  SelectForReading / SelectForWriting methods).  After success, connectedSock holds no connection.
set socketSet = Server.CreateObject("Chilkat.Socket")
success = socketSet.TakeSocket(connectedSock)
If (success = 0) Then
    Response.Write "<pre>" & Server.HTMLEncode( socketSet.LastErrorText) & "</pre>"
    Response.End
End If

Response.Write "<pre>" & Server.HTMLEncode( "Connection added to the socket set.") & "</pre>"

%>
</body>
</html>