Mede tweakers,
Ik zou graag een disclaimer willen meezenden met elke mail ik stuur...
Daarvoor dacht ik een scriptje te schrijven:
Private Sub Application_ItemSend(ByVal Item As Object, _
Cancel As Boolean)
If Item.Class = olMail Then
opMail.Attachments.Add "C:\temp\LegalDisclaimer.txt", 1
End If
End Sub
Dit plaatsen in de thisoutlooksession folder van de outlook macro's.
Maar het script werkt niet
Weer iemand waarom?
thanks
Ik zou graag een disclaimer willen meezenden met elke mail ik stuur...
Daarvoor dacht ik een scriptje te schrijven:
Private Sub Application_ItemSend(ByVal Item As Object, _
Cancel As Boolean)
If Item.Class = olMail Then
opMail.Attachments.Add "C:\temp\LegalDisclaimer.txt", 1
End If
End Sub
Dit plaatsen in de thisoutlooksession folder van de outlook macro's.
Maar het script werkt niet
Weer iemand waarom?
thanks