Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Internet (https://www.clubdelphi.com/foros/forumdisplay.php?f=3)
-   -   No entiendo, problemas al adjuntar archivos (https://www.clubdelphi.com/foros/showthread.php?t=3302)

Walterdf 01-09-2003 20:27:47

No entiendo, problemas al adjuntar archivos
 
Hola otra vez,
Necesito enviar un mensaje con formato (html) y con un adjunto.
Cuando envío el mensaje sin adjuntos llega perfecto pero cuando hago un attach, en el cuerpo del mensaje recibo un montón de porquerías (el attach llega bien).

Lo hice de esta manera:

NMSMTP1.PostMessage.FromAddress := 'walter@mihost.com';
NMSMTP1.PostMessage.Subject := 'Mensaje de prueba';
NMSMTP1.PostMessage.Attachments.Add('c:\miarchivo.xls');
end;

NMSMTP1.PostMessage.Body.LoadFromFile('cuerpo.htm');

NMSMTP1.PostMessage.ToBlindCarbonCopy.Clear;
NMSMTP1.PostMessage.ToBlindCarbonCopy.LoadFromFile('d:\mails.txt');

if not NMSMTP1.Connected then
NMSMTP1.Connect;

NMSMTP1.SendMail;

Aclaro que la propiedad SubType esta en mtHtml

¿Qué puede ser?
Gracias.
Walter

acertij022 02-09-2003 14:35:19

No se si será de gran ayuda, pero yo utlizo los componentes indy y funciona perfectamente revisa el ejemplo MailClient no tiene nada que envidiar al OutLoock.:D

Walterdf 02-09-2003 17:54:32

Hola acertijo
Gracias por responderme.
Mirá, probé con las Indy pero me hace exactamente lo mismo.
Lo hice asi:

SMTP.Connect;

MSG.From.Text:='walter@rodamet.com';

MSG.ContentType:='html';

MSG.Body.LoadFromFile(Filenameedit1.FileName); {aquí adjunto un archivo con diseño HTML}

MSG.BccList.EMailAddresses:='walter@mihost.com'

TidAttachment.Create(MSG.MessageParts,Opendialog1.FileName);

MSG.MessageParts.Add;

SMTP.Send(MSG);

SMTP.Disconnect;

Si envío el mensaje solo, lleva perfecto, cuando le agrego un attach, sale todo mal.
Gracias
Walter


La franja horaria es GMT +2. Ahora son las 08:40:12.

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