Метод AppointmentItem.Send (Outlook)
Отправляет встречу.
Синтаксис
выражение. Send
Выражение Переменная, представляющая объект AppointmentItem .
Замечания
Метод Send отправляет элемент с использованием учетной записи по умолчанию, указанной для сеанса. В сеансе, где в профиле определено несколько учетных записей Microsoft Exchange, первая учетная запись Exchange, добавленная в профиль, является основной учетной записью Exchange, а также учетной записью по умолчанию для сеанса. Чтобы указать другую учетную запись для отправки элемента, задайте для свойства SendUsingAccount нужный объект Account , а затем вызовите метод Send .
Пример
В этом примере Visual Basic для приложений (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
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.