Enviar correo desde Delphi 7

[carlos gonzalez]

Hola amigos tengo un sistema echo de delphi 7 por medio del cual envio correos a ciertas direcciones usando los componentes Tidsmtp y Tidmessage, pero quisiera saber si por medio de estos componentes tambien puedo aneaxar algun archivo y enviarlo, si alguien sabe si esto es posible les agradeceria lo compartieran con un servidor.

Saludos su amigo charless.

[Casimiro Notevi]

Abajo de esta página encontrarás unos enlaces que te servirán

[*Caro*]

Empezado por carlos gonzalez

Hola amigos tengo un sistema echo de delphi 7 por medio del cual envio correos a ciertas direcciones usando los componentes Tidsmtp y Tidmessage, pero quisiera saber si por medio de estos componentes tambien puedo aneaxar algun archivo y enviarlo, si alguien sabe si esto es posible les agradeceria lo compartieran con un servidor.

Hola carlos gonzalez, si se puede, solo que no dices que versión de las Indy estas usando, si es una versión inferior a Indy10 sería así:

Código Delphi [-]
  TIdAttachment.Create(IdMessage.MessageParts, OpenDialog.FileName);

Si es Indy10, debes añadir en uses la unit IdAttachmentFile y el codigo quedaría así:

Código Delphi [-]
  TIdAttachmentFile.Create(idMessage.MessageParts, OpenDialog.FileName);

Saluditos