易语言测试源码,易语言SOCK判断是否联网模块源码 [db:版本]

易语言SOCK判断是否联网模块源码

系统结构:连接,是否联网_,WSAStartup,WSACleanup,socket,htons,inet_addr,Connect,

======程序集1
| |
| |------ _启动子程序
| |
| |------ _临时子程序
| |
| |------ 连接
| |
| |------ 是否联网_
| |
| |
======调用的Dll
| |
| |---[dll]------ WSAStartup
| |
| |---[dll]------ WSACleanup
| |
| |---[dll]------ socket
| |
| |---[dll]------ htons
| |
| |---[dll]------ inet_addr
| |
| |---[dll]------ Connect
======窗口程序集1
| |
| |------ _按钮1_被单击

调用的DLL命令:

.DLL命令 WSAStartup, 整数型, "ws2_32.dll", "WSAStartup", , 初始化WnSocket服务
.参数 wVR, 整数型, , socket版本
.参数 lpWSAD, WSADataType, 传址, 服务信息

.DLL命令 WSACleanup, 整数型, "ws2_32.dll", "WSACleanup", , 卸载Winsocket服务

.DLL命令 socket, 整数型, "ws2_32.dll", "socket", , 创建套接字
.参数 af, 整数型, , 使用的通信协议的协议族
.参数 type, 整数型, , 流套接字类型
.参数 protocol, 整数型, , 使用的通信协议

.DLL命令 htons, 整数型, "ws2_32.dll", "htons", , 转换为network 排列方式的数目
.参数 hostshort, 整数型, , 端口号

.DLL命令 inet_addr, 整数型, "ws2_32.dll", "inet_addr", , 点数格式转换为整数格式IP地址
.参数 cp, 文本型, , 欲被转换的IP地址

.DLL命令 Connect, 整数型, "ws2_32.dll", "connect", , 连接到服务器(TCP)
.参数 s, 整数型, , 套接字描述符
.参数 addr, sockaddr_in, 传址, 地址信息
.参数 namelen, 整数型, , 地址信息长度