Fax events in VBA

[kazem]

Hi,
I've a problem to work with Fax events in VBA. I want to run a procedure when the 'OnOutgoingMessageAdded' event is triggered. The code is following:


Option Explicit
Dim WithEvents oFS As FAXCOMEXLib.FaxServer

Private Sub Application_Startup()

Set oFS = New FAXCOMEXLib.FaxServer

End Sub

Sub oFS_OnOutgoingMessageAdded(Fserver As FAXCOMEXLib.FaxServer, MsgId As String)
' the event handler
End Sub

and the error I get, is in the last procedure definition:
Procedure declaration does not match description of event or procedure having same name


I appreciate any help.