Fichier d'aide
cedricbi
Messages postés
185
Date d'inscription
mercredi 18 décembre 2002
Statut
Membre
Dernière intervention
21 mars 2011
-
9 févr. 2003 à 17:53
cs_rene38 Messages postés 1858 Date d'inscription samedi 29 juin 2002 Statut Membre Dernière intervention 17 octobre 2013 - 9 févr. 2003 à 23:25
cs_rene38 Messages postés 1858 Date d'inscription samedi 29 juin 2002 Statut Membre Dernière intervention 17 octobre 2013 - 9 févr. 2003 à 23:25
1 réponse
cs_rene38
Messages postés
1858
Date d'inscription
samedi 29 juin 2002
Statut
Membre
Dernière intervention
17 octobre 2013
11
9 févr. 2003 à 23:25
9 févr. 2003 à 23:25
1ère solution :
x = Shell("c:\windows\winhelp.exe C:\MonDossier\MonFichier.hlp", vbNormalFocus)
2ème solution :
Dans la section déclaration :
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
Puis appel de la fonction API :
ShellExecute Form1.hWnd, "open", "C:\MonDossier\MonFichier.hlp", vbNullString, "C:\MonDossier", Option_d 'Affichage
x = Shell("c:\windows\winhelp.exe C:\MonDossier\MonFichier.hlp", vbNormalFocus)
2ème solution :
Dans la section déclaration :
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
Puis appel de la fonction API :
ShellExecute Form1.hWnd, "open", "C:\MonDossier\MonFichier.hlp", vbNullString, "C:\MonDossier", Option_d 'Affichage