SUB在QTP中是怎样被执行的

lilyhuang

使用MI自带的例子，执行网页的back操作
操作1：把网页的back操作放到过程中去执行
Browser("Welcome: Mercury Tours").Page("Welcome: Mercury Tours").WebEdit("userName").Set "mercury"
Browser("Welcome: Mercury Tours").Page("Welcome: Mercury Tours").WebEdit("password").SetSecure "4693368871247064e7e9a553e582bcd0f195ae4d"
Browser("Welcome: Mercury Tours").Page("Welcome: Mercury Tours").Image("Sign-In").Click 43,4
'Browser("Welcome: Mercury Tours").Dialog("AutoComplete").WinButton("Yes").Click
Browser("Welcome: Mercury Tours").Page("Find a Flight: Mercury").Image("findFlights").Click 37,16
Browser("Welcome: Mercury Tours").Page("Select a Flight: Mercury").Image("reserveFlights").Click 26,15
Browser("Welcome: Mercury Tours").Page("Book a Flight: Mercury").Sync
sub example()
Browser("Welcome: Mercury Tours").Back
End Sub
结果：正常显示Select a Flight页面


操作2：直接执行网页的back操作
Browser("Welcome: Mercury Tours").Page("Welcome: Mercury Tours").WebEdit("userName").Set "mercury"
Browser("Welcome: Mercury Tours").Page("Welcome: Mercury Tours").WebEdit("password").SetSecure "4693368871247064e7e9a553e582bcd0f195ae4d"
Browser("Welcome: Mercury Tours").Page("Welcome: Mercury Tours").Image("Sign-In").Click 43,4
'Browser("Welcome: Mercury Tours").Dialog("AutoComplete").WinButton("Yes").Click
Browser("Welcome: Mercury Tours").Page("Find a Flight: Mercury").Image("findFlights").Click 37,16
Browser("Welcome: Mercury Tours").Page("Select a Flight: Mercury").Image("reserveFlights").Click 26,15
Browser("Welcome: Mercury Tours").Page("Book a Flight: Mercury").Sync

Browser("Welcome: Mercury Tours").Back

结果：显示Cannot find server的页面

请问这是为什么？

songfun

楼主VB的基础太差了，建议楼主好好的学习一下基础。
你封装到sub里去后没有去调用它，代码就不会被执行，所以第一个例子中你根本没调用那个sub，不相信你可以把这段sub全部删掉，结果是一样的。

原帖由 lilyhuang 于 2007-7-10 17:10 发表
使用MI自带的例子，执行网页的back操作
操作1：把网页的back操作放到过程中去执行
Browser("Welcome: Mercury Tours").Page("Welcome: Mercury Tours").WebEdit("userName").Set "mercury"
Browser("Welcome ...

walker1020

如果有机会，建议楼主去做一下开发吧。只要你有了一段时间的开发经历，就不会犯这样的错误了

lilyhuang

我知道错了！sdlkfj1 sdlkfj7