易语言枚举系统通信协议源码

系统结构:枚举系统通信协议,清除网络通讯_,网络通讯启动_,WSAEnumProtocols,取错误信息_,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |
======Socket_Protocols
           |  |
           |  |------ 枚举系统通信协议
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   清除网络通讯_
           |  |
           |  |---[dll]------   网络通讯启动_
           |  |
           |  |---[dll]------   WSAEnumProtocols
           |  |
           |  |---[dll]------   取错误信息_

调用的DLL命令:

.DLL命令 清除网络通讯_, 整数型, "ws2_32.dll", "WSACleanup"

.DLL命令 网络通讯启动_, 整数型, "ws2_32.dll", "WSAStartup"
    .参数 必需版本, 整数型, , wVersionRequired
    .参数 网络通讯数据结构, 套接字信息_, , lpWSAData

.DLL命令 WSAEnumProtocols, 整数型, "ws2_32.dll", "WSAEnumProtocolsA"
    .参数 lpiProtocols, 整数型
    .参数 lpProtocolBuffer, WSAPROTOCOL_INFO, 数组
    .参数 lpdwBufferLength, 整数型, 传址

.DLL命令 取错误信息_, 整数型, "kernel32", "GetLastError"