HELP
Como eu faço para abrir um arquido de Help em HTML.
Obs.: Eu já tenho o arquivo em um local da minha máquina.
obrigado pela ajuda!
Obs.: Eu já tenho o arquivo em um local da minha máquina.
arquivo: c:\vbin6\help\help_001.htmobrigado pela ajuda!
Option Explicit
Private Declare Function HtmlHelpTopic Lib "hhctrl.ocx" Alias _
"HtmlHelpA" (ByVal hWnd As Long, ByVal lpHelpFile As String, _
ByVal wCommand As Long, ByVal dwData As String) As Long
Sub ShowHtmlHelp(ByVal tHelpFile As String, ByVal tHelpPage As String)
Const HH_DISPLAY_TOPIC =3D &H0
On Error Resume Next
' Open the help page In a modeless window
HtmlHelpTopic 0, tHelpFile, HH_DISPLAY_TOPIC, tHelpPage
End Sub
'Exemplo
Private Sub cmdHelp_Click()
'This Is only a example
ShowHtmlHelp App.path & "\MyHelp.chm", "Introduction.htm"
End Sub[c] [/c]aCHO QUE ISSO VAI AJUDAR!
Tópico encerrado , respostas não são mais permitidas