易语言WinHttpAPI访问类模块源码

系统结构:W2M,M2W,W2P,P2W,端口,取域名,取页面地址,编码转换_,分析返回头COOKIES,取中间文本,COOKIE合并更新,内部销毁方法,初始化连接,置超时值,访问网页,GetMultiByteSizeRequired,WideCharToMultiByte,GetWideCharSizeRequired,MultiByteToWideChar,lstrcpyn_bytes2pointer,lstrcpyn_pointer2bytes,WinHttpCheckPlatform,WinHttpCrackUrl,WinHttpCreateUrl,WinHttpOpen,WinHttpSetTimeouts,WinHttpConnect,WinHttpOpenRequest,WinHttpAddRequestHeaders,WinHttpSendRequest,WinHttpReceiveResponse,WinHttpQueryHeaders,WinHttpQueryDataAvailable,WinHttpReadData,WinHttpDetectAutoProxyConfigUrl,WinHttpGetDefaultProxyConfiguration,WinHttpGetIEProxyConfigForCurrentUser,WinHttpGetProxyForUrl,WinHttpQueryAuthSchemes,WinHttpQueryOption,WinHttpSetCredentials,WinHttpSetDefaultProxyConfiguration,WinHttpSetOption_数值型,WinHttpSetStatusCallback,WinHttpTimeFromSystemTime,WinHttpTimeToSystemTime,WinHttpWriteData,WinHttpCloseHandle,InternetCrackUrl,GetLastError,对象类初始,对象类卸载,

======程序集1
           |  |
           |  |------ _启动子程序
           |  |
           |  |------ _临时子程序
           |  |
           |  |------ W2M
           |  |
           |  |------ M2W
           |  |
           |  |------ W2P
           |  |
           |  |------ P2W
           |  |
           |  |------ 端口
           |  |
           |  |------ 取域名
           |  |
           |  |------ 取页面地址
           |  |
           |  |------ 编码转换_
           |  |
           |  |------ ___BMZH__
           |  |
           |  |------ 分析返回头COOKIES
           |  |
           |  |------ 取中间文本
           |  |
           |  |------ COOKIE合并更新
           |  |
           |  |
======winhttp类
           |  |
           |  |------ _初始化
           |  |
           |  |------ _销毁
           |  |
           |  |------ 内部销毁方法
           |  |
           |  |------ 初始化连接
           |  |
           |  |------ 置超时值
           |  |
           |  |------ 访问网页
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   GetMultiByteSizeRequired
           |  |
           |  |---[dll]------   WideCharToMultiByte
           |  |
           |  |---[dll]------   GetWideCharSizeRequired
           |  |
           |  |---[dll]------   MultiByteToWideChar
           |  |
           |  |---[dll]------   lstrcpyn_bytes2pointer
           |  |
           |  |---[dll]------   lstrcpyn_pointer2bytes
           |  |
           |  |---[dll]------   WinHttpCheckPlatform
           |  |
           |  |---[dll]------   WinHttpCrackUrl
           |  |
           |  |---[dll]------   WinHttpCreateUrl
           |  |
           |  |---[dll]------   WinHttpOpen
           |  |
           |  |---[dll]------   WinHttpSetTimeouts
           |  |
           |  |---[dll]------   WinHttpConnect
           |  |
           |  |---[dll]------   WinHttpOpenRequest
           |  |
           |  |---[dll]------   WinHttpAddRequestHeaders
           |  |
           |  |---[dll]------   WinHttpSendRequest
           |  |
           |  |---[dll]------   WinHttpReceiveResponse
           |  |
           |  |---[dll]------   WinHttpQueryHeaders
           |  |
           |  |---[dll]------   WinHttpQueryDataAvailable
           |  |
           |  |---[dll]------   WinHttpReadData
           |  |
           |  |---[dll]------   WinHttpDetectAutoProxyConfigUrl
           |  |
           |  |---[dll]------   WinHttpGetDefaultProxyConfiguration
           |  |
           |  |---[dll]------   WinHttpGetIEProxyConfigForCurrentUser
           |  |
           |  |---[dll]------   WinHttpGetProxyForUrl
           |  |
           |  |---[dll]------   WinHttpQueryAuthSchemes
           |  |
           |  |---[dll]------   WinHttpQueryOption
           |  |
           |  |---[dll]------   WinHttpSetCredentials
           |  |
           |  |---[dll]------   WinHttpSetDefaultProxyConfiguration
           |  |
           |  |---[dll]------   WinHttpSetOption_数值型
           |  |
           |  |---[dll]------   WinHttpSetStatusCallback
           |  |
           |  |---[dll]------   WinHttpTimeFromSystemTime
           |  |
           |  |---[dll]------   WinHttpTimeToSystemTime
           |  |
           |  |---[dll]------   WinHttpWriteData
           |  |
           |  |---[dll]------   WinHttpCloseHandle
           |  |
           |  |---[dll]------   InternetCrackUrl
           |  |
           |  |---[dll]------   GetLastError
           |  |
           |  |---[dll]------   对象类初始
           |  |
           |  |---[dll]------   对象类卸载

