[mRoman]

Empezado por Caro

Hola mRoman, la unit IdAttachmentFile pertenece a las Indy 10, seguramente tienes una versión mas antigua.

Donde en vez de utilizar TIdAttachmentFile es TIdAttachment sin añadir ninguna unidad en uses.

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

Saluditos

Listo....!!! ya salieron las propiedades, resulta que estaba tecleando mal el nombre del componente, tenia esto "idMessage", y esto es incorrecto ya que el componente le deje en la propiedad "name" el nombre que sugiere, que es el de "idMessage1"....o sea me hacia falta el 1....QUE BABAS !!!...asi pasa cuando estas tanto rato en esto....errores tan absurdos como este son los que no te dejan ver el error propiamente.

Ahora marca este error....

EIdProtocolReplyError

Les paso el codigo que tengo....

Código Delphi [-]
procedure TfrmEnviando.FormShow(Sender: TObject);
begin
     frmMenuE.Timer1.Enabled:=False;
     qryCorreos.Close;
     qryCorreos.Open;
     idSMTP1.Host:='empresa@gob.mx';
     idSMTP1.UserId:='MVARGAS';
     idSMTP1.Password:='';
     if not idSMTP1.Connected then
         idSMTP1.Connect;
//     TIdAttachment.Create(idMessage1.MessageParts,'c:\numeralia.xls');
     idMessage1.From.Address:='empleado@empresa.gob.mx';
     idMessage1.From.Name:='Miguel';
     idMessage1.Body.Add('Numeralia-2008');
     idMessage1.Subject:='SIDIST Liquida-NUMERALIA';
     idMessage1.Recipients.EMailAddresses:=qryCorreos.fieldbyname('DIRECCION_EMAIL').AsString;
     TidAttachment.Create(idMessage1.MessageParts,'c:\numeralia.xls');
     idSMTP1.Send(idMessage1);
end;

Estaré buscando que siginifica este error....

GRACIAS POR SUS APORTACIONES....