mhartman_1
New Contributor
Joined 16 years ago
User Profile
User Widgets
Contributions
Re: Handling Wizard Navigation Links
Hi Allen, I noticed yesterday when using the object explorer that when I highlighted the link with the crosshairs it was much longer than the actual text of the link (by about three times), so I think that your suggestion will solve my problem. I just have one question about the coordinates for the Click method so that I have a frame of reference. Which corner of the object would the coords (0,0) refer to? Thanks, Megan1.4KViews0likes0CommentsRe: Help with javascript menus
Hi Allen, Thanks for the help. This was actually a separate issue because they were different types of links entirely. I realize now that the way I worded this message made it sound like they were the same. But the good news is that I was able to figure out a fix to this problem with the menus. Thanks again! ~Megan1.2KViews0likes0CommentsHelp with javascript menus
NOTE: I tried emailing this to support a few times but each time received an error message, so I'm posting it here also. I'm using vbscript to test a web based app written in dot net. I am having troubles handling the menus in my product and need some help. The menu for the product is presented in a tabbed fashion and does not use standard html links. Rather, it uses a dojo class of javascript. When I use the object properties window to explore the menu tabs it shows me that the menu is created as a set of nested panels. For example, one of the menu tabs I would like to access is the Organization tab. Here is its FullName: Sys.Process("iexplore", 2).Page("http://localhost/CAS/enu/Index.aspx").Form("indexForm").Panel("layout").Table("MagicTable").Cell(0, 0).Panel("content").Panel(0).Panel(1).Panel(0).Panel("MainTabsContainer_MainTabs").Panel("MainTabsContainer_Directory_Tab").Panel(0).Panel(0) innerHTML: <DIV class="dijitReset dijitInline veraTabNode" dojoAttachPoint="centerNode"> <DIV class=hidden dojoAttachPoint="arrowNode"></DIV> <TABLE cellSpacing=0 cellPadding=0> <TBODY> <TR> <TD>Organization</TD></TR></TBODY></TABLE></DIV> The innerText of the object looks promising to search for because it is just Organization, but when I created a function to click on the menu item the TestComplete log tells me the object was clicked on, but it never actually is.11KViews0likes2CommentsHandling Wizard Navigation Links
I'm using vbscript to test a web based app written in dot net. I am having troubles handling certain types of links in my product and need some help. There are several areas in the product that use wizards to configure things. The wizards have navigation links at the top and bottom of each page. The links are a little bit different than the rest of the links in the product so I cannot use my standard library function for link-clicking based on the text in the link. I attempted to write a new function to handle these "wizard links", but something seems to not be working properly. According to the test logs, the link is being clicked on, but the wizard never advances properly. This is the wizard link I am trying to click on: Sys.Process("iexplore", 2).Page("http://localhost/CAS/enu/CallProcessing/SwitchWizard/Welcome.aspx?wizinit_=1&_state=Switches_1").Form("aspnetForm").Table("ctl00_Table1").Cell(0, 0).Panel("formcontentdiv").Table(0).Cell(0, 0).Table(0).Cell(0, 0).Table(0).Cell(0, 0).Table(0).Cell(0, 0).Link("ctl00_mainContent_VeraWizardContainer1_ctl00_wiznext") Here is the code that is supposed to click the Next button: Call Library.ClickWizLink("Next") And here is the ClickWizLink code: Sub ClickWizLink(linkText) dim p1, page, obj, PropArray, ValuesArray 'initialize the broswer, page, and current form for testing Set p1 = Sys.Process("iexplore") Set page = p1.Page("*") ' Creates arrays of properties and values PropArray = CreateVariantArray(0, 1) ValuesArray = CreateVariantArray(0, 1) ' Specifies property names PropArray(0) = "ObjectType" PropArray(1) = "Title" ' Specifies the property values ValuesArray(0) = "Link" ValuesArray(1) = "*" & linkText & "*" page.Refresh 'Try to find the wizard Link Set obj = page.Find(PropArray, ValuesArray, 20) If Not obj.Exists Then Log.Error("Check for link " + linkText + " failed") Exit Sub End If 'if the control is not viewable on the screen the script should scroll the page down If Not obj.VisibleOnScreen Then obj.ScrollIntoView(false) End If 'click the link and log it obj.Click Log.Message("Link " + linkText + " was clicked.") End Sub 'ClickLink11KViews0likes3Comments