2016-07-25 3 views
2

Backgorund:
Мне нужно отправить на прием, все работает, хотя, я хотел бы получить свойство «Отправленные» для Outlook.AppointmentItem если приглашение было отправлено или не -either отменяется пользователем после нажатия на отображаемые окна или проблемы сервера.Назначение Объект был отправлен


Решение пыталось:
В то время как я прочитал, что назначение имеет Saved Property это -of курс- не сказать мне, если оно было отправлено или не -подобный один в MailItem -.
Я не думаю, что предоставление кода было бы полезно, но, вот это:
Код:

 
Dim olApp As Outlook.Application 
Dim olAgenda As Outlook.AppointmentItem 
Set olApp = New Outlook.Application 
Set olAgenda = olApp.CreateItem(1) 

With olAgenda 
    .Subject = "Test" 
    .Recipients.Add = "[email protected]" 
    .Display 
    On Error Resume Next 
    Call .ItemProperties.Item("Saved") 'here is where I would need to catch the kind of "was it sent?" variable. 

    If Err.Number = 0 Then    '99. If Error 
     MsgBox "Item Send" 
    Else        '99. If Error 
     MsgBox "Item Not Send" 
    End If        '99. If Error 

End With 

PS: Обратите внимание, что я не люблю позднего связывания, ссылки на библиотеки мировоззрение быть добавленным.
Вопрос:
Как я мог поймать, было ли отправлено сообщение AppointmentItem или нет?

ответ

2

Назначение само по себе никогда не отправляется - его пребывание в папке «Календарь». Только MeetingItem объектов отправлены.

Это, пожалуйста, используйте AppointmentItem.MeetingStatus.

+1

Спасибо, сработало! Я должен добавить, что, когда вы используете его как условие, 0 означает, что он «недоступен» - для моей проблемы внешний вид не мог «отправить его» - и 1 он доступен. – Sgdva

+2

См. Https://msdn.microsoft.com/en-us/library/office/ff869427.aspx для возможных значений перечисления olMeetingStatus. –

Смежные вопросы