Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Fichier CHM

1 réponse
Avatar
Jacques
Bonjour,

Comment ouvir un fichier CHM à partir de Access 97 ?

Merci de vos réponses

1 réponse

Avatar
EPM
Bonjour
Il te faut une fonction (module) que tu appelles par
Call HtmlHelp (0, strPath, HH_HELP_CONTEXT, ByVal 2000&) avec strPath qui est le path de ton fichier CHM (c:WINNThelpTonFicher.chm) suivi de ">MSO_small" sans les "
Voici la fonction

' Declarations for calling the HtmlHelp API
' Simplified version of module from HTML Help Authoring Kit

Option Explici

' Commands to pass to the HtmlHelp function

Enum HH_COMMAN
HH_DISPLAY_TOPIC = &H
HH_HELP_FINDER = &H0 ' WinHelp equivalent
HH_DISPLAY_TOC = &H1 ' Not currently implemented
HH_DISPLAY_INDEX = &H2 ' Not currently implemented
HH_DISPLAY_SEARCH = &H3 ' Not currently implemented
HH_SET_WIN_TYPE = &H
HH_GET_WIN_TYPE = &H
HH_GET_WIN_HANDLE = &H
HH_GET_INFO_TYPES = &H7 ' Not currently implemented
HH_SET_INFO_TYPES = &H8 ' Not currently implemented
HH_SYNC = &H
HH_ADD_NAV_UI = &HA ' Not currently implemented
HH_ADD_BUTTON = &HB ' Not currently implemented
HH_GETBROWSER_APP = &HC ' Not currently implemented
HH_KEYWORD_LOOKUP = &H
HH_DISPLAY_TEXT_POPUP = &HE ' Display string resource ID or text in a pop-up window
HH_HELP_CONTEXT = &HF ' Display mapped numeric value in dwData
HH_TP_HELP_CONTEXTMENU = &H10 ' Text pop-up help, same as WinHelp HELP_CONTEXTMENU
HH_TP_HELP_WM_HELP = &H11 ' Text pop-up help, same as WinHelp HELP_WM_HELP
HH_CLOSE_ALL = &H12 ' Close all windows opened directly or indirectly by the caller
HH_ALINK_LOOKUP = &H13 ' ALink version of HH_KEYWORD_LOOKUP
End Enu

Declare Function HtmlHelp Lib "hhctrl.ocx" Alias "HtmlHelpA"
(ByVal hwndCaller As Long,
ByVal pszFile As String,
ByVal uCommand As HH_COMMAND,
dwData As Any) As Lon