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

Danielminou 7 Messages postés mercredi 21 novembre 2007Date d'inscription 6 novembre 2013 Dernière intervention - 6 nov. 2013 à 18:44 - Dernière réponse :  danielminou
- 9 nov. 2013 à 08:06
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 

Votre réponse

2 réponses

Meilleure réponse
danielminou - 9 nov. 2013 à 08:06
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)

Merci danielminou 1

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 121 internautes ce mois-ci

Commenter la réponse de danielminou
NHenry 14211 Messages postés vendredi 14 mars 2003Date d'inscriptionModérateurStatut 24 juin 2018 Dernière intervention - 6 nov. 2013 à 19:11
0
Merci
Regardes plutôt ShellExecute, ce sera plus simple.
ShellExecute("PageWeb")
Commenter la réponse de NHenry

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.