How to select a particular check box from a list

[umer830]

Another Problem

I need to select a particular check box as shown in screenshort based on the adajacent document link. Once checkbox selected I can perform a ragen of features available in application,

To identify any of the document link I can use code below and it works
///////////////////////////////////

Code:

If Browser("projectCentre QTP:TEST-AT:").Page("projectCentre QTP:TEST-AT:").Frame("RegRegRegFrame").Exist Then
    set odesc = Description.Create
    odesc("micclass").value = "Link"
    odesc("text").value = Parameter ("Folder_Name" )

MainFolder = odesc("text").value
    set LinkCollection = Browser("projectCentre QTP:TEST-AT:").Page("projectCentre QTP:TEST-AT:").Frame("RegRegRegFrame").ChildObjects(odesc)
    linkcount = LinkCollection.count

    If  linkcount > 0 Then

        For i = 1 to linkcount
            LinkCollection(0).click
            Parameter("Return") = 1
Reporter.ReportEvent micPass, "Floder found and Opened ", MainFolder
        Next
    else
            Parameter("Return") = 0
Reporter.ReportEvent micFail, "Floder not found in the main rigister ", MainFolder
    End If

//////////////////////////////////////

But next I need is once the link is identified say 'DEC 3' I have to slect the adajacent check box which cannot be identified based on webtable row neither it can be recorded as it will differ based on web link you want to select.

Q1:Can you guys suggest a wayout to select a particular checkbox

Q2:You can see the image of my object repository and object spy, The difference I am trying to under stand is in Object spy it shows checkbox as a child of webtable where as in object repository it doesn't. If I can have it as child of webtable in OR I can easily identify target checkbox based on rownumber and some looping code

Waiting for any kind of help

[sreekanth chilam]

Hi Umer,

Follow the below steps.

Step1: Add the required 'WebTable' Object into Obj.Repo

Step2: Retrieve the row count of the webtable.

Step3: Loop thru all the rows & retrieve required cell's data using 'GetCellData' method & Validate the current link text with expected link text.

Step4 : If the required link text is found in 'i'th row, then use 'ChildItem' Method & select the correspoding CheckBox present in the same row & Exit out of the Loop.

Refer the below example code:

Code:

Expected_Link="DEC 3"
rc= Browser("projectCentre QTP:TEST-AT:").Page("projectCentre QTP:TEST-AT:").Frame("RegRegRegFrame").WebTable("...").RowCount
For i=1 to rc
  Table_linkText=Browser("projectCentre QTP:TEST-AT:").Page("projectCentre QTP:TEST-AT:").Frame("RegRegRegFrame").WebTable("...").GetCellData(i,3)
If (Expected_Link=Table_linkText) then
  Browser("projectCentre QTP:TEST-AT:").Page("projectCentre QTP:TEST-AT:").Frame("RegRegRegFrame").WebTable("...").ChildItem(i,1,"WebCheckBox",0).Set "ON"
Exit For
End if
Next

[umer830]

Thanx sreekanth. It worked

[ranjanisudarmani]

Hi Umer,

Browser("projectCentre QTP:TEST-AT:").Page("projectCentre QTP:TEST-AT:").Frame("RegRegRegFrame").WebTable("...").ChildItem(i,1,"WebCheckBox",0).Set "ON"

The above code is not working for me . i am always facing an error "Object Required"

Thanks
Ranjani.S

[agarwl.anurag]

Hi,

Did u add webtable element in your object repository?

[ranjanisudarmani]

Yes i have added web table in OR. since i am facing the problem

[vjjohnson04]

I execute the code in this way and get an error

Error Message: Wrong number of arguments or invalid property assignment: 'oPage.WebTable(...).ChildObjects'

Line (93): "oPage.WebTable(Result_Grd).ChildObjects(i,3)(oChkBox).set "ON""

code:

Code:

Set oPage = Browser("micClass:=Browser").Page("micClass:=Page")
Result_Grd = "html id:=ResultGridCtl"

Set oChkBox = Description.Create()
oChkBox("micClass").value = "WebCheckBox"
oPage.WebTable(Result_Grd).highlight
If oPage.WebTable(Result_Grd).Exist Then

For i=3 to 10
        
        oPage.WebTable(Result_Grd).ChildObjects(i,3)(oChkBox).set "ON"

Next
    

End If