Calling a .chm file **SOLVED**

[Sgt-Peppa]

Hey guys, i have a small prob here!

I am trying to call a .chm file throug the API. I do not get any Error Messages but my helpfile just aint showing, Does anyone see my mistake here?

Public Helpfile As String
Private Const HH_Display_Topic = &H0
Private Declare Function HtmlHelp Lib "hhctrl.ocx" Alias "HtmlHelpA" _
(ByVal hwndCaller As Long, ByVal pszFile As String, ByVal uCommand As Long, ByVal dwData As Long) As Long
 
 
Private Sub Form_Load()
Helpfile = "Hilfe.chm"
End Sub
 
Private Sub mnu_hilfe_Click()
Call HtmlHelp(0, Helpfile, HH_Display_Topic, ByVal 0&)
End Sub

Thanx for your help in advance,


Stephan