易语言读网页框架源码

系统结构:InternetOpenA,InternetOpenUrlA,InternetReadFile,InternetCloseHandle,

======窗口程序集1
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   InternetOpenA
           |  |
           |  |---[dll]------   InternetOpenUrlA
           |  |
           |  |---[dll]------   InternetReadFile
           |  |
           |  |---[dll]------   InternetCloseHandle

调用的DLL命令:

.DLL命令 InternetOpenA, 整数型, "Wininet.dll", "InternetOpenA", , 返回hInternet
    .参数 lpszAgent, 文本型
    .参数 dwAccessType, 整数型
    .参数 lpszProxy, 文本型
    .参数 lpszProxyBypass, 文本型
    .参数 dwFlags, 整数型, , 0

.DLL命令 InternetOpenUrlA, 整数型, "Wininet.dll", "InternetOpenUrlA", , 如果已成功建立到FTP，Gopher，或HTTP URL的连接，返回一个有效的句柄，如果连接失败返回NULL。要检索特定的错误讯息，请GetLastError 。要确定为什么对服务器的访问被拒绝，请调用InternetGetLastResponseInfo。 
    .参数 hInternet, 整数型, , 当前的 Internet 会话句柄。句柄必须由前期的 InternetOpen 调用返回。
    .参数 lpszUrl, 文本型, , 一个空字符结束的字符串变量的指针，指定读取的网址。只有以ftp:, gopher:, http:, 或者 https: 开头的网址被支持。
    .参数 lpszHeaders, 文本型, , 一个空字符结束的字符串变量的指针，指定发送到HTTP服务器的头信息。欲了解更多信息，请参阅HttpSendRequest函数里lpszHeaders参数的说明。
    .参数 dwHeadersLength, 整数型, , 额外的头的大小，以TCHAR为单位。如果这个参数是-1L并且lpszHeaders不是NULL，lpszHeaders被假设为零终止（ ASCIIZ ），而长度被自动计算。
    .参数 dwFlags, 整数型
    .参数 dwContext, 整数型, , 一个指向一个应用程序定义的值，将随着返回的句柄，一起传递给回调函数。

.DLL命令 InternetReadFile, 逻辑型, "Wininet.dll", "InternetReadFile"
    .参数 hOpenUrl, 整数型
    .参数 lpBuffer, 字节集, , 缓冲区
    .参数 dwNumberOfBytesToRead, 整数型, , 缓冲区长度
    .参数 lpdwNumberOfBytesRead, 整数型, 传址

.DLL命令 InternetCloseHandle, 逻辑型, "Wininet.dll", "InternetCloseHandle"
    .参数 hHandle, 整数型