Hi All, I want to set image in mail. And I am sending mail through notesstream class.
========================================
Dim session As New NotesSession
Dim bodyitem As NotesStream
Set bodyitem = session.CreateStream
Dim maildoc As New NotesDocument(session.CurrentDatabase)
Dim mime As NotesMIMEEntity
altmail="pawan.kumar@in.v2solutions.com"
break1={ }
welcome={Welcome to My Smart Drive}
break2={<BR>}
bodyitem.WriteText break1
bodyitem.WriteText welcome
Set mime = maildoc.CreateMIMEEntity(“Body”)
mime.SetContentFromText bodyitem, “text/html”, ENC_NONE
maildoc.Subject = “Mysmartdrive free registration confirmation”
Call maildoc.Save(True,True)
maildoc.Send False, altmail
========================================
NOw I want to send image in this mail.
How can I send Please guide me.
Pawan