A voir également:
- Ouvri un fichier avec le logiciel par default
- Fichier .ini - Conseils pratiques -Visual Basic / VB.NET
- Fichier json - Conseils pratiques -Javascript
- Logiciel gestion de stock avec douchette ✓ - Forum VB.NET
- Vba ouvrir un fichier excel sans l'afficher ✓ - Forum Visual Basic 6
- Logiciel ged opensource - Forum C# / .NET
2 réponses
Option Explicit
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 Sub Command1_Click()
Dim Retour As Long
Dim Document As String
a_executer = "http://www.vbfrance.com"
retour = ShellExecute(Me.hwnd, vbNullString, a_executer, "", vbNullString, 1)
End Sub
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 Sub Command1_Click()
Dim Retour As Long
Dim Document As String
a_executer = "http://www.vbfrance.com"
retour = ShellExecute(Me.hwnd, vbNullString, a_executer, "", vbNullString, 1)
End Sub