winsock使用方法

GetData data,[type,][maxLen]
它从缓冲区中取得最长为maxLen的数据，并以type类型存放在data中，GetData取得数据后，就把相应的缓冲区清空。
g.PeekData方法
和GetData方法类似，但PeekData在取得数据后并不把缓冲区清空。
VB编写网络程序主要有两种方式：1.winsock控件 2.winsockAPI
二，WinSock控件的使用
1.WinSock控件的主要属性
a.Protocol属性
通过Protocol属性可以设置WinSock控件连接远程计算机使用的协议。可选的协议是TCP和UDP对应的VB的常量分别是sckTCPProtocol和sckUDPProtocol，Winsock控件默认协议是TCP。注意：虽然可以在运行时设置协议，但必须在连接未建立或断开连接后。
b.SocketHandlt连接的句柄，这是只读属性。
c.RemoteHostIP属性
RemoteHostIP属性返回远程计算机的IP地址。在客户端，当使用了控件的Connect方法后，远程计算机的IP地址就赋给了RemoteHostIP属性，而在服务器端，当ConnectRequest事件后，远程计算机（客户端）的IP地址就赋给了这个属性。如果使用的是UDP协议那么当DataArrival事件后，发送UDP报文的计算机的IP才赋给了这个属性。
s_type Type specification for the new socket. SocketType
Protocol Protocol to be used with the socket SocketProtocol
c.SendComplete事件
当所有数据发送完成时，被触发。
d.DataArrival事件
当建立连接后，接受到了新数据就会触发这个事件。注意：如果在接受到新数据前，缓冲区中非空，就不会触发这个事件。
e.Error事件
当在工作中发生任何错误都会触发这个事件。
例子见附件
wHighVersion 通过加载库文件得到的最高的支持Winsock 的版本，
它通常和wVersion值相同。
szDescription Windows Sockets 执行时的详细描述
szSystemStatus 包含了相关的状态和配置的信息
iMaxSockets As Integer
iMaxUdpDg As Integer
lpVendorInfo As Long
End Type
数据成员的描述在下表中：
Field 描述
wVersion Windows Sockets 版本信息。
(ByVal wVersionRequired As Long, lpWSAData As WSAData) As Long
这个函数有两个参数： wVersionRequired 和 lpWSAData。wVersionRequired 参数定义Windows Sockets 提供能使用的最高版本，它的高位字节定义的是次版本号，低位字节定义的是主版本号。下面的2个Winsock版本在VB中使用的例子：
WSAEINPROGRESS 一个阻塞WinSock调用正在进行
WSAEPROCLIM 请求的协议没有在系统中配置或没有支持它的实现存在。
WSAEFAULT lpWSAData 不是有效的指针
SckOpen 1 打开。
SckListening 2 侦听
sckConnectionPending 3 连接挂起
sckResolvingHost 4 识别主机。
3.Winsock控件主要事件
a.ConnectRequest事件
当本地计算机接收到远程计算机发送的连接请求时，控件的ConnectRequest事件将会被触发。
b.SendProgress事件
当一端的计算机正在向另一端的计算机发送数据时，SendProgress事件将被触发。SendProgress事件记录了当前状态下已发送的字节数和剩余字节数。
AF_UNIX = 1 '/* local to host (pipes, portals) */
AF_INET = 2 '/* internetwork: UDP, TCP, etc. */
AF_IMPLINK = 3 '/* arpanet imp addresses */
d.ByteReceived属性
返回当前接收缓冲区中的字节数
e.State属性
返回WinSock控件当前的状态
常数 值 描述
sckClosed 0 缺省值，关闭。
sckHostResolved 5 已识别主机
sckConnecting 6 正在连接。
sckConnected 7 已连接。
sckClosing 8 同级人员正在关闭连接。
如果成功或者返回一个错误代码，则函数返回 0。
错误代码 含义
WSASYSNOTREADY 指出网络没有为传输准备好。
WSAVERNOTSUPPORTED 当前的WinSock实现不支持应用程序指定的Windows Sockets规范版本
函数有3个参数定义建立何种socket，三个参数分别是：
Argument Description Enum Type
af Address family specification. AddressFamily
that is specific to the indicated address
family.
AddressFamily:
AF_UNSPEC = 0 '/* unspecified */
e.SendData方法
当连接建立后，要发送数据就可以调用SendData方法，该方法只有一个参数，就是要发送的数据。
f.GetData方法
当本地计算机接收到远程计算机的数据时，数据存放在缓冲区中，要从缓冲区中取出数据，可以使用GetData方法。GetData方法调用规范如下：
Type WSAData
wVersion As Integer
wHighVersion As Integer
szDescription As String * WSADESCRIPTION_LEN
szSystemStatus As String * WSASYS_STATUS_LEN
初始化1.1版本
lngRetVal = WSAStartup(&H101, udtWinsockData)
初始化2.2版本
lngRetVal = WSAStartup(&H202, udtWinsockData)
第二个参数是WSADATA 的数据结构 ，它是接收Windows Sockets 执行时的数据。
3.建立Socket函数
Declare Function socket Lib "ws2_32.dll" (ByVal af As Long, _
ByVal s_type As Long,
ByVal Protocol As Long) As Long
WinSock简介
Socket（套接字）最初是由加利福尼亚大学Berkeley（伯克利）分校为UNIX操作系统开发的网络通信接口，随着UNIX的广泛使用，Socket成为当前最流行的网络通信应用程序接口之一。20世纪90年代初，由Sun Microsystems,JSB,FTP software,Microdyne和Microsoft等几家公司共同定制了一套标准，即Windows Socket规范，简称WinSock。
iMaxSockets 表示同时打开的socket最大数，为0表示没有限制。
iMaxUdpDg 表示同时打开的数据报最大数，为0表示没有限制。
lpVendorInfo 厂商指定信息预留
在Winsock的1.1和2.2版本中没有lpVendorInfo的返回值。因为winsock 2支持多个传输协议，所以iMaxSockets 和iMaxUdpDg只能在仅支持TCP/TP的winsock1.1中使用。为了在Winsock 2中获得这些值，你可以使用WSAEnumProtocols 函数。
AF_PUP = 4 '/* pup protocols: e.g. BSP */
三，WinSockAPI的使用
1.WSAStartup 函数
为了在你的应用程序当中调用任何一个Winsock API 函数，首先第一件事情你就是必须通过WSAStartup函数完成对Winsock 服务的初始化，因此需要调用WSAStartup函数。
Declare Function WSAStartup Lib "ws2_32.dll" _
2.WSACleanup 函数
每次调用了WSAStartup函数，你都需要调用WSACleanup函数，通知系统来卸载库文件及清除已分配的资源，这个函数十分简单，没有任何参数：
Declare Function WSACleanup Lib "ws2_32.dll" () As Long
sckError 9 错误
2.WinSock主要方法
a.Bind方法
用Bind方法可以把一个端口号固定为本控件使用，使得别的应用程序不能再使用这个端口。
b.Listen方法
Listen方法只在使用TCP协议时有用。它将应用程序置于监听检测状态。
c.Connect方法
当本地计算机希望和远程计算机建立连接时，就可以调用Connect方法。