QTP : Script to know what plugins are loaded

Set QTP = CreateObject("QuickTest.Application")


    AddIns = QTP.Test.GetAssociatedAddins() 'Get the list of Add-Ins

For i = 0 to UBound(AddIns)
    print  AddIns (i)
Next








Output:

QTP- RepositoriesCollection Object

RepositoriesCollection Object :

This object is useful for performing below actions on Shared Object Repositories during run time

• Adding
• Removing
• Find
• Change Position of Shared Object Repositories of an Action  

'Adding Repositories 

 Syntax:- RepositoriesCollection.Add RepositoryPath [, Position] 

Ex RepositoriesCollection.Add "D:\Projectfolder\AutomationSuite\OR\Main.tsr",2


 Finding Repositories   
  Syntax:- Pos = RepositoriesCollection.Find RepositoryPath  
  RepositoryPosition=RepositoriesCollection.Find("D:\Projectfolder\AutomationSuite\OR\Main.tsr") 
 

Move Position of a Repository "

Syntax:- RepositoriesCollection.MoveToPos CurrentPosition, NewPosition  
 
Get Current Position 

RepositoryPosition=RepositoriesCollection.Find("D:\Projectfolder\AutomationSuite\OR\Main.tsr") 
 
'Move to Another Position 
RepositoriesCollection.MoveToPos RepositoryPosition, 1  
 
'************************** 
'Remove Repository  
'
'Syntax:- RepositoriesCollection.Remove(Pos)  
 
'Get Current Position  
RepositoryPosition=RepositoriesCollection.Find("D:\Projectfolder\AutomationSuite\OR\Main.tsr") 
 
'Remove Repository  
RepositoriesCollection.Remove RepositoryPosition 
 

'Remove All Repositories 

RepositoriesCollection.RemoveAll()   
 

Count Repositories  

print RepositoriesCollection.Count  
 
 

Invoke/ Start QTP using Vbscript file using AOM (Automation Object Model )

Here is the short code to Start qtp using Vbscript file.
Paste below code in notepad file and save it with .vbs extension

set qtp = createobject("quicktest.application")
'Creates object called qtp used for AOM


'Makes qtp window visible
qtp.visible = true



'Actually Opens QTP
qtp.launch 


'Open the saved.vbs file by double clicking on it. It will open QTP window