Could someone please help (Lotus Notes 6.5.6). The following code extract works but it puts the file at the bottom. I want it to appear at the top of whatever is in "RTFItems". I am thinking I need to somehow create a temp file to embed my file, then embed the RTFItems and then copy the temp file back into RTFItems doc.
Dim db As Object
Dim doc As Object
Set Body = doc.GetFirstItem("RTFItems")
Call Body.EmbedObject(1454, "", "H:\Temp\" & msgNewName, "Attachment")
Call doc.Save(True, False)
Kill "H:\Temp\" & msgNewName