How does one attach a file to e-mail?

[delphiman]

I have a routine whereby I send email in which I have the following code.

strMsg := 'mailto:' + 'delphiman@bigpond.com' + '?Subject=' + 'REGISTRATION'+ ' ' + strProduct;

Which works fine.

Now I need to know what code to add to it so that the resulting e-mail will attach (say)
c:\h\MyFile.gdb in the "Ättached" section of the e-mail.

I have tried the following from which I get an exception at c of c:\h

strMsg := 'mailto:' + 'delphiman@bigpond.com' + '?Subject=' + 'REGISTRATION'+ ' ' + strProduct
+ '?Attached=' + c:\h\MyFile.gdb;

Any suggestions please?

Thanks in advance.

 

[Stretchwickster]

As far as I am aware, not all mail applications are capable of handling attachments in the mailto line. But what you could try is this:

var
  pCh: PChar;
begin
  pCh := 'mailto:me@me.com?subject=your_subject&body=your_body&file="c:\temp\myFile.txt"';
  ShellExecute(0, 'open', pCh, nil, nil, SW_SHOWNORMAL);
end;

I found this on:

http://www.scalabium.com/faq/dct0049.htm

Also check out my FAQ on this subject - it includes info on the mailto protocol and other methods of emailing:
faq102-3600

Hope this helps!

Clive

http://www.kucu.co.uk

Ex nihilo, nihil fit (Out of nothing, nothing comes)

 

[Stretchwickster]

Just as a further note: if your routine will be run on many different Windows platforms or on different mail applications, your best bet is to use MAPI (Messaging Application Programming Interface) as specified in the FAQ.

Clive

http://www.kucu.co.uk

Ex nihilo, nihil fit (Out of nothing, nothing comes)