在一个单位内部或通过广域协议(如X.25)互联的行业内部都有几十或上万台计算机互联,用Intranet虽然可以建立聊天室,但实现点对点实时对话却比较困难。本人用Winsock和VB自制了一套聊天室和对话系统,特拿来供同行们参考。
一·Winsock的主要属性、事件和方法
Winsock是不可见控件,控件文件名是MSWINSCK.OCX,全称为Mcirosoftwinsockcontrol,使用时要将此控件调入工具箱。
1·属性:①Protocol=0//使用TCP协议;
②RemoteHost//准备连接远程机的IP地址
③RemotePort//连接远程机的IP端口号(1024—65535之间)
④LocalPort//本地机监听IP端口号必须与呼叫机端口号相同
2·方法:①connect//申请连接远程机
②listen//设置监听
③accept//建立实际连接
④senddata//发送数据
⑤getdata//接收数据