找回密码
 加入
搜索
AUTOIT CN»论坛 › AU3交流 › 『 提问交流 』 › 已解决问题区 › 【已解决】需要进行多次操作获取数据，能否用Post或Get ...
返回列表 发新帖
查看: 9181|回复: 13

[IE类操作] 【已解决】需要进行多次操作获取数据，能否用Post或Get一次完成？

 火.. [复制链接]
.個朲綉√
发表于 2011-10-9 22:25:37 | 显示全部楼层 |阅读模式
本帖最后由 .個朲綉√ 于 2011-11-6 09:12 编辑 


While 1
        _get_Post($ie_Cookie)
        _get_No1($ie_Cookie)
        _get_No2($ie_Cookie)
        ;就是想知道这三次操作，能不能合为一次操作，或者说放在一个函数中进行。
WEnd

Func _get_Post($ie_Cookie);提交必要的数据
        $poststr="Cookie"
        $xmlhttp.open("post","http://www.baidu.com",false)
        $xmlhttp.setRequestHeader("Accept","application/x-ms-application, image/jpeg, application/xaml+xml, image/gif, image/pjpeg, application/x-ms-xbap, application/vnd.ms-excel, application/msword, */*")
        $xmlhttp.setRequestHeader("Referer", "http://www.baidu.com")
        $xmlhttp.setRequestHeader("Accept-Language", "zh-CN")
        $xmlhttp.setRequestHeader("User-Agent","Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 6.1; WOW64; Trident/5.0; SLCC2; .NET CLR 2.0.50727; .NET CLR 3.5.30729; .NET CLR 3.0.30729; Media Center PC 6.0; BOIE9;ZHCN)")
        $xmlhttp.setRequestHeader("Content-Type","application/x-www-form-urlencoded")
        $xmlhttp.setRequestHeader("Accept-Encoding","gzip, deflate")
        $xmlhttp.setRequestHeader("Host","www.baidu.com")
        $xmlhttp.setRequestHeader("Content-Length",StringLen($poststr))
        $xmlhttp.setRequestHeader("Connection"," Keep-Alive")
        $xmlhttp.setRequestHeader("Pragma","no-cache")
        $xmlhttp.setRequestHeader("Cookie",$ie_Cookie)
        $xmlhttp.send($poststr)
        $para_txt=$xmlhttp.Responsetext
        If $para_txt=="" Then
                Return 0
        EndIf
        Return 1
EndFunc

Func _get_No1($ie_Cookie);提交查询
        $xmlhttp.open("get","http://www.baidu.com",False)
        $xmlhttp.setRequestHeader("Accept","application/x-ms-application, image/jpeg, application/xaml+xml, image/gif, image/pjpeg, application/x-ms-xbap, application/vnd.ms-excel, application/msword, */*")
        $xmlhttp.setRequestHeader("Referer", "http://www.baidu.com")
        $xmlhttp.setRequestHeader("Accept-Language", "zh-CN")
        $xmlhttp.setRequestHeader("User-Agent","Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 6.1; WOW64; Trident/5.0; SLCC2; .NET CLR 2.0.50727; .NET CLR 3.5.30729; .NET CLR 3.0.30729; Media Center PC 6.0; BOIE9;ZHCN)")
        $xmlhttp.setRequestHeader("Accept-Encoding","gzip, deflate")
        $xmlhttp.setRequestHeader("Host","www.baidu.com")
        $xmlhttp.setRequestHeader("Connection"," Keep-Alive")
        $xmlhttp.setRequestHeader("Cookie",$ie_Cookie)
        $xmlhttp.send()
        $para_txt=$xmlhttp.Responsetext
        If $para_txt=="" Then
                Return 0
        EndIf
        Return 1
EndFunc

