j44jj44j 发表于 2008-12-10 09:28:03

求教:描述性编程

我想做的操作是,打开51testing论坛,点击 进入qtp板块,点击“精华”
我先录制了一段脚本,脚本如下:
SystemUtil.Run "iexplore.exe","http://bbs.51testing.com"
Browser("51Testing软件测试论坛 软件测试 |").Page("51Testing软件测试论坛 软件测试 |").Link("").Click
Browser("51Testing软件测试论坛 软件测试 |").Page(" - 51Testing软件测").Link("精华").Click
运行正常。
然后我把对象库清空,写了如下代码:
SystemUtil.Run "iexplore.exe","http://bbs.51testing.com"
Browser("title:=51Testing.*").Page("title:=51Testing.*").Link("innertext:=").Click
Browser("title:=51Testing.*").Page("title:=51Testing.*").Link("innertext:=精华").Click
运行时提示识别不了Link

kou_dou 发表于 2008-12-10 10:24:03

.Link("html tag:=A","text:=精华").Click

j44jj44j 发表于 2008-12-10 12:58:58

SystemUtil.Run "iexplore.exe","http://bbs.51testing.com"
Browser("title:=51Testing.*").Page("title:=51Testing.*").Link("html tag:=A","text:=").Click
Browser("title:=51Testing.*").Page("title:=51Testing.*").Link("html tag:=A","text:=精华").Click
还是不行啊,为什么呢?

鹭岛 发表于 2008-12-10 13:45:12

试看看index:=0或index:=1这样的描述吧!!!
.Link("index:=1","text:=精华").Click

j44jj44j 发表于 2008-12-10 14:37:52

鹭岛,还是不行:(

鹭岛 发表于 2008-12-10 15:37:26

Browser("title:=.*51Testing.*").Page("title:=.*51Testing.*").Link("text:=精华").Click

自己描述错了。。。。Browser和Page的TITLE属性值根本是描述错了,才会导致这样,我刚才帮你测试了下,使用上面那一句就OK了

鹭岛 发表于 2008-12-10 15:41:22

当然点击进入QTP这个模块的时候,TITLE的属性值就改变了,之前点击那个QTP那一句就不需要更改了

j44jj44j 发表于 2008-12-10 15:52:33

谢谢鹭岛耐心的解答
Browser("title:=.*51Testing.*").Page("title:=.*51Testing.*").Link("text:=精华").Click可以了
不过Browser("title:=51Testing.*").Page("title:=51Testing.*").Link("text:=").Click还是不可以
前边加.*也不行

鹭岛 发表于 2008-12-10 15:57:54

回复 8# 的帖子

晕,不是告诉你
Browser("title:=51Testing.*").Page("title:=51Testing.*").Link("text:=").Click
这个就不需要改了。。。就改
Browser("title:=.*51Testing.*").Page("title:=.*51Testing.*").Link("text:=精华").Click
就OK了

我这边使用这两句话运行完全没问题,如果有问题,LZ估计的找找人品了:lol :lol :lol

j44jj44j 发表于 2008-12-10 20:33:53

写成下边这样总算好了,谢谢鹭岛!
systemutil.Run "iexplore.exe","http://bbs.51testing.com"
Browser("title:=51Testing.*").Page("title:=51Testing.*").Link("text:=.*QuickTest Pro.*").Click
Browser("title:=.*51Testing.*").Page("title:=.*51Testing.*").Link("text:=精华").Click

ltp401128401128 发表于 2008-12-16 19:49:48

记得用拷贝,不要自己写。。。

zhuyuancan 发表于 2008-12-20 15:49:12

Browser("title:=51Testing.*").Page("title:=51Testing.*").Link("innertext:=\").Click
Browser("title:=51Testing.*").Page("title:=51Testing.*").Link("innertext:=精华").Click

tracyd 发表于 2008-12-21 07:06:35

原帖由 j44jj44j 于 2008-12-10 07:33 发表 http://bbs.51testing.com/images/common/back.gif
写成下边这样总算好了,谢谢鹭岛!
systemutil.Run "iexplore.exe","http://bbs.51testing.com"
Browser("title:=51Testing.*").Page("title:=51Testing.*").Link("text:=.*QuickTest Pro.*").Click
Browser("ti ...
不行,在我机器上,闪了闪,一直在qtp板块,根本没有进入精华区。
刚才又试了试题,一定要用.*精华区才行:

systemutil.Run "iexplore.exe","http://bbs.51testing.com"
Browser("title:=51Testing.*").Page("title:=51Testing.*").Link("text:=.*QuickTest Pro.*").Click
Browser("title:=.*51Testing.*").Page("title:=.*51Testing.*").Link("text:=.*QTP精华区.*").Click

[ 本帖最后由 tracyd 于 2008-12-20 18:19 编辑 ]
页: [1]
查看完整版本: 求教:描述性编程