WebBrowser Control - click submit button 2

Generate Forms/Controls Resizing/Tabbing Class

Compare Code (Text)

Generate Sort Class in VB or VBScript

Tranman · Apr 18, 2002

John,
YOU DA MAN!!!!

Does the same work for "clicking" hyperlinks?

Paul

JohnYingling · Apr 18, 2002

If they have an ID=, else locate it by "hook or crook"

Code:

Dim objElements     As Object
Dim objElement     As Object
Dim objToClick As Object
Set objToClick = Nothing
Set objElements = WebBrowser.Document.All.tags(&quot;a&quot;)
For Each objElement In objElements
    if LCase(objElement.innerText) Like &quot;*whatIwant*&quot; then
    ''if LCase(objElement.outerHtml) Like &quot;*somehtml*&quot; then
        Set mobjToClick = objElement
        exit for
    End if  
Next
if objToCkick Is Nothing) Then objToClick.Click

Generate Forms/Controls Resizing/Tabbing Class

Compare Code (Text)

http://www.msdn.microsoft.com/libra...or/dhtml/reference/properties/xmldocument.asp

Generate Sort Class in VB or VBScript

Tranman · Apr 18, 2002

John,
Thank you so much for your help. My program works just the way it was supposed to.

It turned out that I was able to identify the correct hyperlink by the href property. Maybe not the best property... (I think if they move the file, the program will be hosed), but I don't think the file will move for a long, long time.

My understanding of your sample code is that objElements is a collection object that contains all of the anchor type elements??? And you are just looking through the collection until you either find the "right" anchor, or come to the end of the collection?

One question. In the very last line of your code example above, should it be:

if NOT objToClick.....

Regards,
Paul

JohnYingling · Apr 18, 2002

if NOT objToClick...is correct.

objElements is not a VB collection. It is some kind of HTML.something "collection" (Length instead of Count) but I had nothing but problems across different versions of IE until I used As Object for everthing except As WebBrowser. I use For Each because I forgot whether the "collection" starts with 0 or 1 and For/Each is probably faster. I even use Navigate (which does not show up in Intellisense) instead of Navigate2 because Navigate2 is IE 5.
I go almost pure "late binding".

If you even THINK of using any property or function beyond basic stuff, get to where it is defined in the MSDN CD or on-line and get to the applies to list at the bottom. Placing the cursor over an "Applies to" object opens a pop-up showing the applicable versions. Don't use it if you do not see your lowest IE version.

Try this.

Now press "Sync Toc" at the top of the TOC frame just under "Library Only" to see where you are. Now get to the bottom of the right frame where the "Applies To" is. Put the cursor over "Document". You now know that you can't use XMLDocument as a property of Document if IE 4.

Generate Forms/Controls Resizing/Tabbing Class

Compare Code (Text)

http://www.msdn.microsoft.com/libra...or/dhtml/reference/properties/xmldocument.asp

Generate Sort Class in VB or VBScript

Tranman · Apr 18, 2002

John,
You stay up all night doing this, too.

I did notice the "length". Weird.

I'm with you on late binding and for each... this program has so little going on that the tiny bit of extra overhead does not mean anything.

Luckily, all of our computers are IE 6.0, so I have no concerns about version.

Thanks again,
Paul

JohnYingling · Apr 18, 2002

See this

I use WB.Document.ALL.tags("tagname&quot

because it always returns a "Collection". Some other methods return an element if 1 is found or a collection and it is a paan to mess with. Besides, this a single user desktop application and your user will not notice the difference in "human time" between the above and some of the later added shortcut methods.

Generate Forms/Controls Resizing/Tabbing Class

Compare Code (Text)

Generate Sort Class in VB or VBScript

JohnYingling · Apr 18, 2002

I learned all the DHTML on the fly because I needed to get into Equifax for my job and their interface is "human" oriented requiring about 5 interactions just to sign-on. Let me know if you need to strip the "img"s before they are fetched into the browser. Talk about a speed-up. I'm heading to bed. It is 1:30 AM EDT here in OldVirginny.

Generate Forms/Controls Resizing/Tabbing Class

Compare Code (Text)