如何使用单一函数库函数在QTP中执行多个应用程序?

时间:2017-07-25 11:22:58

标签: vbscript automated-tests qtp hp-uft

我正在使用Web应用程序的关键字驱动框架,在我的应用程序中集成了三个应用程序,我们对三个应用程序使用相同的关键字,现在我想用相同的关键字执行这3个应用程序,而不是为3个维护3个函数库应用程序,因为现在页面标题对于3个应用程序是相同的,我想根据程序类型执行应用程序。

函数库一:

Function openBrowserUrl()
Application one Function
End Function

函数库二:

Function openBrowserUrl()
Application Two Function
End Function

功能库三:

Function openBrowserUrl()
Application Three Function
End Function

现在我想组合成一个独特的功能,然后它应该作为

If App_one="Y" then 
Application one - use same unique function
Different Credentials
End If

If App_Two="Y" then 
Application Two - use same unique function
Different Credentials
End If

If App_Three="Y" then 
Application Three - use same unique function
Different Credentials
End If

请提供解决方案如何实现这一目标

1 个答案:

答案 0 :(得分:0)

那么它非常简单......不需要使用任何if else语句,只需使用参数。

函数库一:

Function openBrowserUrl()
 StrUserId = "ID1"
 StrPwd = "pwd1" 

 f_Login(StrUserId, StrPwd)
End Function

函数库二:

Function openBrowserUrl()
 StrUserId = "ID2"
 StrPwd = "pwd2" 

 f_Login(StrUserId, StrPwd)

End Function

功能库三:

Function openBrowserUrl() 
  StrUserId = "ID3"
 StrPwd = "pwd3" 

 f_Login(StrUserId, StrPwd)

End Function

登录功能

f_Login(StrUserId, StrPwd)
' Enter the code for login here.
End function

此外,您可以将openBrowserUrl函数与一个函数结合使用。

Function openBrowserUrl(strURL, strUserId, strPwd)

'open browser and login here

End function