
利用 Winsock 控件实现局域网通信
对于局域网用户中的编程爱好者来说,如果能自己编一个局域网通信程序,那么这一切将是
多么美妙!可是,如果要从头开始完全由自己来编写一段用于通信的程序,必须对相关的网
络协议及其他的一些较底层的技术有较深入的了解,这可不是一件容易的事。而现在有了
Winsock 控件,一切就不同了,它已经替你封装了所有烦琐的技术细节,并提供了访问 TCP
和 UDP 网络服务的方便途径。你只需通过设置控件的属性并调用其方法就可轻易连接到一
台远程计算机中,并且还可以双向交换数据,而这一切都不需你了解 TCP 的细节或调用低
级的 Winsock APIs。
Winsock 控件可以供 Microsoft Acess、Visual Basic,Visual C 或 Visual Foxpro 的开发
人员使用。本文以 Visual Basic 6 企业版为开发环境来向大家介绍一下 Winsock 控件的初步
应用。
Winsock 控件可以使用两种协议:TCP 协议和 UDP 协议,下面来分别介绍。
TCP 协议即数据传输协议,它允许创建和维护与远程计算机的连接,使其彼此可以进
行数据传输。利用 TCP 协议通讯必须分别建立客户应用程序和服务器应用程序。
在创建客户应用程序时,必须知道服务器计算机名或其 IP 地址(存于 RemoteHost 属
性)、及服务器计算机进行侦听的端口(存于 RemotePort 属性),然后调用 Connect 方法。
创建服务器应用程序时,就应相应设置一个侦听端口(LocalPort 属性)并调用 listen 方
法。当客户机需要连接时(connect),就会发生 ConnectionRequest 事件。为了完成连接,你
可以在 ConnectionRequest 事件中调用 Accept 方法。建立连接后,任何一方计算机都可以发
送、接收对方数据。如果你要发送数据,需调用 SendData 方法。当接收到数据时,会发生
DataArrival 事件,调用 DataArrival 事件中的 GetData 方法就可以获得对方传送的数据。
说了这么多,大家可能还是不太了解,让我用程序来详细说明。
如果只有两台计算机,那十分容易。假设甲机为客户机,乙机为服务器,且其 IP 为
192.192.192.1,接收端口为 1200(任意选一个未被使用的端口即可)。首先在甲机客户端程序
中加入一个 Winsock 控件,起名为 sckconnect,并设置其属性:RemoteHost=“192.192.192.1”,
(即甲机 IP 地址), RemotePort=1200(即甲机侦听端口);再在乙机服务器程序中假如
一个名为 sckserver(0)的 Winsock 控件,其 LocalPort=1200,在乙机服务器程序中 Form_Load()
加入
sckserver(0).bind sckserver(0).LocalPort '与本地端口绑定