Add attachment with vbscript in Outlook form

[rob]

I wont to add automatically when I open a Outlook form (
user-defined form not a UserForm) a log file like
params.log
or with click to a button but this code doesn't work.

I inserted this code in the Outlook script editor.

Function Item_Open()
Msgbox "Alle [ GELB ] gekennzeichnete Felder sind
zwingend. Bitte, alle ausfüllen." (This line of code works
fine)
Dim iMsg
Set iMsg = CreateObject("CDO.Message")
With iMsg
.AddAttachment "\\biscussrv01\appl\log\params.log"
.Subject = "Supportanfrage"
.TextBody = "Details sind dem angehängtem Log zu
entnehmen."
End With
End Function

Sub AddLog_Click()
Dim iMsg
Set iMsg = CreateObject("CDO.Message")
' configure message here if neccessary
With iMsg
.AddAttachment "\\biscussrv01\appl\log\jboss.log"
.Subject = "Supportanfrage"
.TextBody = "Details sind dem angehängtem Log zu
entnehmen."
End With
End Sub


Any help would be greatly appreciated. Thanks.
Roberto Crivelletto