Clicking on specific row in a WebTable using UFT/QTP

hp-uftqtpvbscript

I am having hard time clicking specific row in a Web Table. My code finding proper row, but when I use Child Item method it complains that Object is not found. Here is my code:

Desc = "Record to click"

If Browser("B").Page("P").WebTable("W").exist(10) Then

    totalRows = Browser("B").Page("P").WebTable("W").RowCount()
    For RowNum = 1 To totalRows
        If aDesc = Browser("B").Page("P").WebTable("W").GetCellData(RowNum,2) Then
            Browser("B").Page("P").WebTable("W").ChildItem(RowNum,2,"WebElement",0).click
        End If
    Next
End If

I spied on the value in the row it is Web Element, I tried to use Link- didn't work. Also I tried to Child Item(aDesc,2,"WebElement",0)– didn't work either. I used 0 for the index because there is only one element in the row – simple text. I keep getting this error in many other tests. On rare occasion this approach works in some tests, but most of the time it complains for absence of object.
Thank you very much for your help!

Best Answer

It happened with me as well. When I researched, I found in some of the old HP blogs that ChildItem method does not works correctly with WEBElement, but that was for QTP 9.0, and I was using 12.02.Anyhow, I can't figure out why its happening, and ended up using the following -

Set oExcptnDetail = Description.Create
oExcptnDetail("micclass").value = "WebElement"
oExcptnDetail("html tag").value = "TD"
Set chobj=Browser("").Page("").WebTable("Code").ChildObjects(oExcptnDetail)
chobj(0).Click

On a side note, in order to check a webelement/link exist in a certain row and column, use the following.

 Browser("B").Page("P").WebTable("W").ChildItemCount(2,2,"WebElement")

Getcell data will return you anything that is in the desired row and column irrespective of what it is (link,webelement etc) and hence your assumption of if loop will go wrong.

Related Solutions

HP QTP 10: Web-app testing – SomeObj.FireEvent(“OnCLick”) works, SomeObj.Object.FireEvent(“OnCLick”) doesn’t

There are several differences between WebElement(...).FireEvent and WebElement.Object.fireEvent the first runs a QTP function which performs all sorts of work and the second directly goes to the DOM element. Here is a list of a few things that QTP does which aren't done in the native DOM method (there may be more).

If the element isn't visible QTP makes it visible (this includes activating the tab and scrolling into view)
QTP support device replay in which case it will move the cursor and simulate a real click (this gives you a better simulation of how real people interact with the application)
QTP writes to the report that it performed a FireEvent step

As for your problem, in general you can use the native DOM method in order to pass an event object but when I tried it I couldn't get it to work from QTP

set doc = Browser("B").Page("P").WebElement("W").Object.ownerDocument
set ev = doc.createEventObject()
ev.shiftKey = True

Browser("B").Page("P").WebElement("W").Object.FireEvent "onclick", ev

However something equivalent does work when run from the browser.

Starting in QTP11 there's support for running JavaScript files from the script using Page("P").RunScript until that you can simulate this ability manually. The following snippet works for me (I use the object from the repository to get the IE specific uniqueID of the element so I don't have to identify it again).

' Use QTP's object identification instead of reproducing the logic in JavaScript
id = Browser("B").Page("P").WebElement("W").Object.uniqueID 

' Construct JavaScript script
script = "var e = document.createEventObject(); e.shiftKey = true; " & _
         "document.getElementById('" &id & "').fireEvent('onclick', e);"

' Run it on the browser
Browser("B").Page("P").Object.parentWindow.eval script

If all else fails you can try writing a small web-extensibility project and support this functionality.

Object Required error in QTP

This error is returned when the cell exists and there are childobjects of type link, but not with this index (3). Try to see if you can confirm that the link with index 0 exists by:

Set EditLink = Browser("Browser").Page("Page").WebTable("Emp Index").ChildItem(2,3,"Link",0) 
MsgBox EditLink.Exist(0)

To see where that link is placed on your page, you can use EditLink.Highlight
From this point you can start debugging to see if the link with index 1, 2 and finally 3 exists.

Best Answer

Related Solutions

HP QTP 10: Web-app testing – SomeObj.FireEvent(“OnCLick”) works, SomeObj.Object.FireEvent(“OnCLick”) doesn’t

Object Required error in QTP

Related Topic