调用的DLL命令:

.DLL命令 GetMultiByteSizeRequired, 整数型, "Kernel32.dll", "WideCharToMultiByte", , int GetSizeRequired
    .参数 CodePage, 整数型, , __in   UINT CodePage
    .参数 dwFlags, 整数型, , __in   DWORD dwFlags
    .参数 lpWideCharStr, 字节集, , __in   LPCWSTR lpWideCharStr
    .参数 cchWideChar, 整数型, , __in   int cchWideChar
    .参数 lpMultiByteStr, 整数型, 传址, __out  LPSTR lpMultiByteStr
    .参数 cbMultiByte, 整数型, , __in   int cbMultiByte
    .参数 lpDefaultChar, 整数型, , __in   LPCSTR lpDefaultChar
    .参数 lpUsedDefaultChar, 整数型, , __out  LPBOOL lpUsedDefaultChar

.DLL命令 WideCharToMultiByte, 整数型, "Kernel32.dll", "WideCharToMultiByte", , int WideCharToMultiByte
    .参数 CodePage, 整数型, , __in   UINT CodePage
    .参数 dwFlags, 整数型, , __in   DWORD dwFlags
    .参数 lpWideCharStr, 字节集, , __in   LPCWSTR lpWideCharStr
    .参数 cchWideChar, 整数型, , __in   int cchWideChar
    .参数 lpMultiByteStr, 文本型, 传址, __out  LPSTR lpMultiByteStr
    .参数 cbMultiByte, 整数型, , __in   int cbMultiByte
    .参数 lpDefaultChar, 整数型, , __in   LPCSTR lpDefaultChar
    .参数 lpUsedDefaultChar, 整数型, , __out  LPBOOL lpUsedDefaultChar

.DLL命令 GetWideCharSizeRequired, 整数型, "Kernel32.dll", "MultiByteToWideChar", , int GetWideCharSizeRequired
    .参数 CodePage, 整数型, , __in   UINT CodePage
    .参数 dwFlags, 整数型, , __in   DWORD dwFlags
    .参数 lpMultiByteStr, 文本型, , __in   LPCSTR lpMultiByteStr
    .参数 cbMultiByte, 整数型, , __in   int cbMultiByte
    .参数 lpWideCharStr, 整数型, , __out  LPWSTR lpWideCharStr
    .参数 cchWideChar, 整数型, , __in   int cchWideChar

.DLL命令 MultiByteToWideChar, 整数型, "Kernel32.dll", "MultiByteToWideChar", , int MultiByteToWideChar
    .参数 CodePage, 整数型, , __in   UINT CodePage
    .参数 dwFlags, 整数型, , __in   DWORD dwFlags
    .参数 lpMultiByteStr, 文本型, , __in   LPCSTR lpMultiByteStr
    .参数 cbMultiByte, 整数型, , __in   int cbMultiByte
    .参数 lpWideCharStr, 字节集, 传址, __out  LPWSTR lpWideCharStr
    .参数 cchWideChar, 整数型, , __in   int cchWideChar

