经常见人问如何在QTP中参数化链接,而很多人回答的比问的人更复杂。现在将一种简单的办法列出来,供大家参考。
我经常喜欢这样用。
假如我们录制的时候,输入的是AUTO0003,如下
我经常喜欢这样用。
假如我们录制的时候,输入的是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
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