TcpServer 对象
创建一个 TCP 服务器,可以方便地创建高性能的多线程服务器
语法
Set tcpd = CreateObject("NetBox.TcpServer")
集合
属性
方法
事件
注释
使用 NetBox.TcpServer 可以创建一个高性能的多线程 TCP 服务器。
示例
下面的例子创建一个 NetBox.TcpServer 对象,在 23(telnet) 端口建立服务器,并启动服务:
Set TcpServer = CreateObject("NetBox.TcpServer")
TcpServer.Create "", 23, "\Accept.wsc"
TcpServer.Start
Shell.Console.ReadLine
服务器的接受脚本部件文件 Accept.wsc 内容如下:
<?xml version="1.0"?>
<component>
<public>
<method name="OnAccept"/>
</public>
<script language="VBScript">
<![CDATA[
Function OnAccept(Socket, Contents)
Socket.WriteLine "Hello! I'm here!!!"
End Function
]]>
</script>
</component>
这个例子与 NetBox.Socket 的例子很类似,但是功能实实在在的强大了很多,可以接受多个请求,并且可以同步处理多个请求,主运行程序可以继续做其他工作,等等。
版权所有: 2003- 网络盒子