Метод .body не работает с Windows 10 Ошибка 80010105 - PullRequest
Новая
       16

Метод .body не работает с Windows 10 Ошибка 80010105

0 голосов
/ 02 мая 2019

Раньше код работал нормально, но с тех пор, как мы перешли на Windows 10, есть проблемы с методом .body. Изменение на переменные решило эту проблему, когда поместить текст в свойство .body. Но, получая текст от .body, мы получаем ту же ошибку. Я не могу придумать какой-либо другой метод, чтобы получить текст из тела письма. 

    For Each oAppt In oFinalItems
          'agenda invullen
          MsgBox oAppt.Body 'Here i get ERROR 80010105 Method Body from.. Failed
          Bericht = oAppt.Body
          RRN = Mid(Bericht, 1, 11)           
          rOutlook.AddNew
              rOutlook!RRN = RRN
              rOutlook!NaamVN = oAppt.Subject 'B1..Naam en Voornaam
              rOutlook!Datum = Format$(oAppt.Start, "dd/mm/yyyy") 
              rOutlook!uur = Format$(oAppt.Start, "hh:mm") 'D1..Uur
              rOutlook!Wat = oAppt.Location & " " & oAppt.Categories 
          rOutlook.Update
    Next
...