51Testing软件测试论坛

标题: QTP自带flight系统中关于随机选择航班的问题 [打印本页]

作者: angle-ying 时间: 2010-3-15 21:54
标题: QTP自带flight系统中关于随机选择航班的问题
在随机选择航班里代码如下
'随机选择航班'
Randomize
Dim suiji
suiji=int(4*rnd)
Select Case suiji
Case 0
Browser("Welcome: Mercury Tours").Page("Select a Flight: Mercury").WebRadioGroup("outFlight").Select "Blue Skies Airlines$360$270$5:03"
Case 1
Browser("Welcome: Mercury Tours").Page("Select a Flight: Mercury").WebRadioGroup("outFlight").Select "Blue Skies Airlines$361$271$7:10"
Case 2
Browser("Welcome: Mercury Tours").Page("Select a Flight: Mercury").WebRadioGroup("outFlight").Select "Pangea Airlines$362$274$9:17"
Case 3
Browser("Welcome: Mercury Tours").Page("Select a Flight: Mercury").WebRadioGroup("outFlight").Select "Unified Airlines$363$281$11:24"
End Select
为什么运行时会出错呢？大家帮我看看是不是代码的问题啊！Select里的name是一样的所以选择的是vault的值。大家帮我看看那里错了还是我的思路就不正确，谢谢各位了

[ 本帖最后由 angle-ying 于 2010-3-15 21:56 编辑 ]

作者: angle-ying 时间: 2010-3-16 09:53
谢谢大家啊给我个答案迷茫中.................

作者: feiyunkai 时间: 2010-3-16 10:50
随即数和Select Case语句没问题，给个截图，看报什么错

作者: angle-ying 时间: 2010-3-16 11:35
标题: 回复 3# 的帖子
谢谢哈找到原因了是因为我自己加的代码没有加对象所以他找不到这个对象会报错谢谢

作者: zhengpeipei 时间: 2010-3-19 16:09

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