What does it mean in your code, commented

*oAppt1.Send()

Did you send it or not?


>Hello,
>
>just another problem I have.
>
>Try to send an appointment to Outlook.
>I found out how to bring the appointment into Outlook.
>But I also want to send the appointment to a recipient (a resource).
>
>Have the following code:
>

>#Define olFolderCalendar 9
>#Define olAppointmentItem 1
>
>Local oOutlook,oNameSpace,oDefaultFolder
>oOutlook = CREATEOBJECT('outlook.application')
>oNameSpace = oOutlook.getnamespace('MAPI')
>oDefaultFolder=oNameSpace.GetDefaultFolder(olFolderCalendar) &&Calendar
>oDefaultFolder.display()
>
>oAppt1 = oOutlook.createitem(olAppointmentItem)
>
>With oAppt1
>	.start = ctot(zstart)
>	.end = ctot(zend)
>	.AlldayEvent = .t.
>
>	If Gleittag
>		.subject = "Gleittag"
>	Else
>		.subject = "Urlaub"
>	Endif
>
>	.location = "daheim"
>	.BusyStatus = 3
>
>Endwith
>
>Sele parameter
>Go top
>
>oRoom = oAppt1.Recipients.Add(alltrim(parameter.wert))  && inviting resource
>oRoom.Type = 3
>oRoom.Resolve()
>oAppt1.MeetingStatus = 1
>*oAppt1.Send()
>oAppt1.Save()
>

>
>The save command works. The appointment is correctly written to outlook.
>But it isn't sent. When I open it the send button is still abailable.
>
>
>Any help is welcome
>
>
>Regards and thanks in advance
>
>Marcus