Results 1 to 6 of 6

Thread: How can I get Internet Explorer object?

  1. #1

    Thread Starter
    Hyperactive Member billwagnon's Avatar
    Join Date
    Jul 1999
    Location
    St. Louis, Missouri, Mississippi Valley
    Posts
    290

    Post

    I know how to get Word and Excel objects, but what is the object reference to get Internet Explorer?

  2. #2
    Member
    Join Date
    Jan 2000
    Location
    Singapore
    Posts
    59

    Post

    Hi,
    Go to project properties and click on components. There check the internet controls
    That's all.

    Thanks
    karun

  3. #3

    Thread Starter
    Hyperactive Member billwagnon's Avatar
    Join Date
    Jul 1999
    Location
    St. Louis, Missouri, Mississippi Valley
    Posts
    290

    Post

    To get the Excel application I use:

    Set XLobj = GetObject("Excel.Application")

    What do you use as the handle for Internet Explorer? Also, does ZOrder work with Internet Explorer?

  4. #4

    Thread Starter
    Hyperactive Member billwagnon's Avatar
    Join Date
    Jul 1999
    Location
    St. Louis, Missouri, Mississippi Valley
    Posts
    290

    Post

    anyone? anyone? Bueller?

  5. #5
    Serge's Avatar
    Join Date
    Feb 1999
    Location
    Scottsdale, Arizona, USA
    Posts
    2,744

    Post

    Sure thing. Add a reference to Microsoft Internet Controls (DLL's name: shdocvw.dll), the try something like this:

    Code:
    Private Sub Command1_Click()
        Dim ie As New SHDocVw.InternetExplorer
        
        ie.Navigate "www.microsoft.com"
        ie.Visible = True
    End Sub
    ------------------

    Serge

    Senior Programmer Analyst
    [email protected]
    [email protected]
    ICQ#: 51055819

  6. #6
    Member
    Join Date
    Jan 2000
    Posts
    35

    Post

    Private brwWebBrowser As VBControlExtender
    Private Sub Form_Load()
    '
    On Error GoTo NO_IE
    Set brwWebBrowser = frmBrowser.Controls.Add("Shell.Explorer", "wcIE")
    brwWebBrowser.Visible = True
    NO_IE:
    End Sub

    'then use like this

    private sub cmdGoNow_Click()
    brwWebBrowser.object.Navigate "http://www.vbworld.com"
    end sub

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  



Click Here to Expand Forum to Full Width