请教大虾！怎么捕捉WebElement的值！

sean007

http://hotels.ctrip.com/hotel/6531.html
这个页面中
抓出酒店的描述！
自己的思路 找到左右的对象然后按照固定的格式抓出来但是 不会搞！ 请指教！
谢谢!

fei.ge

上面的脚本是1、先定义出了WebElement，让QTP能够先识别出这个webelement。
            2、通过GetRoPertery来获取WebElement的run-time值

sean007

Dim city,hotelname,Click

city = "南昌"

hotelname = "南昌锦峰大酒店"


Btitle = hotelname&" - "&city&"酒店预订"&" - 携程旅行网"






Browser("携程旅行网: 酒店预订 - 机票预订 - 旅游度假").Page("携程旅行网: 酒店预订 - 机票预订 - 旅游度假").WebEdit("cityname").Set city
Browser("携程旅行网: 酒店预订 - 机票预订 - 旅游度假").Page("携程旅行网: 酒店预订 - 机票预订 - 旅游度假").WebEdit("starttime").Set "2009-5-20"
Browser("携程旅行网: 酒店预订 - 机票预订 - 旅游度假").Page("携程旅行网: 酒店预订 - 机票预订 - 旅游度假").WebEdit("deptime").Set "2009-5-21"
Browser("携程旅行网: 酒店预订 - 机票预订 - 旅游度假").Page("携程旅行网: 酒店预订 - 机票预订 - 旅游度假").WebEdit("htln").Set hotelname
Browser("携程旅行网: 酒店预订 - 机票预订 - 旅游度假").Page("携程旅行网: 酒店预订 - 机票预订 - 旅游度假").WebButton("搜索").Click
Browser("酒店查询结果 - 酒店预订 - 国内国际酒店预订服务").Sync
Browser("酒店查询结果 - 酒店预订 - 国内国际酒店预订服务").Page("酒店查询结果 - 酒店预订 - 国内国际酒店预订服务").Link("text:="&hotelname).click
'Browser("title:="&hotelname -).Sync
Browser("title:="&Btitle).Sync
'Browser("title:="&Btitle).page("title:="&Btitle).WebElement("innertext:=联系方式")

Set Bro = Description.Create()
        Bro("title").value = ".*"
Set Pag = Description.Create()
        Pag("title").value = ".*"
Set WebElement1 = Description.Create()
        WebElement1("innertext").value = ".*南昌锦峰大酒店.*"
        WebElement1("html tag").value = "SPAN"

temp = Browser(Bro).Page(Pag).WebElement(WebElement1).GetROProperty ("outertext")

print temp

我现在是要把这个数据参数化 因为可能有10个酒店
WebElement1("innertext").value = ".*南昌锦峰大酒店.*"是否可以代替为
WebElement1("innertext").value = ".*"&hotelname&".*"

但是运行时貌似会报错temp = Browser(Bro).Page(Pag).WebElement(WebElement1).GetROProperty ("outertext")

sean007

大虾就是大虾！
谢谢！
小弟学到很多东西！刚用QTP不久在结合者HELP以及实例在学习！
以后请各位大虾多指点迷津 好不去西天取经 哇哈哈！

fei.ge

试试下面的脚本：
===============================================================================
Set Bro = Description.Create()
        Bro("title").value = ".*"
Set Pag = Description.Create()
        Pag("title").value = ".*"
Set WebElement1 = Description.Create()
        WebElement1("innertext").value = ".*南昌锦峰大酒店是.*"
        WebElement1("html tag").value = "SPAN"

temp = Browser(Bro).Page(Pag).WebElement(WebElement1).GetROProperty ("outertext")
print temp
===============================================================================

sean007

是<SPAN>标签

sean007

<span > 标签形式
其他的都能找到！ 就是<SPAN>的对象在用QTP捕捉不到！。。。。

nbkhic

看看那个描述是不是以form的形式组织的，如果是的话就好办了。