Outlook VBA教程:MeetingStatus属性

返回或设置约会的会议状态。使用该属性可使MeetingItem对象对约会有效。OlMeetingStatus 常量,可读写。

OlMeetingStatus 可为以下 OlMeetingStatus 常量之一。
olMeeting
olMeetingCanceled
olMeetingReceived
olNonMeeting
 

expression.MeetingStatus

expression  必选。该表达式返回AppointmentItem对象。

VBA示例

本 Visual Basic for Applications 示例使用CreateItem 创建约会,并用MeetingStatus 将会议状态设置为“Meeting”,以将其变成同时包含必选和可选与会者的会议要求。


Set myOlApp = CreateObject("Outlook.Application")
Set myItem = myOlApp.CreateItem(olAppointmentItem)
myItem.MeetingStatus = olMeeting
myItem.Subject = "Strategy Meeting"
myItem.Location = "Conference Room B"
myItem.Start = #9/24/1997 1:30:00 PM#
myItem.Duration = 90
Set myRequiredAttendee = myItem.Recipients.Add("Nate Sun")
myRequiredAttendee.Type = olRequired
Set myOptionalAttendee = myItem.Recipients.Add("Kevin Kennedy")
myOptionalAttendee.Type = olOptional
Set myResourceAttendee = myItem.Recipients.Add("Conference Room B")
myResourceAttendee.Type = olResource
myItem.Display

如果使用 VBScript,则不创建Application对象,而且也不能使用命名常量。本示例说明如何使用 VBScript 执行相同任务。


Set myItem = Application.CreateItem(1)
myItem.MeetingStatus = 1
myItem.Subject = "Strategy Meeting"
myItem.Location = "Conference Room B"
myItem.Start = #9/24/97 1:30:00 PM#
myItem.Duration = 90
Set myRequiredAttendee = myItem.Recipients.Add ("Nate Sun")
myRequiredAttendee.Type = 1
Set myOptionalAttendee = myItem.Recipients.Add ("Kevin Kennedy")
myOptionalAttendee.Type = 2
Set myResourceAttendee = myItem.Recipients.Add("Conference Room B")
myResourceAttendee.Type = 3
myItem.Display

上页:Outlook VBA教程:MeetingResponseStatus属性 下页:Outlook VBA教程:MemberCount属性

Outlook VBA教程:MeetingStatus属性:相关链接

Outlook VBA教程:MemberCount属性 Outlook VBA教程:Members属性
Outlook VBA教程:MessageClass属性 Outlook VBA教程:MiddleName属性
Outlook VBA教程:Mileage属性 Outlook VBA教程:MiniIcon属性
Outlook VBA教程:MobileTelephoneNumber属性 Outlook VBA教程:ModifiedFormPages属性
Outlook VBA教程:MonthOfYear属性 Outlook VBA教程:Name属性
Outlook VBA教程:NetMeetingAlias属性 Outlook VBA教程:NetMeetingAutoStart属性
Outlook VBA教程:NetMeetingDocPathName属性 Outlook VBA教程:NetMeetingOrganizerAlias属性
Outlook VBA教程:NetMeetingServer属性 Outlook VBA教程:NetMeetingType属性
Outlook VBA教程:NetShowURL属性 Outlook VBA教程:NextReminderDate属性
Outlook VBA教程:NickName属性 Outlook VBA教程:NoAging属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号