Ver Mensaje Individual
  #5  
Antiguo 09-12-2010
Avatar de AzidRain
[AzidRain] AzidRain is offline
Miembro Premium
 
Registrado: sep 2005
Ubicación: Córdoba, Veracruz, México
Posts: 2.914
Reputación: 21
AzidRain Va camino a la fama
Precisamente Fenix, para empezar recuerda siempre usar la versión mas actualizada posible (y estable) de cada componente que usas. Por otor lado actualmente hay muchos proveedores de correo que cambian sus protocolos por seguridad. LO que te funciona con uno no necesariamente te va a funcionar con otro.

Finalmente tu código está mal estructurado en la captura de las excepciones pues "El mensaje se envió correctamente" siempre se ejecutará aún cuando haya algun error. Te esta sobrando ese try que pusiste, debe quedar asi:

Código Delphi [-]
try
       indySMTP.Connect;
       indySMTP.Send(mailMensaje);
       showmessage('El mensaje se envió correctamente');
  except
       showmessage('Se produjo un fallo durante el envío del mensaje');
   end;

De esta forma si se genera una excepción todo salta a "Se produjo un fallo..." y nunca verás el otro mensaje. Si todo va bien, verás "El mensaje se envió..."
__________________
AKA "El animalito" ||Cordobés a mucha honra||
Responder Con Cita