Enviar email usando OUTLOOK 2003

[ContraVeneno]

¿y si utilizas el shellExec con un comando mailto ?

[Jose Manuel]

Utilizando el comando MAILTO, no se podría adjuntar anexos y en este caso es muy importante que en cada correo se adjunte un fichero anexo.

procedure TForm1.Button1Click(Sender: TObject);
begin
  ShellExecute(Self.Handle, nil,
    'mailto:eds2004 @ latiumsoftware.com' +
    '?Subject=Test&Body=Just testing the example',
    nil, nil, SW_NORMAL);
end;

[ContraVeneno]

¿quién dice que no se pueden adjuntar archivos?

[Jose Manuel]

Creo que sería más práctico, que si sabes la respuesta la pongas en el foro.

La pregunta no era si MAILTO podía enviar anexos (Hay respuesta para esto en varios foros que dicen que no es posible), sino que utilizando el código del ejemplo que ajunte en el primer mensaje, funciona perfectamente para enviar correos electrónicos con anexos en OUTLOOK 2002, pero da error en usuarios con OUTLOOK 2003.

Muchas gracias por tu interes.
Jose Manuel.

[ContraVeneno]

Hombre, no te lo tomes a mal

Según aquí, dicen que si se puede.

Mi recomendación de usar el shellexecute es porque de esta forma no tienes que preocuparte por si tiene outlook exprees, 2000, 2003, edora, o lo que sea, con shellexecute se abrirá el correo predeterminado. Por eso creo que la solución a tu problema sería utilizar el shellexecute.

Empezado por Jose Manuel

...(Hay respuesta para esto en varios foros que dicen que no es posible),...

pues según esta instrucción si se puede, si utilizas el shellexecute de esta forma:

Código Delphi [-]
ShellExecute(Handle, 'open', 
'mailto:[email protected]?subject=MySubject&Attach=''C:\Attachment.txt''',
nil, nil, SW_SHOW)

Puntos clave
(1) El adjunto (&Attach) debe estar al final
(2) la ruta y el nombre del archivo se definen por separado por comillas
(3) No todos aceptan archivos adjuntos, pero esto funciona con Outlook 97 & 2000. Podrías probarlo con el 2003


Fuente: steve dabrosca

[alapaco]

Lo que dice ContraVeneno funciona perfecto...pero se puede attachar mas de un archivo ??

Vengo probando desde hace varios días y no le encuentro la vuelta...alguna sabe si se puede ??

Desde ya gracias.

[fervasek]

Tengo una duda, como se le pasaria a shellexecute() el parametro para el cuerpo del email, podiendo poner distintos tamaños, colres y fuentes de letras, y tambien poder poner una imagen (logo) en el cuerpo.
Muchas gracias.

[CORBATIN]

Hola a todos. Me gustaría saber como lo tendría que hacer para que además de envíar el correo usando outlook 2003, pues quiero incluir un archivo html pero que salga como fondo. Mi intención es que no salga el html como adjunto, sino que cuando lo vaya a leer el cliente, ya vea directamente el archivo que le envío. Actualmente lo estoy haciendo seleccionando el archivo html como diseño de fondo pero me gustaría hacerlo automático desde delphi, gracias.

[ContraVeneno]

ahem....

http://www.clubdelphi.com/foros/showthread.php?t=18819