Hi Experts, what are the usage of that particular segment of code with qtp not in brief just a single line answer will help me.
On Thu, Apr 28, 2011 at 5:30 PM, K.Byzoor Rahuman., I.A.S <[email protected]>wrote: > Hi, > > It is working fine for me. > > > SORpath="C:\ObjectRepository\Repository.tsr" > 'RepositoriesCollection.Add(SORpath) > Set QtApp = CreateObject("QuickTest.Application") > qtApp.Visible = True > strTestDir=Environment.value("TestDir") > strActionname=Environment.value("ActionName") > ' qtApp.Open strTestDir, False, False ' > Set qtRepositories = > qtApp.Test.Actions(strActionname).ObjectRepositories > ' Add MainApp.tsr if it's not already in the collection > If qtRepositories.Find(SORpath) = -1 Then ' If the repository cannotbe > found in the collection > qtRepositories.Add SORpath, 1 ' Add the repository to thecollection > End If > > Happy Tester, > Byzoor, > > > > > On Thu, Apr 28, 2011 at 11:50 AM, QTPExpert <[email protected]>wrote: > >> Hi, >> >> Currently i am using below code.but its throwing error message stating >> "Object doesn't support this property or method: 'QtApp.Test.Actions'. >> >> Please correct me >> >> SORpath="C:\ObjectRepository\Repository.tsr" >> 'RepositoriesCollection.Add(SORpath) >> Set QtApp = CreateObject("QuickTest.Application") >> Set qtRepositories = >> QtApp.Test.Actions("DriverScript").ObjectRepositories ' Getthe object >> repositories collection object of the "Login" action >> ' Add MainApp.tsr if it's not already in the collection >> If qtRepositories.Find(SORpath) = -1 Then ' If the repository cannot >> be found in the collection >> qtRepositories.Add SORpath, 1 ' Add the repository to the >> collection >> End If >> >> Thanks, >> Bhuvan >> >> -- >> You received this message because you are subscribed to the Google >> "QTP - HP Quick Test Professional - Automated Software Testing" >> group. >> To post to this group, send email to [email protected] >> To unsubscribe from this group, send email to >> [email protected] >> For more options, visit this group at >> http://groups.google.com/group/MercuryQTP?hl=en > > > -- > You received this message because you are subscribed to the Google > "QTP - HP Quick Test Professional - Automated Software Testing" > group. > To post to this group, send email to [email protected] > To unsubscribe from this group, send email to > [email protected] > For more options, visit this group at > http://groups.google.com/group/MercuryQTP?hl=en > -- Thanks & Regards Dinesh Singh +91-9310813656 -- You received this message because you are subscribed to the Google "QTP - HP Quick Test Professional - Automated Software Testing" group. To post to this group, send email to [email protected] To unsubscribe from this group, send email to [email protected] For more options, visit this group at http://groups.google.com/group/MercuryQTP?hl=en
