anihan, thanks a lot for your valueable solution
regards-anil

On Thu, Aug 12, 2010 at 5:53 PM, arihan sinha <[email protected]>wrote:

> one logic you can use by taking all the arguments to this function in an
> array, then take the ubound of the array and run the
> RepositoriesCollection.Add(repPath)  in the loop by passing one by one
> value from the array.
>
>   On Thu, Aug 12, 2010 at 11:26 AM, anil <[email protected]> wrote:
>
>>  i have a function calls a single Object repositories at run time. Its
>> passed as a parameter from the ACTION. If i have multiple OR , how i
>> should modify this function. My code is as follows for function. Can i
>> pass an array of OR
>>
>> Sub loadUnloadOR(repName)
>>        On error resume next
>>        Dim fso
>>        Set fso=CreateObject("Scripting.FileSystemObject")
>>        strTestPath=Environment.Value("TestDir")
>>        strBinPath=fso.GetAbsolutePathName(strTestPath & "..\\..\\..\\..\
>> \rep")
>>        repPath=strBinPath & "\" & repName
>>        RepositoriesCollection.RemoveAll()
>>        RepositoriesCollection.Add(repPath)
>>        Set fso=Nothing
>>        Exit sub
>> End Sub
>>
>> In action i use
>>
>> repName="login.tsr"
>> call loadUnloadOR(repName)
>>
>> Again as i said , can i pass an array of OR as parameter ir repName
>>
>> thanks in advance
>> -anil
>>
>> --
>> 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]<mercuryqtp%[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]<mercuryqtp%[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

Reply via email to