.DLL命令 lstrcpyn_bytes2pointer, 整数型, "kernel32.dll", "lstrcpyn", , LPTSTR WINAPI lstrcpyn
    .参数 lpString1, 字节集, 传址, __out  LPTSTR lpString1
    .参数 lpString2, 字节集, 传址, __in   LPCTSTR lpString2
    .参数 iMaxLength, 整数型, , __in   int iMaxLength

.DLL命令 lstrcpyn_pointer2bytes, 整数型, "kernel32.dll", "lstrcpyn", , LPTSTR WINAPI lstrcpyn
    .参数 lpString1, 整数型, , __out  LPTSTR lpString1
    .参数 lpString2, 整数型, , __in   LPCTSTR lpString2
    .参数 iMaxLength, 整数型, , __in   int iMaxLength

.DLL命令 WinHttpCheckPlatform, 逻辑型, "Winhttp.dll", "WinHttpCheckPlatform", , BOOL WinHttpCheckPlatform(void);

.DLL命令 WinHttpCrackUrl, 逻辑型, "Winhttp.dll", "WinHttpCrackUrl", , BOOL WINAPI WinHttpCrackUrl
    .参数 pwszUrl, 整数型, , __in     LPCWSTR pwszUrl
    .参数 dwUrlLength, 整数型, , __in     DWORD dwUrlLength
    .参数 dwFlags, 整数型, , __in     DWORD dwFlags
    .参数 lpUrlComponents, URL_COMPONENTS, 传址, __inout  LPURL_COMPONENTS lpUrlComponents

.DLL命令 WinHttpCreateUrl, 逻辑型, "Winhttp.dll", "WinHttpCreateUrl", , BOOL WINAPI WinHttpCreateUrl
    .参数 lpUrlComponents, URL_COMPONENTS, , __in  LPURL_COMPONENTS lpUrlComponents
    .参数 dwFlags, 整数型, , __in     DWORD dwFlags
    .参数 pwszUrl, 整数型, , __out     LPCWSTR pwszUrl
    .参数 lpdwUrlLength, 整数型, 传址, __inout  LPDWORD lpdwUrlLength

.DLL命令 WinHttpOpen, 整数型, "Winhttp.dll", "WinHttpOpen", , HINTERNET WINAPI WinHttpOpen
    .参数 pwszUserAgent, 整数型, , __in_opt  LPCWSTR pwszUserAgent
    .参数 dwAccessType, 整数型, , __in      DWORD dwAccessType
    .参数 pwszProxyName, 整数型, , __in      LPCWSTR pwszProxyName
    .参数 pwszProxyBypass, 整数型, , __in      LPCWSTR pwszProxyBypass
    .参数 dwFlags, 整数型, , __in      DWORD dwFlags

.DLL命令 WinHttpSetTimeouts, 逻辑型, "Winhttp.dll", "WinHttpSetTimeouts", , BOOL WINAPI WinHttpSetTimeouts
    .参数 hInternet, 整数型, , __in  HINTERNET hInternet
    .参数 dwResolveTimeout, 整数型, , __in  int dwResolveTimeout
    .参数 dwConnectTimeout, 整数型, , __in  int dwConnectTimeout
    .参数 dwSendTimeout, 整数型, , __in  int dwSendTimeout
    .参数 dwReceiveTimeout, 整数型, , __in  int dwReceiveTimeout

.DLL命令 WinHttpConnect, 整数型, "Winhttp.dll", "WinHttpConnect", , HINTERNET WINAPI WinHttpConnect
    .参数 hSession, 整数型, , __in        HINTERNET hSession
    .参数 pswzServerName, 整数型, , __in        LPCWSTR pswzServerName
    .参数 nServerPort, 整数型, , __in        INTERNET_PORT nServerPort
    .参数 dwReserved, 整数型, , __reserved  DWORD dwReserved

