SystemUtil.Run "iexplore.exe"
Set oBrowser = Browser("micClass:=Browser")
Set oEdit = oBrowser.Page("micClass:=Page").WebEdit("name:=wd","index:=0")
oBrowser.Navigate "www.baidu.com"
With oEdit
.set "qtp"
.Submit
End With
oBrowser.Sync ‘等待页面加载完成
oEdit.init '同步测试对象 等待测试对象加载完成
oEdit.Set "http://www.taobao.com/"