cs_Moineau
Messages postés3Date d'inscriptionmardi 18 février 2003StatutMembreDernière intervention14 octobre 2004
-
18 févr. 2003 à 11:31
cs_Moineau
Messages postés3Date d'inscriptionmardi 18 février 2003StatutMembreDernière intervention14 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
cs_Moineau
Messages postés3Date d'inscriptionmardi 18 février 2003StatutMembreDernière intervention14 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.