.DLL命令 WinHttpOpenRequest, 整数型, "Winhttp.dll", "WinHttpOpenRequest", , HINTERNET WINAPI WinHttpOpenRequest
    .参数 hConnect, 整数型, , __in  HINTERNET hConnect
    .参数 pwszVerb, 整数型, , __in  LPCWSTR pwszVerb
    .参数 pwszObjectName, 整数型, , __in  LPCWSTR pwszObjectName
    .参数 pwszVersion, 整数型, , __in  LPCWSTR pwszVersion
    .参数 pwszReferrer, 整数型, , __in  LPCWSTR pwszReferrer
    .参数 ppwszAcceptTypes, 整数型, , __in  LPCWSTR *ppwszAcceptTypes
    .参数 dwFlags, 整数型, , __in  DWORD dwFlags

.DLL命令 WinHttpAddRequestHeaders, 逻辑型, "Winhttp.dll", "WinHttpAddRequestHeaders", , BOOL WINAPI WinHttpAddRequestHeaders
    .参数 hRequest, 整数型, , __in  HINTERNET hRequest
    .参数 pwszHeaders, 整数型, , __in  LPCWSTR pwszHeaders
    .参数 dwHeadersLength, 整数型, , __in  DWORD dwHeadersLength
    .参数 dwModifiers, 整数型, , __in  DWORD dwModifiers

.DLL命令 WinHttpSendRequest, 逻辑型, "Winhttp.dll", "WinHttpSendRequest", , BOOL WINAPI WinHttpSendRequest
    .参数 hRequest, 整数型, , __in      HINTERNET hRequest
    .参数 pwszHeaders, 整数型, , __in_opt  LPCWSTR pwszHeaders
    .参数 dwHeadersLength, 整数型, , __in      DWORD dwHeadersLength
    .参数 lpOptional, 整数型, , __in_opt  LPVOID lpOptional
    .参数 dwOptionalLength, 整数型, , __in      DWORD dwOptionalLength
    .参数 dwTotalLength, 整数型, , __in      DWORD dwTotalLength
    .参数 dwContext, 整数型, , __in      DWORD_PTR dwContext

.DLL命令 WinHttpReceiveResponse, 逻辑型, "Winhttp.dll", "WinHttpReceiveResponse", , BOOL WINAPI WinHttpReceiveResponse
    .参数 hRequest, 整数型, , __in        HINTERNET hRequest
    .参数 lpReserved, 整数型, , __reserved  LPVOID lpReserved

.DLL命令 WinHttpQueryHeaders, 逻辑型, "Winhttp.dll", "WinHttpQueryHeaders", , BOOL WINAPI WinHttpQueryHeaders
    .参数 hRequest, 整数型, , __in      HINTERNET hRequest
    .参数 dwInfoLevel, 整数型, , __in      DWORD dwInfoLevel
    .参数 pwszName, 整数型, , __in_opt  LPCWSTR pwszName
    .参数 lpBuffer, 整数型, , __out     LPVOID lpBuffer
    .参数 lpdwBufferLength, 整数型, 传址, __inout   LPDWORD lpdwBufferLength
    .参数 lpdwIndex, 整数型, 传址, __inout   LPDWORD lpdwIndex

.DLL命令 WinHttpQueryDataAvailable, 逻辑型, "Winhttp.dll", "WinHttpQueryDataAvailable", , BOOL WINAPI WinHttpQueryDataAvailable
    .参数 hRequest, 整数型, , __in   HINTERNET hRequest
    .参数 lpdwNumberOfBytesAvailable, 整数型, 传址, __out  LPDWORD lpdwNumberOfBytesAvailable

.DLL命令 WinHttpReadData, 逻辑型, "Winhttp.dll", "WinHttpReadData", , BOOL WINAPI WinHttpReadData
    .参数 hRequest, 整数型, , __in   HINTERNET hRequest
    .参数 lpBuffer, 整数型, , __out  LPVOID lpBuffer
    .参数 dwNumberOfBytesToRead, 整数型, , __in   DWORD dwNumberOfBytesToRead
    .参数 lpdwNumberOfBytesRead, 整数型, 传址, __out  LPDWORD lpdwNumberOfBytesRead

