Specify character set

Recipients still getting strange characters even after i specify UTF-8. Pls advise.

session.ConvertMime = False

Dim body As NotesMIMEEntity

Dim bodyChild As NotesMIMEEntity

Dim stream As NotesStream

Dim header As NotesMIMEHeader

Set body = maildoc.CreateMIMEEntity

Set stream = session.CreateStream

Call stream.WriteText(“”)

Call stream.WriteText(“”)

Call stream.WriteText(“”)

Call stream.WriteText(BodyText)

Call stream.WriteText(“”)

Set bodyChild = body.CreateChildEntity

Call bodyChild.SetContentFromText(stream, “text/html;charset=UTF-8”, ENC_NONE)

Call stream.Close