IE Browser

[Anonymous]

I want to add a help file to my VBA in IV 10 by a menu or by html but I cannot get the code to work.
I got as far as launching Internet Explorer or a least a blank window for it.
I would be grateful for any code suggestions.

[paulschuepbach]

Hi Bill,
use the following:

Private Declare Function GetActiveWindow Lib "user32" () As Long

Private Declare Function ShellExecute Lib "shell32.dll" Alias _
"ShellExecuteA" (ByVal hWnd As Long, ByVal lpOperation _
As String, ByVal lpFile As String, ByVal lpParameters _
As String, ByVal lpDirectory As String, _
ByVal nShowCmd As Long) As Long



Public Sub LaunchURL(url As String)

ShellExecute GetActiveWindow(), "Open", url, "", 0&, 1

End Sub




Private Sub Command1_Click()

LaunchURL ("http://www.thinkcad.de")

' for your Helpfiles use somthing like
'LaunchURL (App.Path & "\Help\YourHelpHTMLpage.htm")

End Sub


Hope this helps.

Best, Paul

www.morecam.ch

[Anonymous]

Hi Paul,

I tried your code. It worked wonderfully. I am most grateful. Thanks very much for taking the time to help me wth my query.
Bill