Create new Outlook Appointment with vbscript

G

Gigi

I all,
I'll try to create new Outlook Appointment using vbscript (Outlook is
running)

Const olAppointmentItem = 1
Set objOutlook = CreateObject("Outlook.Application")
Set objNamespace = objOutlook.GetNamespace("MAPI")
Set objAppointment = objOutlook.CreateItem(olAppointmentItem)

but when I execute "objOutlook.CreateItem(olAppointmentItem)" script
fail with a error. Must I configure some option inside Outlook
(objOutlook is an object)?

THX
 
Top