如何才能获取页面中的信息

huangningmeng · 发表于 2012-7-31 12:12:40

本人初学AU3，在工作，希望能通过AU3自动获取页面中的“订单号”，以及相关信息，保存至Excel表格中，如图中红框所示

相应的网页如下

请各位大神帮忙解决一下，谢谢

whitehead · 发表于 2012-7-31 14:57:28

用正则提取该网页源码中信息不难

huangningmeng · 发表于 2012-7-31 17:23:41

回复 2# whitehead

本人正则还不是很会，能否帮忙实现一下，谢谢

xlj310 · 发表于 2012-7-31 18:42:07

回复 3# huangningmeng

简单的我会，抛砖引玉吧~


#include<array.au3>

$text=FileRead("ord.txt")
;订单信息
$OrdInfo=StringRegExp($text,"(?ms)<b>(\d+).+客房面积：(\d+平方米).+床铺尺寸：([^<]+).+所在楼层：(.+层).+有无窗户：([^<]).+加　　床：([^<]+)",3)
_ArrayDisplay($OrdInfo,"订单信息")


;订单号                = $Ord[0]

;客房面积        = $Ord[1]

;床铺尺寸        = $Ord[2]

;所在楼层        = $Ord[3]

;有无窗户        = $Ord[4]

;加床                = $Ord[5]

代码中Ord.txt是楼主的附件转换成原代码的TXT记事本，实际使用时请自行修改代码变为读取网页源代码。
我把Ord.txt也打包上传吧！

shenrenba · 发表于 2012-8-1 09:57:13

huangningmeng · 发表于 2012-8-1 10:15:40

回复 4# xlj310

直接获取网页内的所有代码，然后用正则为何取不出来

#include <IE.au3>
#include <Array.au3>
$oIE = _IEAttach ("预订-提交成功") ;前提是把那个网页用IE打开
$otext=_IEDocReadHTML($oIE);能正常获取
MsgBox(0,"网页内容",$otext);查看获取的内容
$OrdInfo=StringRegExp($otext,"(?ms)<b>(\d+).+客房面积：(\d+平方米).+床铺尺寸：([^<]+).+所在楼层：(.+层).+有无窗户：([^<]).+加　　床：([^<]+)",3)
_ArrayDisplay($OrdInfo,"订单信息")

运行如上代码后无返回值出来

xlj310 · 发表于 2012-8-2 00:02:47

回复 6# huangningmeng


    #include <IE.au3>
#include <Array.au3>
$oIE = _IEAttach ("预订-提交成功") ;前提是把那个网页用IE打开
$otext=_IEDocReadHTML($oIE);能正常获取
;MsgBox(0,"网页内容",$otext);查看获取的内容
$OrdInfo=StringRegExp($otext,"(?msi)<b>(\d+).+客房面积：(\d+平方米).+床铺尺寸：([^<]+).+所在楼层：(.+层).+有无窗户：([^<]).+加　　床：([^<]+)",3)
_ArrayDisplay($OrdInfo,"订单信息")

xlj310 · 发表于 2012-8-2 00:04:33

请务必使浏览器的核心为IE核心，否则_IEAttach就会失败

		自动登录	找回密码
密码			加入

[IE类操作] 如何才能获取页面中的信息

本帖子中包含更多资源

相关帖子

本帖子中包含更多资源

本帖子中包含更多资源