Ouverture d'un fichier hlp depuis Access

cs_Moineau Messages postés 3 Date d'inscription mardi 18 février 2003 Statut Membre Dernière intervention 14 octobre 2004 - 18 févr. 2003 à 11:31
cs_Moineau Messages postés 3 Date d'inscription mardi 18 février 2003 Statut Membre Dernière intervention 14 octobre 2004 - 18 févr. 2003 à 16:15
Bonjour,
Je recherche un petit bout de code qui me permettrait, depuis mon application Access, d'ouvrir un fichier hlp(lu avec Winhlp32.exe).
J'ai tenté un
Dim Fichier As Object
Dim fs
Dim RetVal

Set fs = Application.FileSearch
    fs.LookIn = "C:\Temp"
    fs.FileName = "AIDE.HLP"
        
If fs.Execute = 1 Then
            Set Fichier = GetObject("C:\Temp\AIDE.HLP", "Winhlp32.application")
            Fichier.Application.Visible = True
            
        Else
            MsgBox "L'aide est inaccessible"
        End If


Mais j'y arrive pô....
Merci de vos lumières.

1 réponse

cs_Moineau Messages postés 3 Date d'inscription mardi 18 février 2003 Statut Membre Dernière intervention 14 octobre 2004
18 févr. 2003 à 16:15
... Je me réponds. J'ai trouvé ma réponse sur ce forum. J'ai utilisé un Shell "C:\Winnt\Winhlp32.exe C:\temp\aide.hlp", vbNormalFocus.
La commande fonctionne. A tester sur la durée.
0
Rejoignez-nous