易语言WinInet模块源码 [db:版本]

易语言WinInet模块源码

系统结构:读取数据,提交数据,InternetOpen,InternetConnect,InternetReadFile,HttpOpenRequest,HttpSendRequest,HttpAddRequestHeaders,InternetCloseHandle,InternetOpenUrl,

======程序集1
| |
| |------ _启动子程序
| |
| |------ _临时子程序
| |
| |
======eWinInet
| |
| |------ _初始化
| |
| |------ _销毁
| |
| |------ 读取数据
| |
| |------ 提交数据
| |
| |
======调用的Dll
| |
| |---[dll]------ InternetOpen
| |
| |---[dll]------ InternetConnect
| |
| |---[dll]------ InternetReadFile
| |
| |---[dll]------ HttpOpenRequest
| |
| |---[dll]------ HttpSendRequest
| |
| |---[dll]------ HttpAddRequestHeaders
| |
| |---[dll]------ InternetCloseHandle
| |
| |---[dll]------ InternetOpenUrl

调用的DLL命令:

.DLL命令 InternetOpen, 整数型, "wininet.dll", "InternetOpenA"
.参数 lpszCallerName, 文本型
.参数 dwAccessType, 整数型
.参数 lpszProxyName, 文本型
.参数 lpszProxyBypass, 文本型
.参数 dwFlags, 整数型

.DLL命令 InternetConnect, 整数型, "wininet.dll", "InternetConnectA"
.参数 hInternetSession, 整数型
.参数 lpszServerName, 文本型
.参数 nProxyPort, 短整数型
.参数 lpszUsername, 文本型
.参数 lpszPassword, 文本型
.参数 dwService, 整数型
.参数 dwFlags, 整数型
.参数 dwContext, 整数型, 传址

.DLL命令 InternetReadFile, 整数型, "wininet.dll"
.参数 hFile, 整数型
.参数 lpBuffer, 字节集
.参数 dwNumberOfBytesToRead, 整数型
.参数 lpdwNumberOfBytesRead, 整数型, 传址

.DLL命令 HttpOpenRequest, 整数型, "wininet.dll", "HttpOpenRequestA"
.参数 hConnect, 整数型
.参数 lpszVerb, 文本型
.参数 lpszObjectName, 文本型
.参数 lpszVersion, 文本型
.参数 lpszReferer, 文本型
.参数 lplpszAcceptTypes, 整数型
.参数 dwFlags, 整数型
.参数 dwContext, 整数型, 传址

.DLL命令 HttpSendRequest, 整数型, "wininet.dll", "HttpSendRequestA"
.参数 hRequest, 整数型
.参数 lpszHeaders, 文本型
.参数 dwHeadersLength, 整数型
.参数 lpOptional, 文本型
.参数 dwOptionalLength, 整数型

.DLL命令 HttpAddRequestHeaders, 整数型, "wininet.dll", "HttpAddRequestHeadersA"
.参数 hConnect, 整数型
.参数 lpszHeaders, 文本型
.参数 dwHeadersLength, 整数型
.参数 dwModifiers, 整数型

.DLL命令 InternetCloseHandle, 整数型, "wininet.dll"
.参数 hInternet, 整数型

.DLL命令 InternetOpenUrl, 整数型, "wininet.dll", "InternetOpenUrlA"
.参数 hInternet, 整数型
.参数 lpszUrl, 文本型
.参数 lpszHeaders, 文本型
.参数 dwHeadersLength, 整数型
.参数 dwFlags, 整数型
.参数 dwContext, 整数型