如何一次在多台机器上运行 hp uft 脚本？答案

【问题标题】：how to run hp uft script in multiple machines at a time?如何一次在多台机器上运行 hp uft 脚本？
【发布时间】：2017-10-09 01:27:45
【问题描述】：

目前我已经在我的系统中准备了框架脚本，但是现在我想在多台机器上运行脚本，只有它会显示浏览器执行，这意味着一旦我开始测试，它将自动开始在多个系统中执行并提供测试数据来自excel。

请提供任何脚本或解决方案，如何执行此类脚本。

我的脚本是：

Browser("name:=Login Screen").Page("title:=Login Screen").WebEdit("name:=userVO.userName").Set "Uname"
Browser("name:=Login Screen").Page("title:=Login Screen").WebEdit("name:=userVO.userPasscode").Set "password"
Browser("name:=Login Screen").Page("title:=Login Screen").WebButton("name:=Login").Click

【问题讨论】：

请提供更清楚的说明 - 您想从一台特定的机器触发测试吗？并且测试应该在其他机器上开始？我不确定您到底需要什么，但您需要在需要运行的所有系统上安装 UFT
你最好设置 ALM 或 Jenkins 来触发跨多台机器的测试。

标签： qtp hp-uft

【解决方案1】：

据我所知，您无法在远程机器上控制 QTP。但是，如果您使用 AOM，您可以创建一个可以同时在特定事件中触发的 vb。就像每天晚上 10:00 的时钟一样

Do While(cStr(Time) <> "22:00:00")
   Wscript.Sleep = 1000
Loop

            Set objQTP = CreateObject("QuickTest.Application")

            If objQTP.Launched Then 'optional step to restart QTP
                            objQTP.Test.Save
                            objQTP.Quit
            End If
            objQTP.Launch
            objQTP.Open "Testpath",True,True
            objQTP.Test.Run
            While objQTP.Test.isRunning
               Wscript.Sleep 1000
            Wend
            objQTP.Quit
            set objQTP = Nothing

将其保存为 vbs 并确保通过双击所有机器来运行它。

附：我自己没有运行这个脚本。请在使用前验证脚本。另外，根据这些机器上的时间设置更改代码。

如果上述方法不可行，您可以使用 ALM 运行测试。

【讨论】：