.DLL命令 WinHttpDetectAutoProxyConfigUrl, 逻辑型, "Winhttp.dll", "WinHttpDetectAutoProxyConfigUrl", , BOOL WINAPI WinHttpDetectAutoProxyConfigUrl
    .参数 dwAutoDetectFlags, 整数型, , __in   DWORD dwAutoDetectFlags
    .参数 ppwszAutoConfigUrl, 整数型, 传址, __out  LPWSTR *ppwszAutoConfigUrl

.DLL命令 WinHttpGetDefaultProxyConfiguration, 逻辑型, "Winhttp.dll", "WinHttpGetDefaultProxyConfiguration", , BOOL WINAPI WinHttpGetDefaultProxyConfiguration
    .参数 pProxyInfo, WINHTTP_PROXY_INFO, 传址, __inout  WINHTTP_PROXY_INFO *pProxyInfo

.DLL命令 WinHttpGetIEProxyConfigForCurrentUser, 逻辑型, "Winhttp.dll", "WinHttpGetIEProxyConfigForCurrentUser", , BOOL WINAPI WinHttpGetIEProxyConfigForCurrentUser
    .参数 pProxyConfig, WINHTTP_CURRENT_USER_IE_PROXY_CONFIG, , __inout  WINHTTP_CURRENT_USER_IE_PROXY_CONFIG *pProxyConfig

.DLL命令 WinHttpGetProxyForUrl, 逻辑型, "Winhttp.dll", "WinHttpGetProxyForUrl", , BOOL WINAPI WinHttpGetProxyForUrl
    .参数 hSession, 整数型, , __in   HINTERNET hSession
    .参数 lpcwszUrl, 整数型, , __in   LPCWSTR lpcwszUrl
    .参数 pAutoProxyOptions, WINHTTP_AUTOPROXY_OPTIONS, , __in   WINHTTP_AUTOPROXY_OPTIONS *pAutoProxyOptions
    .参数 pProxyInfo, WINHTTP_PROXY_INFO, 传址, __out  WINHTTP_PROXY_INFO *pProxyInfo

.DLL命令 WinHttpQueryAuthSchemes, 逻辑型, "Winhttp.dll", "WinHttpQueryAuthSchemes", , BOOL WINAPI WinHttpQueryAuthSchemes
    .参数 hRequest, 整数型, , __in   HINTERNET hRequest
    .参数 lpdwSupportedSchemes, 整数型, 传址, __out  LPDWORD lpdwSupportedSchemes
    .参数 lpdwFirstScheme, 整数型, 传址, __out  LPDWORD lpdwFirstScheme
    .参数 pdwAuthTarget, 整数型, 传址, __out  LPDWORD pdwAuthTarget

.DLL命令 WinHttpQueryOption, 逻辑型, "Winhttp.dll", "WinHttpQueryOption", , BOOL WINAPI WinHttpQueryOption
    .参数 hInternet, 整数型, , __in     HINTERNET hInternet
    .参数 dwOption, 整数型, , __in     DWORD dwOption
    .参数 lpBuffer, 整数型, , __out    LPVOID lpBuffer
    .参数 lpdwBufferLength, 整数型, , __inout  LPDWORD lpdwBufferLength

.DLL命令 WinHttpSetCredentials, 逻辑型, "Winhttp.dll", "WinHttpSetCredentials", , BOOL WINAPI WinHttpSetCredentials
    .参数 hRequest, 整数型, , __in        HINTERNET hRequest
    .参数 AuthTargets, 整数型, , __in        DWORD AuthTargets
    .参数 AuthScheme, 整数型, , __in        DWORD AuthScheme
    .参数 pwszUserName, 整数型, , __in        LPCWSTR pwszUserName
    .参数 pwszPassword, 整数型, , __in        LPCWSTR pwszPassword
    .参数 pAuthParams, 整数型, , __reserved  LPVOID pAuthParams

