易语言登陆PHPWind取Cookie模块源码

系统结构:登陆,WSAStartup,WSACleanup,socket,closesocket,connect,WSACreateEvent,WSAEventSelect,htons,inet_addr,WaitForSingleObject,send,recv,WSAEnumNetworkEvents,CloseHandle,

======程序集1
           |  |
           |  |------ _启动子程序
           |  |
           |  |------ _临时子程序
           |  |
           |  |
======PHPWind_7_3_2
           |  |
           |  |------ 登陆
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   WSAStartup
           |  |
           |  |---[dll]------   WSACleanup
           |  |
           |  |---[dll]------   socket
           |  |
           |  |---[dll]------   closesocket
           |  |
           |  |---[dll]------   connect
           |  |
           |  |---[dll]------   WSACreateEvent
           |  |
           |  |---[dll]------   WSAEventSelect
           |  |
           |  |---[dll]------   htons
           |  |
           |  |---[dll]------   inet_addr
           |  |
           |  |---[dll]------   WaitForSingleObject
           |  |
           |  |---[dll]------   send
           |  |
           |  |---[dll]------   recv
           |  |
           |  |---[dll]------   WSAEnumNetworkEvents
           |  |
           |  |---[dll]------   CloseHandle

调用的DLL命令:

.DLL命令 WSAStartup, 整数型, "ws2_32.dll", "WSAStartup"
    .参数 wVersionRequiredas, 整数型
    .参数 lpWSAData, WSADATA, 传址

.DLL命令 WSACleanup, 整数型, "ws2_32.dll", "WSACleanup"

.DLL命令 socket, 整数型, "ws2_32.dll", "socket"
    .参数 af, 整数型
    .参数 lType, 整数型
    .参数 protocol, 整数型

.DLL命令 closesocket, 整数型, "ws2_32.dll", "closesocket"
    .参数 s, 整数型

.DLL命令 connect, 整数型, "ws2_32.dll", "connect"
    .参数 s, 整数型
    .参数 sockaddr, addr
    .参数 namelen, 整数型

.DLL命令 WSACreateEvent, 整数型, "ws2_32.dll", "WSACreateEvent"

.DLL命令 WSAEventSelect, 整数型, "ws2_32.dll", "WSAEventSelect"
    .参数 s, 整数型
    .参数 hEventObject, 整数型
    .参数 lNetworkEvents, 整数型

.DLL命令 htons, 短整数型, "ws2_32.dll", "htons"
    .参数 hostshortas, 整数型

.DLL命令 inet_addr, 整数型, "ws2_32.dll", "inet_addr"
    .参数 cp, 文本型

.DLL命令 WaitForSingleObject, 整数型, , "WaitForSingleObject"
    .参数 hHandle, 整数型
    .参数 dwMilliseconds, 整数型

.DLL命令 send, 整数型, "ws2_32.dll", "send"
    .参数 s, 整数型
    .参数 buf, 字节集
    .参数 len, 整数型
    .参数 flags, 整数型

.DLL命令 recv, 整数型, "ws2_32.dll", "recv"
    .参数 s, 整数型
    .参数 buf, 字节集
    .参数 len, 整数型
    .参数 flags, 整数型

.DLL命令 WSAEnumNetworkEvents, 整数型, "ws2_32.dll", "WSAEnumNetworkEvents"
    .参数 s, 整数型
    .参数 hEventObject, 整数型
    .参数 lpNetworkEvents, WSANETWORKEVENTS, 传址

.DLL命令 CloseHandle, 整数型, , "CloseHandle"
    .参数 hObject, 整数型