Hi,
If you want to associate vbs before the QTP Application is launched, you can do it in following way.
If you want to associate vbs before the QTP Application is launched, you can do it in following way.
Code:
Set App = CreateObject("QuickTest.Application")
App.Launch
App.Visible = True
App.Test.Settings.Resources.Libraries.RemoveAll
var = "A"
Select case var
case "A":App.Test.Settings.Resources.Libraries.Add "D:\A.vbs"
case "B":App.Test.Settings.Resources.Libraries.Add "D:\b.vbs"
End Select
Set App = Nothing