.DLL命令 WinHttpSetDefaultProxyConfiguration, 逻辑型, "Winhttp.dll", "WinHttpSetDefaultProxyConfiguration", , BOOL WINAPI WinHttpSetDefaultProxyConfiguration
    .参数 pProxyInfo, WINHTTP_PROXY_INFO, , __in  WINHTTP_PROXY_INFO *pProxyInfo

.DLL命令 WinHttpSetOption_数值型, 逻辑型, "Winhttp.dll", "WinHttpSetOption", , BOOL WINAPI WinHttpSetOption
    .参数 hInternet, 整数型, , __in  HINTERNET hInternet
    .参数 dwOption, 整数型, , __in  DWORD dwOption
    .参数 lpBuffer, 整数型, 传址, __in  LPVOID lpBuffer
    .参数 dwBufferLength, 整数型, , __in  DWORD dwBufferLength

.DLL命令 WinHttpSetStatusCallback, 整数型, "Winhttp.dll", "WinHttpSetStatusCallback", , WINHTTP_STATUS_CALLBACK WINAPI WinHttpSetStatusCallback
    .参数 hInternet, 整数型, , __in        HINTERNET hInternet
    .参数 lpfnInternetCallback, 整数型, , __in        WINHTTP_STATUS_CALLBACK lpfnInternetCallback
    .参数 dwNotificationFlags, 整数型, , __in        DWORD dwNotificationFlags
    .参数 dwReserved, 整数型, , __reserved  DWORD_PTR dwReserved

.DLL命令 WinHttpTimeFromSystemTime, 逻辑型, "Winhttp.dll", "WinHttpTimeFromSystemTime", , BOOL WINAPI WinHttpTimeFromSystemTime
    .参数 pst, SYSTEMTIME, , __in   const SYSTEMTIME *pst
    .参数 pwszTime, 整数型, , __out  LPWSTR pwszTime

.DLL命令 WinHttpTimeToSystemTime, 逻辑型, "Winhttp.dll", "WinHttpTimeToSystemTime", , BOOL WINAPI WinHttpTimeToSystemTime
    .参数 pwszTime, 整数型, , __in   LPCWSTR pwszTime
    .参数 pst, SYSTEMTIME, 传址, __out  SYSTEMTIME *pst

.DLL命令 WinHttpWriteData, 逻辑型, "Winhttp.dll", "WinHttpWriteData", , BOOL WINAPI WinHttpWriteData
    .参数 hRequest, 整数型, , __in   HINTERNET hRequest
    .参数 lpBuffer, 整数型, , __in   LPCVOID lpBuffer
    .参数 dwNumberOfBytesToWrite, 整数型, , __in   DWORD dwNumberOfBytesToWrite
    .参数 lpdwNumberOfBytesWritten, 整数型, 传址, __out  LPDWORD lpdwNumberOfBytesWritten

.DLL命令 WinHttpCloseHandle, 逻辑型, "Winhttp.dll", "WinHttpCloseHandle", , BOOL WINAPI WinHttpCloseHandle
    .参数 hInternet, 整数型, , __in  HINTERNET hInternet

.DLL命令 InternetCrackUrl, 逻辑型, "WinInet.dll", "InternetCrackUrlA", , BOOL WINAPI InternetCrackUrl
    .参数 lpszUrl, 文本型, , __in     LPCSTR lpszUrl
    .参数 dwUrlLength, 整数型, , __in     DWORD dwUrlLength
    .参数 dwFlags, 整数型, , __in     DWORD dwFlags
    .参数 lpUrlComponents, URL_COMPONENTSA, 传址, __inout  LPURL_COMPONENTS lpUrlComponents

.DLL命令 GetLastError, 整数型, "Kernel32.dll", "GetLastError"

.DLL命令 对象类初始, , "ole32.dll", "CoInitialize", , ,
    .参数 pvReserved, 整数型

.DLL命令 对象类卸载, , "ole32.dll", "CoUninitialize"