2016-11-10 61 views
1

我的要求是根據html頁面中給出的輸入執行UFT腳本。我從一些博客瞭解到,微軟已經停止了html中的vbs腳本使用。爲此,我想用java腳本調用qtp腳本。我搜索了相同的,沒有找到很多信息。如果任何人都可以在JavaScript中提供等效代碼將會有所幫助。客戶演示即將到來時,我很快就會進行試驗。如何使用java腳本調用存在於ALM中的uft腳本?

Dim objQtpApp 
Set objQtpApp=Createobject("QuickTest.Application") 
objQtpApp.Launch 
objQtpApp.Visible=False 'True 
varUserName=document.getElementsByName('Username').value 
varPassword=document.getElementsByName('Password').value 



call QC_Connect(varUserName,varPassword) 

Sub QC_Connect(varUserName,varPassword,varCustomsON) 

' 
    objQtpApp.TDConnection.Connect "http://dddd.fed.test.com:7117/qcbin", "Domain", "Project", varUserName, varPassword,False 

    If objQtpApp.TDConnection.IsConnected Then 

      objQtpApp.Open "[QualityCenter] Subject\Automated Test Case Development\Test",False 
      objQtpApp.Test.Environment.Value("varUserName")=varUserName 
      objQtpApp.Test.Environment.Value("varPassword")=varPassword 
      objQtpApp.Test.Environment.Value("varCustomsON")=varCustomsON 
      objQtpApp.Test.Run 
      objQtpApp.Quit 


    Else 
     MsgBox "Cannot connect to Quality Center" 
    End If 
End Sub 

感謝, 拉克什

回答