我的地盘我做主! 博客:http://tester2test.cnblogs.com/   msn:win_soft@163.com

QTP脚本示例

上一篇 / 下一篇  2007-01-12 11:13:09 / 个人分类:性能测试

例如,以下语句指示 QuickTest 选中 Itinerary 网页上的所有复选框:

N+N Qo!?}%}%X J7J0

Set MyDescription = Description.Create()

1ofm[1Y,dR2{xe/d0

MyDescription("html tag").Value = "INPUT"

!nA4fj!c-n-M0

MyDescription("type").Value = "checkbox" 51Testing软件测试网5}3h)~&t{ \z

Set Checkboxes = Browser("Itinerary").Page("Itinerary").ChildObjects(MyDescription)

6L8R4b'R3ee1d5R0

NoOfChildObjs = Checkboxes.Count 51Testing软件测试网0~;`,]u x-v*e5Aq

For Counter=0 to NoOfChildObjs-1

V'o1M${6U k }~$v0

Checkboxes(Counter).Set "ON"

h&d U-siI,_l1O;A&m0

Next 51Testing软件测试网jzLPl:M+Pe+\

51Testing软件测试网wI2kw#U rp

3U.H N b Way0
测试者家园 2006-08-01 15:35 发表评论

%eO2e-C;w!s/E051Testing软件测试网 vW!m"}vg:N%LU
Link URL: http://www.cnblogs.com/tester2test/archive/2006/08/01/465083.html

TAG:

 

评分:0

我来说两句

Open Toolbar