ABRIR CHM NO VB6
Pessoal, tou tentando abrir um arquivo de ajuda pelo VB (CHM) mas não tou conseguindo, procurei por aqui mas nao encontrei, utilizando o comando Shell não dá certo, como faço?
em um módulo cole
no form em um botão
Public 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
Public Const SW_SHOWNORMAL = 1
no form em um botão
Private Sub Command1_Click()
Dim iRetVal As Long
Dim Target As String
Target = App.Path & [Ô] est.chm[Ô]
iRetVal = ShellExecute(hWnd, vbNullString, Target, vbNullString, [Ô]c:\[Ô], SW_SHOWNORMAL)
End Sub
Valeu Marcelo Treze, funfou, funfano!
Tópico encerrado , respostas não são mais permitidas