Selecting Checkbox one after other

[supputuri]

HI Rammy,

PFA piece of code and let me know if you need any more info.

Code:

NumRows = Browser("QTP Forums - Search Results").Page("QTP Forums - Search Results").WebTable("Search Results").RowCount
blnCBFlag = False
For LCount =0 to NumRows
    If instr(Browser("QTP Forums - Search Results").Page("QTP Forums - Search Results").WebTable("Search Results").GetCellData(LCount,3),"QTP")>0   Then
        CBNum = Lcount
        blnCBFlag = TRUE
        Exit For
    End If
Next

If blnCBFlag = TRUE Then
    Set oDesc = Description.Create()
    oDesc("micclass").value = "WebCheckBox"
   Set CBCollection = Browser("QTP Forums - Search Results").Page("QTP Forums - Search Results").ChildObjects(oDesc)
    CBCollection(CBNum).set "ON"
End If
Set oDesc = Nothing
Set CBCollection = Nothing