宝峰科技

 找回密码
 注册

QQ登录

只需一步,快速开始

智能终端设备维修查询系统注册会员邮箱认证须知!
查看: 6942|回复: 16

[页游辅助图文教程] 易语言+HttpWatch分析并编写Discuz! X1.51论坛管理器第五课

[复制链接]
  • TA的每日心情
    奋斗
    2020-6-5 22:18
  • 签到天数: 22 天

    [LV.4]偶尔看看III

    潇潇 发表于 2012-3-22 01:11:31 | 显示全部楼层 |阅读模式
    我们得把
    http://wgbcwsoft.web-108.com/1.51

    换成
    http://demo.wgbcw.com/dzx151gbk

    ,也就是说前面四课中所提到的
    wgbcwsoft.web-108.com

    换成
    demo.wgbcw.com

    1.51 换成 dzx151gbk,因演示站安装的是gbk版,所以得区分下。呵呵某些免费虚拟主机还是不给力呀,不多说继续写下面的内容。
    第四课中我们用易语言中的“HTTP读文件”命令,测试后达不到我们的要求,所以今天我们用API来实现我们要的功能。

    我们先看下WinInet.dll里的几个关于HTTP协议方面API函数(这里就先提几个我们用到的):InternetOpen 初始化 WinInet.dll;InternetConnect 建立 interner 的连接;HttpOpenRequest 打开一个HTTP请求;InternetCloseHandle 关闭一个单一的 internet 句柄;HttpSendRequest 向 HTTP 服务器发送指定的请求;InternetReadFile 从一个打开的句柄中读取数据。(注:要看祥细介绍请直接点击API函数进去看具体声明。)
    按照HTTP客户端处理流程具体如下:
    InternetOpen——InternetConnect——HttpOpenRequest——HttpSendRequest——InternetReadFile。我们就依照这个流程就可以来写代码了。要调用这几个API,我们还要在“DLL命令定义表”中定义下这几个API函数,代码略。
    1、用InternetOpen初始化WinInet.dll:
    先简单了解下InternetOpen的参数介绍第一参数是HTTP协议的用户代理,而我们在第一课中所取到的协议头(Headers),应该知道HTTP协议的用户代理是啥了,就是
    User-Agent(用户-代理)        Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 5.1; Trident/4.0; .NET CLR 2.0.50727; .NET CLR 3.0.4506.2152; .NET CLR 3.5.30729; .NET CLR 1.1.4322)

    ,为了方便调用Headers,我们先做如下定义:
    1. .版本 2

    2. .数据类型 Request, , Headers结构或称数据类型
    3.     .成员 Accept, 文本型, , , 招收内容
    4.     .成员 AcceptEncoding, 文本型, , , 接收编码Accept-Encoding
    5.     .成员 AcceptLanguage, 文本型, , , 接收语言Accept-Language
    6.     .成员 CacheControl, 文本型, , , 缓存控制Cache-Control
    7.     .成员 Connection, 文本型, , , 连接方式
    8.     .成员 ContentLength, 整数型, , , 连接长度Content-Length
    9.     .成员 ContentType, 文本型, , , 连接类型Content-Type
    10.     .成员 Cookie, 文本型, , , 不用解释了
    11.     .成员 Host, 文本型, , , 主机
    12.     .成员 Referer, 文本型, , , 提交者
    13.     .成员 UserAgent, 文本型, , , 用户代理User-Agent
    复制代码
    此时我们的第一个参数就是
    1. Request.UserAgent="Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 5.1; Trident/4.0; .NET CLR 2.0.50727; .NET CLR 3.0.4506.2152; .NET CLR 3.5.30729; .NET CLR 1.1.4322)";
    复制代码
    我们顺便把Request结构内容也帖出来,方便讲述:
    1. .版本 2

    2. Request.Accept = “image/gif, image/jpeg, image/pjpeg, image/pjpeg, application/x-shockwave-flash, application/x-ms-application, application/x-ms-xbap, application/vnd.ms-xpsdocument, application/xaml+xml, */*”
    3. Request.AcceptEncoding = “gzip,deflate”
    4. Request.AcceptLanguage = “zh-cn”
    5. Request.CacheControl = “no-cache”
    6. Request.Connection = “Keep-Alive”
    7. Request.ContentLength = 61
    8. Request.ContentType = “application/x-www-form-urlencoded”
    9. Request.Host = “demo.wgbcw.com”
    10. Request.Referer = “http://demo.wgbcw.com/dzx151gbk/forum.php”
    11. Request.UserAgent = “Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 5.1; Trident/4.0; .NET CLR 2.0.50727; .NET CLR 3.0.4506.2152; .NET CLR 3.5.30729; .NET CLR 1.1.4322)”
    复制代码
    InternetOpen中的第二个参数为HTTP访问类型,而我们要直接连接到服务器,所以这参数为1或者在易语言中做个常量定义,看个人习惯了。InternetOpen中的第三个参数为指向代理服务器的名字,由于我们这没用代理服务器,所以设为空字符串。InternetOpen中的第四个参数为代理主机名列表或 IP 地址,同第三个参数一样,设为空字符串。InternetOpen中的第五个参数为指定函数的行为影响的各种选项。由于我们要保持端口号一至,所以此参数为0或在易语言中定义常量。根据上面所述易语言中的代码应该写为:
    1. 初始化WinInet句柄 = InternetOpen (Request.UserAgent, #INTERNET_OPEN_TYPE_DIRECT, “”, “”, #INTERNET_INVALID_PORT_NUMBER)
    复制代码
    2、用InternetConnect建立 interner 的连接:
    先简单了解下API函数InternetConnect的参数介绍第一个参数为初始化 WinInet.dll 成功返回的句柄,即上面代码的“初始化WinInet句柄”。第二个参数为互联网服务器的主机名或IP地址,我们可调用上面的Request.Host。第三个参数为要连接到的服务器上的 TCP/IP 端口号,通常情况下默认都是80,常量调用为:#INTERNET_DEFAULT_HTTP_PORT。第四个参数为要登录的用户的名称,通常情况下在FTP协议中此参数才设置,在HTTP中这里为空,当然在此API介绍中说到HTTP协议中此参数为空时,会导致服务器返回一个错误,在测试中没有影响到我们的,暂时先设置为空,以后碰到再祥细分析。第五个参数用于登录的密码,这参数也是在FTP协议中,我们也设置为空。第六个参数为访问指定的服务类型,我们这访问的是HTTP服务器,那么我们这就设置为3或常量调用#INTERNET_SERVICE_HTTP。第七个参数为特定服务使用的标志。按照API的祥细说明,当第六个参数为INTERNET_SERVICE_FTP, INTERNET_FLAG_PASSIVE时会导致应用程序使用被动 FTP 语义,这样看来目前不知道参数为啥,所以暂且设置为0。第八个参数用于确定在返回的句柄回调的应用程序上下文的指针。同参数七设置为0。根据上面所述易语言中的代码应该写为:
    1. interner连接句柄 = InternetConnect (初始化WinInet句柄, Request.Host, #INTERNET_DEFAULT_HTTP_PORT, “”, “”, #INTERNET_SERVICE_HTTP, 0, 0)
    复制代码
    3、用HttpSendRequest打开一个HTTP请求:
    先简单了解下HttpSendRequest的参数介绍,第一个参数为建立 interner 的连接成功返回的句柄,即上面代码的“interner连接句柄”。第二个参数为在请求中使用动词名称("POST"或"GET")指针,由于我们第一课中所截取的Request-Line数据为“POST”方式,那我们这就设置为“POST”。第三个参数为指定动词的目标对象的名称,即第一课的Request-Line目标对象名称为“/dzx151gbk/member.php?mod=logging&action=login&loginsubmit=yes&infloat=yes&lssubmit=yes&inajax=1”。第四个参数为为 HTTP版本的指针,即第一课的Request-Line里的“HTTP/1.1”。第五个参数为指定第三个参数URL 请求获得文本的地址,由于这里没有必要取“/dzx151gbk/member.php?mod=logging&action=login&loginsubmit=yes&infloat=yes&lssubmit=yes&inajax=1”的地址,可以忽略,由于此参数是指针,也就是地址,那我们把它设置为0。第六个参数为客户接受的内容类型的指针的数组指针。由于默认为接收文本类型,我们就没有必要指定了,设置为0。如果要指定的话那就为Request.Accept。第七个参数为指定互联网标志位的掩码,我先选用如果资源已被修改重载HTTP资源,也就是INTERNET_FLAG_RELOAD=2147483648。第八个参数为应用程序定义的值的指针,由于具体没用到这里忽略,设置为0。根据上面所述易语言中的代码应该写为:
    1. 打开Http请求句柄 = HttpOpenRequest (interner连接句柄, “POST”, “/dzx151gbk/member.php?mod=logging&action=login&loginsubmit=yes&infloat=yes&lssubmit=yes&inajax=1”, “HTTP/1.1”, 0, 0, #INTERNET_FLAG_RELOAD, 0)
    复制代码
    4、用HttpSendRequest向HTTP服务器发送指定的请求:
    先简单了解下HttpSendRequest的参数介绍,第一个参数为打开一个HTTP请求句柄的成功的返回值,即上面代码的"打开Http请求句柄"。第二个参数为追加到请求的附加协议头(Headers),应为
    1. Headers = “Accept:*/*” + #换行符 + “Accept-Encoding:” + Request.AcceptEncoding + #换行符 + “Accept-Language:” + Request.AcceptLanguage + #换行符 + “Cache-Control:” + Request.CacheControl + #换行符 + “Connection:” + Request.Connection + #换行符 + “Content-Length:” + 到文本 (Request.ContentLength) + #换行符 + “Content-Type:” + Request.ContentType + #换行符 + “Host:” + Request.Host + #换行符 + “Referer:” + Request.Referer + #换行符 + “User-Agent:” + Request.UserAgent
    复制代码

    第三个参数为附加协议头的字符的长度,为 “取文本长度 (Headers)”。第四个参数为可被发送到服务器的资源或信息,POST里常用,在本教程中实际就是发送的会员账号密码等信息,则为
    1. PostData = “username=” + 编辑框1.内容 + “&password=” + 编辑框2.内容 + “&quickforward=yes&handlekey=ls”
    复制代码
    。第五个参数为参数四的文本长度,即“取文本长度 (PostData)”。根据上面所述易语言中的代码应该写为:
    HttpSendRequest (打开Http请求句柄, Headers, 取文本长度 (Headers), PostData, 取文本长度 (PostData))

    。如果发送指定请求成功的话,我们就可以利用InternetReadFile函数来获取相关的数据了,由于时间问题,今天就写到这里,明天有空了继续……睡觉去了。

    今天来接着讲,首先我们把上面的代码小结下:
    1. .版本 2

    2. Request.Accept = “image/gif, image/jpeg, image/pjpeg, image/pjpeg, application/x-shockwave-flash, application/x-ms-application, application/x-ms-xbap, application/vnd.ms-xpsdocument, application/xaml+xml, */*”
    3. Request.AcceptEncoding = “gzip,deflate”
    4. Request.AcceptLanguage = “zh-cn”
    5. Request.CacheControl = “no-cache”
    6. Request.Connection = “Keep-Alive”
    7. Request.ContentLength = 61
    8. Request.ContentType = “application/x-www-form-urlencoded”
    9. Request.Host = “demo.wgbcw.com”
    10. Request.Referer = “http://demo.wgbcw.com/dzx151gbk/forum.php”
    11. Request.UserAgent = “Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 5.1; Trident/4.0; .NET CLR 2.0.50727; .NET CLR 3.0.4506.2152; .NET CLR 3.5.30729; .NET CLR 1.1.4322)”  ' 本数据是在IE8.0下载获取
    12. ' Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; .NET CLR 2.0.50727; .NET CLR 3.0.4506.2152; .NET CLR 3.5.30729; .NET CLR 1.1.4322)’本数据是在IE6.0下载获取

    13. 初始化WinInet句柄 = InternetOpen (Request.UserAgent, #INTERNET_OPEN_TYPE_DIRECT, “”, “”, #INTERNET_INVALID_PORT_NUMBER)
    14. .如果 (初始化WinInet句柄 ≠ 0)
    15.     interner连接句柄 = InternetConnect (初始化WinInet句柄, Request.Host, #INTERNET_DEFAULT_HTTP_PORT, “”, “”, #INTERNET_SERVICE_HTTP, 0, 0)
    16. .否则
    17.     InternetCloseHandle (初始化WinInet句柄)
    18.     信息框 (“创建句柄 失败”, 0, )
    19. .如果结束

    20. .如果 (interner连接句柄 ≠ 0)
    21.     打开Http请求句柄 = HttpOpenRequest (interner连接句柄, “POST”, “/dzx151gbk/member.php?mod=logging&action=login&loginsubmit=yes&infloat=yes&lssubmit=yes&inajax=1”, “HTTP/1.1”, 0, 0, #INTERNET_FLAG_RELOAD, 0)
    22. .否则
    23.     InternetCloseHandle (interner连接句柄)
    24.     信息框 (“连接句柄 失败”, 0, )
    25. .如果结束

    26. ' HTTP协议头(Headers)
    27. Headers = “Accept:*/*” + #换行符 + “Accept-Encoding:” + Request.AcceptEncoding + #换行符 + “Accept-Language:” + Request.AcceptLanguage + #换行符 + “Cache-Control:” + Request.CacheControl + #换行符 + “Connection:” + Request.Connection + #换行符 + “Content-Length:” + 到文本 (Request.ContentLength) + #换行符 + “Content-Type:” + Request.ContentType + #换行符 + “Host:” + Request.Host + #换行符 + “Referer:” + Request.Referer + #换行符 + “User-Agent:” + Request.UserAgent

    28. ' HTTP发送的附加数据
    29. PostData = “username=” + 编辑框1.内容 + “&password=” + 编辑框2.内容 + “&quickforward=yes&handlekey=ls”
    复制代码
    5、我们前面提到了InternetReadFile函数来获取返回的数据。那还是先简单了解下InternetReadFile函数的参数介绍:第一个参数为HttpSendRequest 向HTTP服务器发送指定的请求成功的返回值,那此值为“打开Http请求句柄”;第二个参数为缓冲区返回数据指针,在易语言中没有强调指针的概念,当然我们可以用“字节集”和“传址”来实现这个指针,本课中定义为字节集类型的“返回数据”;第三个参数为要读取缓冲区数据的长度,那此值为“取字节集长度 (返回数据)”;第四个参数为接收返回数据读取字节数的字节值,由于我们在接收数据时都是为了取下一条数据要发送的内容,所以我们这通常情况都是接收服务器当前返回字节的最大值,在本教程中定义为“dwByteRead”。根据上面所讲取“返回数据”的代码应该写为:
    1. InternetReadFile (打开Http请求句柄, 返回数据, 取字节集长度 (返回数据), dwByteRead)
    复制代码
    在前面几个课里讲述到和服务器通信的数据中下面一条数据内容总是或多或少是上一条数据的返回数据,所以我们在这之后就要经常用到HttpSendRequest和InternetReadFile这两个API。一个是发送请求,一个是读取返回的数据。所以我们的关键就是取返回数据,请大家在写代码时参考第二课、第三课和第四课的祥细分析,这里我们就略过了,仅发代码做参考。
    游客,如果您要查看本帖隐藏内容请回复
    再补充个demo.wgbcw.com域名下的“输入正确账号密码取验证码”的HttpWatch数据文件:


    本帖子中包含更多资源

    您需要 登录 才可以下载或查看,没有账号?注册

    x
  • TA的每日心情
    奋斗
    2020-6-5 22:18
  • 签到天数: 22 天

    [LV.4]偶尔看看III

     楼主| 潇潇 发表于 2012-3-23 22:49:06 | 显示全部楼层
    内容已经更新喜欢的朋友可以接着看了

    该用户从未签到

    漏网之鱼 发表于 2012-4-17 13:43:21 | 显示全部楼层
    谢谢lz分享  非常感谢
  • TA的每日心情
    难过
    2013-1-26 14:47
  • 签到天数: 8 天

    [LV.3]偶尔看看II

    豆瓣 发表于 2012-4-18 10:41:05 | 显示全部楼层
    急需啊  ! 谢谢

    该用户从未签到

    南水无鱼 发表于 2012-5-5 02:40:24 | 显示全部楼层
    感谢楼主分享,。
  • TA的每日心情
    奋斗
    2020-6-5 22:18
  • 签到天数: 22 天

    [LV.4]偶尔看看III

     楼主| 潇潇 发表于 2012-5-5 19:08:20 | 显示全部楼层

    源码已经上传,供大家参考……

    该用户从未签到

    bbcwo 发表于 2012-10-6 13:38:23 | 显示全部楼层
    怎么增加COOK
  • TA的每日心情

    2012-11-1 21:56
  • 签到天数: 1 天

    [LV.1]初来乍到

    水木夕阳 发表于 2012-11-1 21:54:43 | 显示全部楼层
    谢谢分享

    该用户从未签到

    AdGame 发表于 2013-1-10 01:54:48 | 显示全部楼层
    喜欢的朋友可以接着看了

    该用户从未签到

    chnn888 发表于 2013-3-4 15:30:35 | 显示全部楼层
    谢谢lz分享  非常感谢

    该用户从未签到

    ls1231xx 发表于 2013-4-8 10:30:19 | 显示全部楼层
    我要仔细的看一遍

    该用户从未签到

    定做小型管理软 发表于 2013-10-12 10:26:44 | 显示全部楼层
    好东东,下来看看
  • TA的每日心情
    开心
    2013-6-24 13:08
  • 签到天数: 1 天

    [LV.1]初来乍到

    12121 发表于 2013-12-27 21:56:08 | 显示全部楼层
    看看什么东东

    该用户从未签到

    pangys 发表于 2014-1-15 20:07:43 | 显示全部楼层
    来看看呗,我是新手

    该用户从未签到

    贝克汉姆 发表于 2014-1-15 21:21:29 | 显示全部楼层
    看看  学到东西了
    您需要登录后才可以回帖 登录 | 注册

    本版积分规则

    免责声明

    本站中所有被研究的素材与信息全部来源于互联网,版权争议与本站无关。本站所发布的任何软件编程开发或软件的逆向分析文章、逆向分析视频、补丁、注册机和注册信息,仅限用于学习和研究软件安全的目的。全体用户必须在下载后的24个小时之内,从您的电脑中彻底删除上述内容。学习编程开发技术或逆向分析技术是为了更好的完善软件可能存在的不安全因素,提升软件安全意识。所以您如果喜欢某程序,请购买注册正版软件,获得正版优质服务!不得将上述内容私自传播、销售或者用于商业用途!否则,一切后果请用户自负!

    QQ|Archiver|手机版|小黑屋|联系我们|宝峰科技 ( 滇公网安备 53050202000040号 | 滇ICP备09007156号-2 )

    Copyright © 2001-2023 Discuz! Team. GMT+8, 2024-3-29 16:21 , File On Powered by Discuz! X3.49

    快速回复 返回顶部 返回列表