PDA

Visualizza la versione completa : Si puņ fare in VB?!?


daspin
24-08-2002, 12:45
E' possibile inserire un bottone che quando premuto apre un URL nel browser IE?!? qual'č il codice da inserire?!?
grazie
daniele

sebamix
24-08-2002, 18:36
Metti questo in un modulo:


Option Explicit
Public Const SW_SHOW = 1 'Dichiarazione costanti
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 'Dichiarazione API

'************************************************* *********************
'* Funzione utilizzata x richiama il browser o il mailer predefinito. *
'************************************************* *********************
Public Sub Navigate(frm As Form, ByVal WebPageURL As String)
Dim hBrowse As Long

hBrowse = ShellExecute(frm.HWnd, "open", WebPageURL, "", "", SW_SHOW)

End Sub


e ovunque vuoi (basta che hai un form a disposizione)


Navigate nomeform, "http://www.html.it"


Ti apre il browser di default

E anche:


Navigate nomeform, "mailto:sebamix@hotmail.com"


Ti epre il programma di posta predefinito per mandare una mail.

:mavieni:

Loading