Func _get_No2($ie_Cookie);这个为自动GET的数据，不知道是否必需。
        $xmlhttp.open("get","http://http://www.baidu.com/s?wd=Autoit&rsv_spt=1&issp=1&rsv_bp=0&ie=utf-8&tn=baiduhome_pg&inputT=3668",False)
        $xmlhttp.setRequestHeader("Accept","application/x-ms-application, image/jpeg, application/xaml+xml, image/gif, image/pjpeg, application/x-ms-xbap, application/vnd.ms-excel, application/msword, */*")
        $xmlhttp.setRequestHeader("Referer", "http://www.baidu.com");这里必需为上一个GET网址。
        $xmlhttp.setRequestHeader("Accept-Language", "zh-CN")
        $xmlhttp.setRequestHeader("User-Agent","Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 6.1; WOW64; Trident/5.0; SLCC2; .NET CLR 2.0.50727; .NET CLR 3.5.30729; .NET CLR 3.0.30729; Media Center PC 6.0; BOIE9;ZHCN)")
        $xmlhttp.setRequestHeader("Accept-Encoding","gzip, deflate")
        $xmlhttp.setRequestHeader("Host","www.baidu.com")
        $xmlhttp.setRequestHeader("Connection"," Keep-Alive")
        $xmlhttp.setRequestHeader("Cookie",$ie_Cookie)
        $xmlhttp.send()
        $para_txt=$xmlhttp.Responsetext
        If $para_txt=="" Then
                Return 0
        EndIf
        $xdll = StringRegExp($para_txt,'(?s)总流量\(M\):(\d+)',1)
        Return 1
EndFunc


可能我表达的不够清楚，有些词不达意吧，所以搜了半天没搜到，我再描述一下吧，希望有人能理解。

就是我首先要在一个页面输入数据，然后提交，这第一步是要Post的。 (如函数_get_Post)
提交完数据后，第二步要选择查询的方式，如选择日期等，然后再提交，这一步是Get的。 (如函数_get_No1)

在第二次提交后，我在抓包中发现有第三次Get， （如函数_get_No2） ，最终获取数据。

不知道能否用一个函数完成这些操作，当然我说的一个函数，并不是说合并在一起
而是希望简化操作，如下：（不知具体写法，希望高人指点）

        $poststr="Cookie"
        $xmlhttp.open("post","http://www.baidu.com",false)
        $xmlhttp.setRequestHeader("Accept","application/x-ms-application, image/jpeg, application/xaml+xml, image/gif, image/pjpeg, application/x-ms-xbap, application/vnd.ms-excel, application/msword, */*")
        $xmlhttp.setRequestHeader("Referer", "http://www.baidu.com")
        $xmlhttp.setRequestHeader("Accept-Language", "zh-CN")
        $xmlhttp.setRequestHeader("User-Agent","Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 6.1; WOW64; Trident/5.0; SLCC2; .NET CLR 2.0.50727; .NET CLR 3.5.30729; .NET CLR 3.0.30729; Media Center PC 6.0; BOIE9;ZHCN)")
        $xmlhttp.setRequestHeader("Content-Type","application/x-www-form-urlencoded")
        $xmlhttp.setRequestHeader("Accept-Encoding","gzip, deflate")
        $xmlhttp.setRequestHeader("Host","www.baidu.com")
        $xmlhttp.setRequestHeader("Content-Length",StringLen($poststr))
        $xmlhttp.setRequestHeader("Connection"," Keep-Alive")
        $xmlhttp.setRequestHeader("Pragma","no-cache")
        $xmlhttp.setRequestHeader("Cookie",$ie_Cookie)
        $xmlhttp.send($poststr)
        $xmlhttp.open("get","http://www.baidu.com",False)
        $xmlhttp.open("get","http://http://www.baidu.com/s?wd=Autoit&rsv_spt=1&issp=1&rsv_bp=0&ie=utf-8&tn=baiduhome_pg&inputT=3668",False)
get, post

相关帖子
回复

举报

Au3代码高亮发贴标签： [AU3] 你的代码 [/AU3]                   支持论坛的发展，请添加此》》网址导航《《为您的主页          
seniors
发表于 2011-10-10 08:22:55 | 显示全部楼层
你的第4个代码，不就是一起的吗，应该行的
回复

举报

republican
发表于 2011-10-10 08:30:22 | 显示全部楼层
回复 1# .個朲綉√

了解一下winhttp和wininet的编程相关吧。
回复

举报

.個朲綉√
 楼主| 发表于 2011-10-10 09:13:47 | 显示全部楼层
回复  .個朲綉√

