如何从Jenkins运行Qtp

Question

我是QTP的新手。我想从Jenkins触发QTP。我已经使用QTP自动化了一个网站，然后通过以下文件 - >设置获得了vbscript。现在我想让jenkins触发vbscript，以便能够查看自动化过程。我来到知道我需要从一个窗口批处理文件，它存在于Jenkins的Build选项中调用vbscript。我在我的Windows批处理文件中写入了一个命令cscript "\\path to my vbscript"。但我无法运行vbscript。

我发现了一个类似的问题（QTP to Jenkins integration help need CI），但由于我对QTP和Jenkins的无知，我无法得到结果。

这是我的VBScript

`Dim App 'As Application 
Set App = CreateObject("QuickTest.Application") 
App.Launch 
App.Visible = True 
App.Test.Settings.Launchers("Flex").Active = False 
App.Test.Settings.Launchers("Flex").Applications.RemoveAll 
App.Test.Settings.Launchers("Java").Active = False 
App.Test.Settings.Launchers("Java").CommandLine = "" 
App.Test.Settings.Launchers("Java").WorkingDirectory = "" 
App.Test.Settings.Launchers("Siebel").Active = False 
App.Test.Settings.Launchers("Siebel").Version = "77" 
App.Test.Settings.Launchers("Siebel").Address = "" 
App.Test.Settings.Launchers("Siebel").AutoLogin = True 
App.Test.Settings.Launchers("Siebel").User = "" 
App.Test.Settings.Launchers("Siebel").Password = "" 
App.Test.Settings.Launchers("Siebel").LogoutOnExit = True 
App.Test.Settings.Launchers("Siebel").CloseOnExit = True 
App.Test.Settings.Launchers("Siebel").SiebAutomationRequestTimeout = 120 
App.Test.Settings.Launchers("Siebel").SiebAutomationAccessCode = "" 
App.Test.Settings.Launchers("Web").Active = True 
App.Test.Settings.Launchers("Web").Browser = "IE" 
App.Test.Settings.Launchers("Web").Address = "https://orbit.sonata-software.com" 
App.Test.Settings.Launchers("Web").CloseOnExit = True 
App.Test.Settings.Launchers("Windows Applications").Active = True 
App.Test.Settings.Launchers("Windows Applications").Applications.RemoveAll 
App.Test.Settings.Launchers("Windows Applications").RecordOnQTDescendants = True 
App.Test.Settings.Launchers("Windows Applications").RecordOnExplorerDescendants = False 
App.Test.Settings.Launchers("Windows Applications").RecordOnSpecifiedApplications = True 
App.Test.Settings.Run.IterationMode = "rngAll" 
App.Test.Settings.Run.StartIteration = 1 
App.Test.Settings.Run.EndIteration = 1 
App.Test.Settings.Run.ObjectSyncTimeOut = 20000 
App.Test.Settings.Run.DisableSmartIdentification = False 
App.Test.Settings.Run.OnError = "Dialog" 
App.Test.Settings.Resources.DataTablePath = "<Default>" 
App.Test.Settings.Resources.Libraries.RemoveAll 
App.Test.Settings.Web.BrowserNavigationTimeout = 60000 
App.Test.Settings.Web.ActiveScreenAccess.UserName = "" 
App.Test.Settings.Web.ActiveScreenAccess.Password = "" 
App.Test.Settings.Java.EditSet.KeyPressed = True 
App.Test.Settings.Java.EditSet.KeyTyped = True 
App.Test.Settings.Java.EditSet.KeyReleased = True 
App.Test.Settings.Java.EditSet.InputMethod = False 
App.Test.Settings.Java.EditSet.FocusLost = False 
App.Test.Settings.Java.EditSet.JavaAPI = False 
App.Test.Settings.Java.EditSet.JavaAPICharactersToExclude = "\t\n\r" 
App.Test.Settings.Java.DeviceReplay.Click = False 
App.Test.Settings.Java.DeviceReplay.DoubleClick = False 
App.Test.Settings.Java.DeviceReplay.Type = False 
App.Test.Settings.Java.DeviceReplay.DragDrop = False 
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' 
' System Local Monitoring settings 
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' 
App.Test.Settings.LocalSystemMonitor.Enable = false 
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' 
' Log Tracking settings 
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' 
With App.Test.Settings.LogTracking 
    .IncludeInResults = False 
    .Port = 18081 
    .IP = "127.0.0.1" 
    .MinTriggerLevel = "ERROR" 
    .EnableAutoConfig = False 
    .RecoverConfigAfterRun = False 
    .ConfigFile = "" 
    .MinConfigLevel = "WARN" 
End With` 

我不能执行我的vbscript.Please建议如何执行它

Answer 1

对于详细的解答一些想法，

http://www.testautomationguru.com/executing-qtpuft-scripts-using-jenkins/

---

1. 首先你需要一个可用的QTP/UFT脚本。我假设你已经拥有了。

2. 然后，您需要一个VBScript文件，它使用QTP/UFT自动化对象模型以编程方式调用QTP/UFT（此处类似于此）。确保你的VBScript工作正常。

   Set QTP = CreateObject("QuickTest.Application") 
   QTP.Launch 
   QTP.Visible = TRUE 
   QTP.Open "path of the qtp test", TRUE 
   QTP.Test.Run NOTHING, TRUE 
   QTP.Test.Close 
   QTP.Quit 
   

3. 在Jenkins，创建一个工作。在构建步骤中选择“执行Windows批处理命令”。输入下面的命令。你不需要一个BAT文件。

CScript "path of the vbscript file" 

按此从詹金斯构建 - 它应该现在运行测试。