Go to Website in VB3

[tturner]

In a VB3 application, how can I have a menu item, button click or something similar take the user to a specific web site url? What are my options?

Thanks
-Tim

 

[StuH]

In the BAS module of your application, add these declarations:

Declare Function ShellExecute Lib "SHELL" (ByVal hwnd%, ByVal lpszOp$, ByVal lpszFile$, ByVal lpszParam$, ByVal lpszDir$, ByVal fsShowCmd%) As Integer
Declare Function GetDesktopWindow Lib "USER" () As Integer
Global Const SW_SHOWNORMAL = 1


In your form, make a button and add this code to it. Change the HTML$ to whatever you like.
It will open the default browser (IE/Netscape) and load that page (providing you have a gateway)
You can also set HTML$ as a local file - eg. "C:\HELP\INDEX.HTM"


Sub Command1_Click ()
HTML$ = "

http://www.yahoo.com"

Dim ret&
ret& = ShellExecute(Me.hWnd, "Open", HTML$, "", App.Path, 1)
End Sub

Let me know how you go.

 

[CMStaley]

StuH;

Thanks! That was great!

C. Staley