了解一下winhttp和wininet的编程相关吧。
republican 发表于 2011-10-10 08:30



    哦，不知道是否可以实现，分成三段代码来做三个动作，感觉有些多余。

我这就去查查winhtt和wininet相关资料。
回复

举报

xiao030712
发表于 2011-10-10 09:34:26 | 显示全部楼层
用来干麻的！
回复

举报

bakefish
发表于 2011-10-10 21:52:14 | 显示全部楼层
这么简单的事情，为什么不自己试试是否可行呢？
一开始，无所谓搞得清搞不清原理，自己动手做做，反过来再看文档，才会有更多收获。

评分

参与人数 1金钱 +30 贡献 +5 收起 理由
.個朲綉√ + 30 + 5 非常感谢您，谢谢！！！

查看全部评分

回复

举报

.個朲綉√
 楼主| 发表于 2011-10-11 02:32:31 | 显示全部楼层
这么简单的事情，为什么不自己试试是否可行呢？
一开始，无所谓搞得清搞不清原理，自己动手做做，反过来再 ...
bakefish 发表于 2011-10-10 21:52



    谢谢前辈指点，您说的对，我自己再琢磨一下。

第二步get数据，直接复制到地址栏也可查询，是否可以au3中也可省略？我试的结果都不对，不知是我写错了，还是必须post

自己再试试吧，谢谢您！
回复

举报

zkjlcj911
发表于 2011-10-13 01:47:06 | 显示全部楼层
姐姐也来看看
回复

举报

yorker0503
发表于 2011-10-16 21:47:25 | 显示全部楼层
应该不难把~~~

评分

参与人数 1金钱 +10 收起 理由
.個朲綉√ + 10 的确不难，谢谢.

查看全部评分

回复

举报

bdancerlc
发表于 2011-11-1 02:16:47 | 显示全部楼层
我在另一个帖子下附件，居然说我金币不足！..于是我就来到了这里！...

评分

参与人数 1金钱 +30 收起 理由
.個朲綉√ + 30 那就送你30个金币吧。

查看全部评分

回复

举报

.個朲綉√
 楼主| 发表于 2011-11-6 09:11:48 | 显示全部楼层
此问题已解决，可以连续GET操作的，不错....

Func _login()
        $xmlhttp.open("get","http://www.baidu.com",False)
        $xmlhttp.send()
        $para_txt=$xmlhttp.Responsetext
        $lt = StringRegExp($para_txt,'(?m)(?<="lt").*?"(\V+)" />',1)
        $poststr="username=百度&password=密码<="&$lt[0]&"&_eventId=submit"
        $xmlhttp.open("post","http://www.baidu.com",false)
        $xmlhttp.setRequestHeader("Content-Type","application/x-www-form-urlencoded")
        $xmlhttp.send($poststr)
        $para_txt=$xmlhttp.Responsetext
        $lt = StringRegExp($para_txt,'(?m)(?<="lt").*?"(\V+)" />',1)
        $poststr="asHelp=0&loginPwd=密码<="&$lt[0]&"&_eventId=submit&operatorId=百度"
        $xmlhttp.open("post","http://www.baidu.com",false)
        $xmlhttp.setRequestHeader("Content-Type","application/x-www-form-urlencoded")
        $xmlhttp.send($poststr)
        $para_txt=$xmlhttp.Responsetext
        $xmlhttp.open("get","http://www.baidu.com",False)
        $xmlhttp.setRequestHeader("Content-Type","application/x-www-form-urlencoded")
        $xmlhttp.send("")
        $para_txt=$xmlhttp.Responsetext
        $xmlhttp.open("get","http://www.baidu.com",False)
        $xmlhttp.send("")
        $para_txt=$xmlhttp.Responsetext
EndFunc
回复

举报

happyplace
发表于 2011-12-13 15:39:27 | 显示全部楼层
路过学习！
回复

举报

blue_dvd
发表于 2011-12-23 10:12:03 | 显示全部楼层
新手，看了还是不明白$xmlhttp.send()，到底send什么？
回复

举报

xhz520
发表于 2013-4-5 06:01:57 | 显示全部楼层
直接是看不懂呀
回复

举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-12-23 02:35 , Processed in 0.217081 second(s), 24 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

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