Ver Mensaje Individual
  #1  
Antiguo 28-08-2008
gabirojas gabirojas is offline
Miembro
 
Registrado: sep 2007
Posts: 27
Reputación: 0
gabirojas Va por buen camino
Enviar mail a hotmail o yahoo

Hola a todos los mienbros del Club Delphi. Tengo una aplicacion que envia perfectamente los mails a cuentas de speedy, lotus, etc., pero no puedo hacer que lo envie a Hotmail o Yahoo. No da error ni nada, simplemente no llegan a destino. Utilizo Delphi 7 con indy 9, tengo una cuenta de speedy. Busque en este sitio, pero no pude encontrar ninguna solucion. Aca les paso una parte del codigo:

Código Delphi [-]
procedure TForm1.Button2Click(Sender: TObject);
begin        idsmtp := tidsmtp.Create(self);       idmessage := tidmessage.Create(self);       IdSMTP.Host     := 'mail.speedy.com.ar';
      IdSMTP.Username := 'xxxxxxxx@speedy.com.ar';
      IdSMTP.Password := '******';
      idSMTP.Port := 25;
      idsmtp.AuthenticationType:=Atlogin;
      idMessage.From.Address   := 'xxxxxxxxx@speedy.com.ar';
      IdMessage.From.Name     :=  'XXXXXXX';
      IdMessage.Body          :=  memo1.Lines;
      IdMessage.Subject       :=  asunto.Text;
      IdMessage.Recipients.EMailAddresses := 'xxxxxxxx@yahoo.com.ar';
      idsmtp.Connect(3000);
      IdSMTP.Send(IdMessage);
      idsmtp.Disconnect;
end;

Espero que alguien me de la respuesta, gracias de antemano.
Responder Con Cita