QTP参数化实例(续)

     在<QTP参数化实例>一文中,讲到了运用描述性编程来进行参数化．今天我们利用另一种方法来实现类似的参数化．在不更改对象库的基础上上，运用SetTOProperty函数方法来达到同样的效果．

-MujuX0例：51Testing软件测试网fUbAG2v6Q?h

^W9CMT Q]0　　录制打开百度搜索主页，输入１１，点击搜索按纽，进入搜索后的页面，随便打开其中一个连接，然后关闭网页．录制脚本如下：51Testing软件测试网+x$@^#zS d'B

Browser("百度——全球最大中文搜索引擎").Page("百度——全球最大中文搜索引擎").WebEdit("wd").Set "11"
'X.RS1@ R+D ~ Z0Browser("百度——全球最大中文搜索引擎").Page("百度——全球最大中文搜索引擎").WebButton("百度搜索").Click
i JA zK%Hfw)H0Browser("百度——全球最大中文搜索引擎").Page("百度搜索_11").Link("CCTV.com").Click51Testing软件测试网1MZsu*_Xl
Browser("CCTV.com").Page("CCTV.com").Sync
B(?fFk0Browser("CCTV.com").Close
4dk*GRH$Gg0Browser("百度——全球最大中文搜索引擎").Page("百度搜索_11").Sync
9{NUV9Fh0Browser("百度——全球最大中文搜索引擎").Close51Testing软件测试网K{SM/bO8`xJ

K{#m*d{+s+Z V9?^0现在我想做的是，能测试搜索页面上的其他link打开是否正确．那么势必要把上面蓝色字体的部分给参数化．51Testing软件测试网7@r:_VvfNS]

B[:@)ZM0　　首先我们要在蓝色字体这句代码上面增加一句话，如下：51Testing软件测试网0V^x1M$yhqg

Browser("百度——全球最大中文搜索引擎").Page("百度搜索_11").Link("CCTV.com").SetTOProperty "属性","属性值"51Testing软件测试网Z3Ih0AU'du
Browser("百度——全球最大中文搜索引擎").Page("百度搜索_11").Link("CCTV.com").Click51Testing软件测试网 bnAta%X J

SetTOProperty方法能够在脚本运行中，设置对象的属性值．而QTP识别应用程序上的对象，完全是依靠对象库中的对象来识别的．所以只要对象库中的对象属性值变掉了，QTP操作的对象也不同了．通过对该Link对象，在对象库中属性及属性值的研究发现，启决定性作用的是该对象text属性．所以只要更改这个text属性，就能让QTP点击其他Link了．

　　这里由于时间的关系，只做两个link的测试．继续修改脚本，变成如下：

Dim i,b
5tKs)[9RWIt4f+a0Browser("百度——全球最大中文搜索引擎").Page("百度——全球最大中文搜索引擎").WebEdit("wd").Set "11"51Testing软件测试网v`1k#E3SEP3q@ r%q
Browser("百度——全球最大中文搜索引擎").Page("百度——全球最大中文搜索引擎").WebButton("百度搜索").Click
(kZ k}E9Qt(C0For i=1 to 2
9cr'Eu4Ux
Q.M
V0    Select Case i
c8Z)k*YH#R"AtiU0     Case 1 b="11弄-软件弄堂"
.] Gtz$NIu.BR9E0  　　Case 2 b="CCTV.com"
3FOX.@:t"Hc{1w,X0 　　End Select51Testing软件测试网+W'yYy.v3m
    Browser("百度——全球最大中文搜索引擎").Page("百度搜索_11").Link("CCTV.com").SetTOProperty "text",b
hBvb5t*l6B9br0    Browser("百度——全球最大中文搜索引擎").Page("百度搜索_11").Link("CCTV.com").Click
2D;Q$a't]0    Browser("CCTV.com").Page("CCTV.com").Sync
*oZZw)EE{
~0    Browser("CCTV.com").Close51Testing软件测试网vB7^/qIU"^4}*h;]
Next51Testing软件测试网.Os E M2ur3G
Browser("百度——全球最大中文搜索引擎").Page("百度搜索_11").Sync
n` ~ {"`)v"}B6t3u0Browser("百度——全球最大中文搜索引擎").Close51Testing软件测试网M_/v i)}]/X`,e

在我们脚本的对象库中是没有"11弄-软件弄堂"，这个link对象的．让我们看看这样修改后，能不能通过两次循环，依次点击打开名为"11弄-软件弄堂"的连接，然后关闭．接着继续点击打开名为"CCTV.com"的连接，然后关闭．结果自然是通过的，我们通过对SetTOProperty方法的运用，同样达到了参数化的要求．51Testing软件测试网ghd
he.DV

　　如果大家想试试看的话，可以录制我们QTP自带的windows程序fight．其中这么一个WinRadioButton对象．如下图：51Testing软件测试网#\%F2A4h*wi;RE

对于这个对象的操作，录出来来的脚本是这样的．51Testing软件测试网 v)a$j9g NA"g$b7O8y7s

;]1Y'r` ke0Window("Flight Reservation").WinRadioButton("Business").Set

!U#g
eV&a]0粗看这个对象要实现参数化，不是很容易．但其实也方便实现．运用上面的方法，试试吧！51Testing软件测试网5A_Ic$s2Xu+q