Here is the source code from the web page that I'm trying to access a tab titled "Informational Only". By the way there are over 10 tabs available to select this is just a snap shot of one. I'd need to be able to click on any of the tabs.
<DIV lang="" class=dijitTab role=presentation dojoAttachPoint="titleNode" dojoAttachEvent="onclick:onclick" widgetId="dijit_layout_TabContainer_1_tablist_dijit_layout_ContentPane_6" waiRole="presentation"> <DIV class=dijitTabInnerDiv role=presentation dojoAttachPoint="innerDiv" waiRole="presentation"> <DIV class=dijitTabContent role=presentation dojoAttachPoint="tabContent" waiRole="presentation"> <DIV id=dijit_layout_TabContainer_1_tablist_dijit_layout_ContentPane_6 title="" role=tab tabIndex=-1 aria-pressed=false aria-selected=false unselectable="on" dojoAttachPoint="focusNode" waiRole="presentation" checked="false"><IMG class="dijitIcon dijitTabButtonIcon" alt="" src="http://bnlpcq.testing.com:12080/cqweb/scriptsx/dojox-1.5/dojo/resourcesx/blank.gif" unselectable="on" dojoAttachPoint="iconNode"> <SPAN class=tabLabel unselectable="on" dojoAttachPoint="containerNode">[b]Informational Only[/b]</SPAN><SPAN style="DISPLAY: none" class="dijitInline dijitTabCloseButton dijitTabCloseIcon" role=presentation unselectable="on" dojoAttachPoint="closeNode" dojoAttachEvent="onclick: onclickCloseButton" waiRole="presentation"><SPAN class=dijitTabCloseText unselectable="on" dojoAttachPoint="closeText">x</SPAN></SPAN> </DIV></DIV></DIV></DIV>
I've tried using the following line of code but I get the error: Object reference not set to an instance of an object.
InputElem("Informational Only").click()
and here is the InputElem code. This works for adding data to text boxes and such I just can't seem to figure out how to click on the multiple tabs that are available in the web page. Thanks in advance for your help.
Property InputElem(ByVal sName As String) As mshtml.HTMLInputElement
Get
If Doc Is Nothing Then Exit Property
InputElem = Doc.getElementById(sName)
End Get
Set(ByVal value As mshtml.HTMLInputElement)
End Set
End Property

New Topic/Question
Reply




MultiQuote





|