使用函数库调用浏览器

时间:2019-02-19 03:01:26

标签: vbscript qtp hp-uft

当我在操作页面上调用以打开浏览器时,它会打开并关闭它。然后再次打开它,然后反复关闭它。我检查了我的函数库,但似乎无法弄清楚为什么这样做。我正在使用关键字驱动的框架。

我尝试重新编写代码,并注释掉浏览器的关闭部分,但即使如此,它也会关闭并重复打开。

这是我打开浏览器的函数库,以及关闭浏览器的另一个程序

“打开应用程序”

   Function OpenApp(AppName)
   If Browser("title:=.*").Exist Then
   Browser("title:=.*").CloseAllTabs
   End If

   systemutil.Run AppName
   wait(5)

  End Function

“关闭应用程序”

  Function CloseApp()
  Browser("title:=.*").CloseAllTabs
  wait(3)
  End Function 

这是我在Excel工作表中将其称为实际使用的浏览器的方式。

 If ActionKey = "OpenApp" Then
 Call OpenApp(Obj_value)
 End If

我希望代码打开浏览器并保持打开状态,以便我可以执行其他操作。

0 个答案:

没有答案