2016-11-10 26 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 

感谢, 拉克什

回答