Trying to get BODY from open Outlook 2016 message into Access database

[VBRosie]

I am trying to setup a mechanism,
where we take a currently open email message in Outlook 2016, that has some info
in the BODY of the message (First Name, Last Name, Address, Phone). Then, take
that body and process it and put it into some fields in an access database. We
are just trying to figure out the lines of code to fill a variable in VBA with
the contents of an open Outlook 2016 email message, by clicking a button in
Access 2016.

here is the code that we currently have from 2010 to try to get the body.

Any thoughts?

strEmailbody = ActiveInspector.CurrentItem.Body

Error message is a runtime error 287

 

[stumac]

is the email in your local mailbox or is it in a shared mailbox - if it is shared, can you copy one into your personal mailbox and retry? Could be a security issue.

 

[VBRosie]

It's a shared mailbox. I tried copying the email form into my personal mailbox and got same error message.

 

[stumac]

A quick google search of the second error you got throws up a lot of similar problems that tie back to Outlook security.... Given that you have just updated to 2016 it may be that one of the security settings within outlook or set by your sys admin is disabling programmatic access to the body of the email (as if it was access you would have got the error when trying to read the subject of the email).

Without knowing your exact security settings its hard to be anymore specific.

 

[xenou]

merely a guess but try:

strEmailbody = ActiveInspector.CurrentItem.HTMLBody
msgbox strEmailbody

if that gives you anything that works then the problem is the emails are not plain text but html.

 

[VBRosie]

Xenou,

I changed the code and got the Run-time error '287: Application-defined or object-define error.