Hello Notes Gurus,I created a bulk email script that executes on selected documents in our Marketing Department Contact database. The script work fine, however we want to include our company logo (a BMP image) in the body of the email near the top. How do I achieve this?
Snippet of mail send script below.
’ Send Bulk Mail for each selected document
‘=======================================
For i = 1 To gLibDocCollection.Count
Print "Processing " + Cstr (i) + " of " + Cstr ( gLibDocCollection.Count ) + ". Please wait ..."
Set gLibCurrentDoc = gLibDocCollection.GetNthDocument(i)
'Send Mail
'============================
Set memoDoc = Db.CreateDocument
Set body = New NotesRichTextItem(memoDoc, "Body" )
Call body.AppendText("Dear "+ Cstr(gLibCurrentDoc.FirstName(0)) + ",")
Call body.AddNewLine( 1 )
Call body.AppendText("Hello World")
Call body.AddNewLine( 2 )
Call body.AppendText(“Kind regards” + Sender)
memoDoc.Form = "Memo"
memoDoc.SendTo = gLibCurrentDoc.MailAddress
memoDoc.Subject = " Test Bulk Mail"
Call memoDoc.Send( False )
count = count + 1
Next