[VB6] Aprire un link con il browser di sistema predefinito

[DooM1]

Come da oggetto, vorrei sapere come fare per dire a windows di aprire il browser internet predefinito con un link specificato da una stringa... non so se mi spiego?!
Illuminatemi, grazie
Ciaux

[matpez]

Così:

Call Shell("explorer http://www.ublteam.com", vbMaximizedFocus)

[beee]

Dichiari:

Codice PHP:

Public 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 Const SW_SHOWNORMAL = 1 


poi crei la function

Codice PHP:

Public Function LanciaBrowser(Handle As Long, Indirizzo As String)
Dim retValue As Long
retValue = ShellExecute(Handle, vbNullString, Indirizzo, vbNullString, "c:\", SW_SHOWNORMAL)
End Function 


e la richiami così:

Codice PHP:

LanciaBrowser Me.HWnd, "http:/www.sito.it/pagina.htm" 


oppure

Codice PHP:

LanciaBrowser Me.HWnd, "file:///c:\temp\file.htm" 


Bye!

[motogpdesmo16]

e per aprire una email??

cioè, cliccando su un indirizzo email, come si fa a fare aprire la finestra "nuovo messaggio" del programma preinstallato (diciamo outlook)?

forse così?

Call Shell("outlook [email protected]", vbMaximizedFocus)

grazie.

edit: come mi aspettavo scrivendo solo outlook non funziona....attendo risposte....grazie

[beee]

LanciaBrowser Me.hWnd, "mailto:[email protected]"

Bye!