Raccourci vers page web
Guidelor
Messages postés
236
Date d'inscription
jeudi 31 octobre 2002
Statut
Membre
Dernière intervention
18 août 2006
-
2 avril 2003 à 21:05
Guidelor Messages postés 236 Date d'inscription jeudi 31 octobre 2002 Statut Membre Dernière intervention 18 août 2006 - 3 avril 2003 à 18:06
Guidelor Messages postés 236 Date d'inscription jeudi 31 octobre 2002 Statut Membre Dernière intervention 18 août 2006 - 3 avril 2003 à 18:06
2 réponses
fredlynx
Messages postés
662
Date d'inscription
mercredi 16 janvier 2002
Statut
Modérateur
Dernière intervention
16 octobre 2010
3
3 avril 2003 à 00:56
3 avril 2003 à 00:56
ça par exemple...
Private Declare Function GetDesktopWindow 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
Private Const SW_SHOWNORMAL As Long = 1
Private Const SW_SHOWMAXIMIZED As Long = 3
Private Const SW_SHOWDEFAULT As Long = 10
Private Const SPI_GETWORKAREA = 48
Private Sub command1_Click()
Dim sURL As String
sURL = "www.vbfrance.com"
Call ShellExecute(GetDesktopWindow(), "open", sURL, 0&, 0&, SW_SHOWNORMAL)
End Sub
<center>http://www.fredlynx.com
</center>
Private Declare Function GetDesktopWindow 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
Private Const SW_SHOWNORMAL As Long = 1
Private Const SW_SHOWMAXIMIZED As Long = 3
Private Const SW_SHOWDEFAULT As Long = 10
Private Const SPI_GETWORKAREA = 48
Private Sub command1_Click()
Dim sURL As String
sURL = "www.vbfrance.com"
Call ShellExecute(GetDesktopWindow(), "open", sURL, 0&, 0&, SW_SHOWNORMAL)
End Sub
<center>http://www.fredlynx.com
</center>
Guidelor
Messages postés
236
Date d'inscription
jeudi 31 octobre 2002
Statut
Membre
Dernière intervention
18 août 2006
3 avril 2003 à 18:06
3 avril 2003 à 18:06
MERCI !!!!
- - - - - -- GuiDelOr -- - - - - -
- - - - - -- GuiDelOr -- - - - - -
