Attaching documents to emails (VBA)

I currently use this code to attach items to emails via VBA:

Set EmbedMyfile = notesItem.EMBEDOBJECT(1454, “”, strFileName, “”)

This results in the attachment having a generic icon. Is there a differn’t way to attach items, so they will have the icon it would have like I manually attached?

Also, the code I use for Automation is really taken from some VBA Code I have taken over. Is there any books/online documentation that I can get my hands on to read up on this?

Subject: Attaching documents to emails (VBA)

No – the application-specific attachment icon is driven by the UI. The icon may be different for different users – a JPEG, for instance, may have a Photoshop icon, a PaintShopPro icon, or something else depending on which application the user has defined in the OS, and that can vary from user to user on the same machine.

Apart from Designer Help (which contains everything you need to know, though not necessarily in a friendly order), there are a couple of Redbooks that may help:

http://publib-b.boulder.ibm.com/redbooks.nsf/RedbookAbstracts/sg246854.html?Open

and

http://www.redbooks.ibm.com/abstracts/sg245670.html?Open