Ouvrir un fichier .htm avec le navigateur par defaut [Résolu]

Messages postés
7
Date d'inscription
mercredi 21 novembre 2007
Statut
Membre
Dernière intervention
6 novembre 2013
-
Bonjour,
Je veux ouvrir un fichier MonFichier.htm avec le navigateur par défaut. Le fichier est situé dans (app.path +"\MonFichier.htm). Je suppose qu'il faut utiliser la fonction shell mais je n'arrive pas à trouver la syntaxe??? Merci pour votre aide
Afficher la suite 

2 réponses

Meilleure réponse
1
Merci
Merci,
J'utilise effectivement Shellexecute(), voici le code qui me convient (avec l'aide d'un autre forum)
'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
Dim Rep As Long
Dim Prog As String
Prog = Environ("ALLUSERSPROFILE") + "\MonFichier.htm"
Rep = ShellExecute(Me.hwnd, "open", Prog, "", Prog, 1)

Dire « Merci » 1

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 191 internautes nous ont dit merci ce mois-ci

Commenter la réponse de danielminou
Messages postés
14600
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
12 décembre 2019
137
0
Merci
Regardes plutôt ShellExecute, ce sera plus simple.
ShellExecute("PageWeb")
Commenter la réponse de NHenry