伯乐共勉

讨论。NET专区
  博客园  :: 首页  :: 新随笔  :: 联系 :: 订阅 订阅  :: 管理

QTP中参数化链接

Posted on 2007-06-12 15:45  伯乐共勉  阅读(647)  评论(0编辑  收藏  举报
经常见人问如何在QTP中参数化链接,而很多人回答的比问的人更复杂。现在将一种简单的办法列出来,供大家参考。

我经常喜欢这样用。

假如我们录制的时候,输入的是AUTO0003,如下
 1
 2Browser("SCM1.0").Page("SCM1.0 版权所有").Frame("mainFrame_3").WebEdit("txtFCode").Set "AUTO0003"
 3Browser("SCM1.0").Page("SCM1.0 版权所有").Frame("mainFrame_3").WebButton("保 存").Click
 4Browser("SCM1.0").Page("SCM1.0 版权所有").Frame("mainFrame_3").Link("列 表").Click
 5Browser("SCM1.0").Page("SCM1.0 版权所有").Frame("mainFrame_2").Link("AUTO0003").Click
 6
 7'上面这个AUTO0003就是最开始就录好的,我们想输入不同的内容,同时能在列表中点击它。
 8'如下
 9
10'假设我们要输入的为 
11DIM I
12FOR I=1 TO 2
13Browser("SCM1.0").Page("SCM1.0 版权所有").Frame("mainFrame_3").WebEdit("txtFCode").Set "AUTO000"&I
14Browser("SCM1.0").Page("SCM1.0 版权所有").Frame("mainFrame_3").WebButton("保 存").Click
15Browser("SCM1.0").Page("SCM1.0 版权所有").Frame("mainFrame_3").Link("列 表").Click
16
17Browser("SCM1.0").Page("SCM1.0 版权所有").Frame("mainFrame_2").Link("AUTO0003").SetTOProperty "Text""AUTO000"&I
18Browser("SCM1.0").Page("SCM1.0 版权所有").Frame("mainFrame_2").Link("AUTO0003").Click
19
20'看到了没,只需要简单的一句SetToProperty "Text", "..你的自定义的内容
21   NEXT