通过

AppointmentItem.Send 方法 (Outlook)

  • 项目

发送约会。

语法

expression。 Send

表达 一个代表 AppointmentItem 对象的变量。

备注

Send方法在发送项目使用会话指定的默认帐户。 其中多个 Microsoft Exchange 帐户的配置文件中定义的会话，在第一个 Exchange 帐户添加到配置文件是主 Exchange 帐户，并也是会话的默认帐户。 若要指定不同的帐户发送邮件，将 SendUsingAccount 属性设置为所需的 帐户 对象，然后调用 Send方法。

示例

此 Visual Basic for Applications (VBA) 示例使用 CreateItem 来创建约会。 该示例将 MeetingStatus 属性设置为 olMeeting ，以指示为会议请求，约会和为资源设置必须出席的与会者、 可选的与会者和会议地点。 然后该示例显示发送约会项目。

Sub CreateAppt() 
 Dim myItem As Object 
 Dim myRequiredAttendee, myOptionalAttendee, myResourceAttendee As Outlook.Recipient 
 
 Set myItem = Application.CreateItem(olAppointmentItem) 
 myItem.MeetingStatus = olMeeting 
 myItem.Subject = "Strategy Meeting" 
 myItem.Location = "Conf Rm All Stars" 
 myItem.Start = #9/24/2009 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("Conf Rm All Stars") 
 myResourceAttendee.Type = olResource 
 myItem.Display 
 myItem.Send 
End Sub

另请参阅

AppointmentItem 对象

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。