51Testing软件测试论坛

标题: 如何将URL地址参数化 [打印本页]

作者: cckaji 时间: 2011-3-30 20:19
标题: 如何将URL地址参数化
现在我们公司给客户做了一套BS结构的系统，给各户的是一组URL地址，如：
A客户：http://aaa,google.com;
B客户：http://bbb,google.com;
C客户：http://ccc,google.com; ......
现在构思的操作是，将URL地址参数化
Step1:开启IE浏览；
Step2：在QTP参数表中取值，打开相应的URL
Step3:进入系统进行操作
Step4：退出系统，打开新的URL地址；
循环Step2-5
请问VB脚本如何编写？高手赐教。

作者: cckaji 时间: 2011-3-31 12:38
版主，Help Me

作者: kingsang 时间: 2011-3-31 15:50

很想看哪位高手给出合适的解决方案，坐等

作者: ROYWONG 时间: 2011-3-31 16:13
Dim url
url = datatable("url",dtlocalsheet)
... ' 省略login part

systemutil.Run "IEXPLORE", url

问题在于如何判断所以的url 的登录对象，有的是 link，有的是image，有的是webbutton。。（还有其他情况吗？）我们之前的做法是先把所以的对象都抓进对象库。再判断登录页面的对象是什么类型。完成登录操作。

期待更好的解决方法。

作者: shaynechu 时间: 2011-3-31 22:43
看看下面的代码：Select Case 和SetToproperty
Dim i,b
Browser("百度——全球最大中文搜索引擎").Page("百度——全球最大中文搜索引擎").WebEdit("wd").Set "11"
Browser("百度——全球最大中文搜索引擎").Page("百度——全球最大中文搜索引擎").WebButton("百度搜索").Click
For i=1 to 2
Select Case i
Case 1 b="11 弄-软件弄堂"
Case 2 b="CCTV.com"
End Select
Browser("百度——全球最大中文搜索引擎").Page("百度搜索_11").Link("CCTV.com").SetTOProperty "text",b
Browser("百度——全球最大中文搜索引擎").Page("百度搜索_11").Link("CCTV.com").Click
Browser("CCTV.com").Page("CCTV.com").Sync
Browser("CCTV.com").Close
Next
Browser("百度——全球最大中文搜索引擎").Page("百度搜索_11").Sync
Browser("百度——全球最大中文搜索引擎").Close

希望对你有帮助！！！

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)