Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Internet (https://www.clubdelphi.com/foros/forumdisplay.php?f=3)
-   -   Incluir html como diseño fondo al enviar email (https://www.clubdelphi.com/foros/showthread.php?t=45268)

CORBATIN 27-06-2007 18:31:31

Incluir html como diseño fondo al enviar email
 
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 27-06-2007 19:01:42

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

Phantom_Drake 27-06-2007 19:51:20

soy nuevo en delphi y la verdad no entiendo bien eso, todas esos pedazos de codigo van en la misma funcion o como esta el rollo :confused:

Phantom_Drake 27-06-2007 19:54:30

por ke yo uso este codigo y nomas no puedo poner la imagen de fondo Código Delphi [-]email := TIdMessage.Create(nil);
email.From.Text := 'mi correo';
email.Recipients.EMailAddresses := 'a donde va';
email.Subject := 'Hello';
email.ContentType := 'multipart/mixed';
email.IsEncoded:=true;
email.Body.Assign(html);
txtpart := TIdText.Create(email.MessageParts);
txtpart.ContentType := 'text/plain';
txtpart.Body.Text := '';
htmpart := TIdText.Create(email.MessageParts, html);
htmpart.ContentType := 'text/html';
bmppart := TIdAttachment.Create(email.MessageParts, filename);
bmppart.ContentType := 'image/jpeg';
bmppart.FileIsTempFile := true;
bmppart.ContentDisposition := 'image';
bmppart.ExtraHeaders.Values['content-id'] := '\homerorx.jpg';
bmppart.DisplayName := '\homerorx.jpg';

Phantom_Drake 27-06-2007 20:11:10

la el archiv ke usa es una variable :confused: y si lo es de ke tipo es :confused:

CORBATIN 27-06-2007 21:34:55

Ok, gracias por mi parte me doy por enterado, lo probaré.

UN SALUDO.

CORBATIN 27-06-2007 22:46:27

Me he decidido hacerlo con el execute
Código Delphi [-]
 ShellExecute(Self.Handle,nil, Pchar('mailto:ja@ja.com?subjet=palabras&body='+shtml),nil,nil,SW_NORMAL);
shtml es dónde almaceno el codigo html que voy generando. Tengo una unit con funciones y estás me van generando el código html.
El caso que funciona bien pero me falta que el código en html salga en html. Supongo que diciendo que el Content-Type es html lo debe hacer bien, pero ¿como lo hago para decirselo al outlook?, gracias.

ContraVeneno 27-06-2007 22:51:39

Cita:

Empezado por Phantom_Drake
la el archiv ke usa es una variable :confused: y si lo es de ke tipo es :confused:

Cita:

Empezado por Guía de estilo
No solicites que te respondan por correo en privado

Los problemas deben ser un proceso público y transparente, durante el cual un primer intento de respuesta puede y debería corregirse si alguien con más conocimientos percibe que la respuesta es incompleta o incorrecta. Además quién te responde obtiene parte de su recompensa al verse que son competentes y útiles a nuestra comunidad.
Cuando pides una respuesta privada, estás interrumpiendo tanto el proceso como la recompensa. No lo hagas.

Guía de estilo


La franja horaria es GMT +2. Ahora son las 18:02:39.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi