Hi Folks,
I am trying to add all the recovery scenarios from a folder to Test, but it requires three parameters

FileName, RecoveryScernarioName , Sequence [Optional].

here i wanted to findout the second param value from the recovery file "RecoveryScernarioName" is there any way to get it...

here we go...

<font class="small">Code:</font><hr /><pre>
Function GetFileList(sFolder,extn)
Set folder = fso.GetFolder(sFolder)
Set files = folder.Files

For each folderIdx In files
If fso.GetExtensionName(folderIdx) = extn Then
Call Push(FileList,folderIdx.Name)
'push is javascript like function to dynamically add array index.
End If
GetFileList = FileList
End Function

'Taken from HELP FILE
Function AddRecovery()
Dim qtApp
Dim qtTestRecovery
Dim intIndex '

Set qtApp = CreateObject("QuickTest.Application")
Set qtTestRecovery = qtApp.Test.Settings.Recovery

If qtTestRecovery.Count &gt; 0 Then
End If
RecoveryPath = Environment.Value("Recovery")
RecoveryList = GetFileList(RecoveryPath ,"qrs")

For i = 0 to ubound(RecoveryList)
qtTestRecovery.Add RecoveryPath &amp; "\" &amp; RecoveryList(i), "RetryObjectNotFound"

'I have issue in the above Line if there are 2 recovery file recovery scenario Name
'"RetryObjectNotFound" is not associated to the first file and it is of file 2, how
'to autometically get recovery scenario name and from the recovery file to execute
'the above line.


For intIndex = 1 To qtTestRecovery.Count
qtTestRecovery.Item(intIndex).Enabled = True

qtTestRecovery.Enabled = True
qtTestRecovery.SetActivationMode "OnError"

Set qtTestRecovery = Nothing ' Release the Recovery object
Set qtApp = Nothing ' Release the Application object
End Function

</pre><hr />