QTP如何打开浏览器，并进入网站,关闭浏览器

QTP如何打开浏览器，并进入网站,关闭浏览器

'打开IE，进入系统------方法1：快
SystemUtil.Run"C:\Program Files\Internet Explorer\IEXPLORE.EXE","http://www.baidu.com"

'打开IE，进入系统------方法2：慢
SystemUtil.Run"http://www.51testing.com"

'打开IE，进入系统1后，再跳转到系统2
 SystemUtil.Run"C:\Program Files\Internet Explorer\IEXPLORE.EXE","http://www.51testing.com"
Browser("micClass:=Browser").Page("micClass:=Page").Sync : wait 2
Browser("micClass:=Browser").Navigate "http://www.hao123.com"
checkURL = Trim(Browser("micClass:=Browser").Object.LocationURL)
print checkURL

'打开多个浏览器，进入不同页面
SystemUtil.Run"C:\Program Files\Internet Explorer\IEXPLORE.EXE"
SystemUtil.Run"C:\Program Files\Internet Explorer\IEXPLORE.EXE"

Browser("CreationTime:=0").Navigate "http://www.51testing.com"
Browser("CreationTime:=1").Navigate "http://www.hao123.com"

'关闭浏览器

Browser("micClass:=Browser").Close

部分Browser方法，如Navigate、Back、Home、Refresh等在某些人的机器上是好用的，但在另外一些人的机器上就不好用了。脚本执行到这些方法，并不会抛出错误；而且qtp日志里看到的状态是"done".

    经过一段时间的观察，终于发现这些机器上IE加载项（IE"工具"->"管理加载项"）的不同：

    BHOManager Class插件的问题。文件名是BHOManager.dll，部分人的机器上该插件被禁用或删除掉了，猜测原因可能是使用了某些清理ie的工具导致。

    解决该问题的方法很简单：

    如果是被禁用了，只要重新启用即可；如果是被删除掉了，可以重新安装qtp，或者从别处拷贝BHOManager.dll文件过来，用regsvr32 BHOManager.dll注册后就可以了。

 SystemUtil.Run "http://www.51testing.com"  
Browser("micClass:=Browser").Navigate "http://www.baidu.com"    
Browser("micClass:=Browser").Page("micClass:=Page").Sync:wait 1

'打开新的标签
Browser("micClass:=Browser").OpenNewTab:wait 1
Dim testHWND 
testHWND = Browser("creationtime:=1").GetROProperty("HWND")
Browser("creationtime:=1").Navigate "http://www.qq.com"
Browser("creationtime:=1").Page("micClass:=Page").Sync:wait 2

'关闭新的标签
Browser("hwnd:="&testHWND).close
Browser("creationtime:=0").Refresh:wait 3

#QTP