Solved

Access VBA:  Click link for webbrowser naviation

Posted on 2010-09-17
10
859 Views
Last Modified: 2012-05-10
I can't seem to get the syntax to work to InvokeMember click a link on a web page within the ActiveX WebBrowser object.

The WebBrowser is linking to a page that lists a series of records.  My program searches the body of the page, performs some actions, and then I want it to click the "Next" link at the bottom and start over again on the next page.  The title of the link is "Next Page".

Can you please provide syntax, including any necessary references, to click the "Next Page" link?

Thanks.
0
Comment
Question by:Phish_Head
  • 5
  • 2
  • 2
10 Comments
 
LVL 5

Expert Comment

by:rajaamirapu
Comment Utility
Get the document from webbrower. Include html library and iterate throgh all the links. In the links you will get your link. Navigate to that link by calling the Browser.navigate
Hope this helps
0
 

Author Comment

by:Phish_Head
Comment Utility
I'm unable to find full syntax to loop through the available links.  Can you please provide the code?
0
 
LVL 65

Expert Comment

by:rockiroads
Comment Utility
Another way possibly is to embed the datasheet view of a query in a form (datasheet view of a form essentially with the form's recordsource being the query). The form has properties like allowedits etc.
0
 
LVL 65

Expert Comment

by:rockiroads
Comment Utility
My bad, wrong thread! doh!
0
What Is Threat Intelligence?

Threat intelligence is often discussed, but rarely understood. Starting with a precise definition, along with clear business goals, is essential.

 
LVL 65

Accepted Solution

by:
rockiroads earned 250 total points
Comment Utility
Ok, now I am on your thread.

From my understanding you have a webbrowser control
This has many links to it but the one you are interested in is titled Next Page
You want to find this and navigate to whatever that is?

Right assuming you had a control called webie. We get the list of links, find Next Page and navigate to that url



Dim htmldoc As HTMLDocument
    Dim htmllinks As HTMLAnchorElement
    
    Set htmldoc = webIE.Document
    For Each htmllinks In htmldoc.Links
        If htmllinks.innerText = "Next Page" Then
            webIE.Navigate2 htmllinks.href
            Exit For
        End If
    Next

Open in new window

0
 
LVL 5

Expert Comment

by:rajaamirapu
Comment Utility
Here webIE is the webbrowser control
0
 

Author Comment

by:Phish_Head
Comment Utility
I meant to allocate the points to rockiroads
0
 
LVL 65

Expert Comment

by:rockiroads
Comment Utility
I did wonder about the accepted solution until I saw your last post. You can post a question in community support to get this corrected. For PAQness sake it would be good to show the accepted solution.
0
 
LVL 65

Expert Comment

by:rockiroads
Comment Utility
sorry, forgot to give you the link read this when things go wrong http://www.experts-exchange.com/help.jsp#hs=29&hi=409
0

Featured Post

Find Ransomware Secrets With All-Source Analysis

Ransomware has become a major concern for organizations; its prevalence has grown due to past successes achieved by threat actors. While each ransomware variant is different, we’ve seen some common tactics and trends used among the authors of the malware.

Join & Write a Comment

It took me quite some time to sort out all the different properties of combo and list boxes available from Visual Basic at run-time. Not that the documentation is lacking: the help pages are quite thorough and well written. The problem was rather wh…
Experts-Exchange is a great place to come for help with solutions for your database issues, and many problems are resolved within minutes of being posted.  Others take a little more time and effort and often providing a sample database is very helpf…
Familiarize people with the process of utilizing SQL Server views from within Microsoft Access. Microsoft Access is a very powerful client/server development tool. One of the SQL Server objects that you can interact with from within Microsoft Access…
In Microsoft Access, learn different ways of passing a string value within a string argument. Also learn what a “Type Mis-match” error is about.

744 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

15 Experts available now in Live!

Get 1:1 Help Now