Attachments.Add DisplayName property?

[Guest]

I am attaching a document to an email in access 97 using Outlook Automation.
My code works fine attaching the document located at strDocumentLocation.
However, I want to rename the attachment something else (strDocumentName) but
I can't seem to get that to work. An abbreviated version of the code I am
using is:

strDocumentLocation = "C:\Temp\DocumentLocation.doc"

strDocumentName = "DocumentName"

Set objAttach = objMail.Attachments.Add(strDocumentLocation, 1, ,
strDocumentName)

When my email is displayed, the attachment is there but is called
"DocumentLocation.doc" instead of "DocumentName".


Any help is greatly appreciated.

 

[Guest]

After researching the problem on the internet, I found the following reason
why this code does not work:

in OL2k that works but was changed in OL XP or 2003 for security
reasons.

This reason was found on the following web page:

http://groups.google.com/group/micr...ts+outlook+add+method&rnum=1#5cb833d3327f6f5d