hi,
You have button called SetAsDefault in Test > Settings > Resources. Create the shared repository and click on the button when ever you open new script it will load shared repository automatically. If you want to load dynamically means just copy paste this code and pass the path of your .tsr file.
******************************************************
testsai("C:\Documents and Settings\125301\Desktop\Default.tsr")
Dim a
Function testsai(a)
Dim App 'As Application
Set App = CreateObject("QuickTest.Application")
App.Test.Settings.Resources.ObjectRepositoryPath = a
End Function
******************************************************
Regards,
Ravi Konka
