Socket.Accept 方法

Accept 方法

从已经建立 TCP 侦听的 Socket 对象接受一个新的 TCP 连接

Set newSocket = Socket.Accept

newSocket

返回新 TCP 连接的 Socket 对象

Socket

一个实例化的 NetBox.Socket 对象

Socket.Accept 只可对 Socket.Listen 成功的 Socket 对象使用，否则返回结果将为空。

下面的例子创建一个 NetBox.Socket 对象，在 23(telnet) 端口建立侦听，接受一个请求并输出一个字符串，然后退出。

Set Socket = CreateObject("NetBox.Socket")
Socket.Listen "", 23

Set Socket1 = Socket.Accept

Socket1.WriteLine "Hello! I'm here!!!!"