Метод FreeBusy Outlook не работает в VB.NET - PullRequest
0 голосов
/ 05 июня 2018

Я пытаюсь получить информацию о назначении контакта от моей компании, используя VB.NET (не VBA), и единственным способом, который я смог найти для этого, был метод FreeBusy, определение VBA которого можно найти здесь .

До сих пор я придумал этот код:

Dim AppOutlook As New Outlook.Application
Dim appt As Outlook.AppointmentItem =
    CType(AppOutlook.CreateItem(
    Outlook.OlItemType.olAppointmentItem), Outlook.AppointmentItem)
Dim recip1 As Outlook.Recipient =
    appt.Recipients.Add("Jack Smith")
MsgBox(recip1.FreeBusy(#05/06/2018#, 60))

Однако, когда я прибегаю к методу FreeBusy, Visual Studio выдает мне исключение с единственным ярлыком Sorry, something went wrong. You may want to try again. и нетдальнейшие подробности.

Я проверил, была ли переменная rece1 пуста, но это не так, и она получила правильный контакт с правильным адресом электронной почты.

Я действительно понятия не имею, что я мог бы иметьсделано неправильно.

...