Reading content from Lotus notes email using VBA or Macros

HCL Domino Domino Forum
1

Hi Team,

I have written VB script to read the data from the Lotus notes email but the issue is I am not able to read full contents of the email, able to read only part of the content. please see the code using which I am able to read the content.

Code:

Set noSession = CreateObject(“Notes.NotesSession”)
Set noDatabase = noSession.GETDATABASE(server, databasename)

Set noView = noDatabase.GetView(extractfolder)

Set noDocument = noView.GetLastDocument
Set vaItem = noDocument.GetFirstItem(“Body”)

MsgBox vaItem.Text 'Line reads the entire content if its a normal email but not with the email which I receive

MsgBox vaItem.Parent.ColumnValues()(15) ’ This line reads the content but not the entire content of the email

Please let me know to resolve the issue.

Regards,

Subba

2

Subject: Reading content from Lotus notes email using VBA or Macros

Thank you Mike.

3

Subject: If the Body field is TYPE = TYPE_RICHTEXT …

… there’s a GetUnformattedText() method there.

I don’t know how large VBA allows the string field to be, so at some point a large email may exhaust … Microsoft.

4

Subject: Reading content from Lotus notes email using VBA or Macros

Thank you Mike.

5

Subject: Is it possible it’s a multipart MIME?

If so, maybe the body field isn’t converted the way I think it is.

You may need to use the NotesMIMEEntity objects and disable autoconversion of the MIME into rich text (I think that is set in the NotesSession object). You’ll still need the rich text code in case it’s a native Notes email, btw.

I’ve only used the NotesMIMEEntity stuff to create emails, so I wouldn’t be much help with the code there.

If the MIME code is referential, and it’s only imported into the email when the email’s opened, that could be an additional stumbling block because the text isn’t really “in” the email. But it doesn’t seem that’s the problem at present.

6

Subject: Reading content from Lotus notes email using VBA or Macros

Thank you Mike.

I tried, GetUnformattedtext() method but it is returning the same result as Text() which is just the tooltip of the image, which is the first object in email body.

If email which I receive doesn’t contain any images, then I am able to read the full content no matter how large the string is but the email which I recieve contains an image at the top of the email due to whcih I think I am not able to read the full content.

Requirement is to read the URL which is in email body and I am able to find part of the URL by using FTSearch(). May I know if there is a way to retrieve the entire URL based on the search result.

Regards,

Subba

7

Subject: Reading content from Lotus notes email using VBA or Macros

Thank you Mike.

I tried, GetUnformattedtext() method but it is returning the same result as Text() which is just the tooltip of the image, which is the first object in email body.

If email which I receive doesn’t contain any images, then I am able to read the full content no matter how large the string is but the email which I recieve contains an image at the top of the email due to whcih I think I am not able to read the full content.

Requirement is to read the URL which is in email body and I am able to find part of the URL by using FTSearch(). May I know if there is a way to retrieve the entire URL based on the search result.

Regards,

Subba