Handling Outlook 2003 Events

[ken gray]

here's some mods I made to get this to work for me.
Function items_ItemAdd

Code:

Copy      Help

function IDispatch'item ;;Outlook._Items'items
str from to subj body
str+ lml_behind
;out "outlook item added"
;out item.BodyFormat

typelib Outlook
Outlook.MailItem mi=item

subj=item.Subject
from=item.Sender
to=item.To


err+ out _error.description