problemas para enviar mails

periklesvcl · #1 09-09-2005

tengo 1 problema gordo y es q necesito implementar en mi programa una aplicacion pa enviar mails y la verdad es q por mucho q lo intento no funciona aunq al compilar no da errores.......

les mando el codigo para ver si ustedes (gente amble de este club) localizais algun error.

codigo del boton conectar

Código Delphi [-] begin
   NmSmtp1.Host := Combobox1.items.text;
   NmSmtp1.UserID := Edit4.text;
   NmSmtp1.Connect;
 end;

codigo del boton enviar

Código Delphi [-] begin
   {Boton de Enviar}
   nmSmtp1.PostMessage.Assign(Memo2.Lines);
   nmSmtp1.PostMessage.FromName := Edit1.text;
   nmSmtp1.PostMessage.Subject := Edit2.text;
   nmSmtp1.PostMessage.FromAddress := Edit3.text;
   nmSmtp1.PostMessage.Body.Assign(Memo1.Lines);
   nmSmtp1.Sendmail;
 end;

gracias de antemano!!!

dec · #2 09-09-2005

Hola,

Personalmente, no veo ningún error de bulto en el código fuente.Tal vez este Hilo pueda serte de alguna utilidad. Si te decides por los componentes Indy que se refieren en el mismo puedes ver aquí y aquí dos formas de enviar un correo utilizando dichos componentes. Esta búsqueda en los Foros te dará más información sobre el componente que estás usando ahora: tal vez te ayude.

Actualización:

Cita:

Empezado por dec

Personalmente, no veo ningún error de bulto en el código fuente.

Bueno... tal vez esta instrucción:

Código Delphi [-]  NmSmtp1.Host := Combobox1.items.text;

Creo que estaría demás, es decir, que bastaría de este modo:

Código Delphi [-]  NmSmtp1.Host := Combobox1.Text;

Porque lo que se trata de obtener con la propiedad "Text" es el texto del elemento seleccionado en el "ComboBox", mientras que "Item.Text", si no estoy equivocado, te daría el texto de todos los elementos que contuviera el "ComboBox".

periklesvcl · #3 09-09-2005

el problema es el siguiente........tengo delphi 5 y no tengo las indy

e canviado el combo vox por un text edit y la verdad es q funciona mejor.....

pero sige dando errores

puede ser q debo mandar la contraseña tambien al servidor??? y si es asi como lo deberia hacer????

gracias por contestar tan pronto.

dec · #4 09-09-2005

Hola,

Cita:

Empezado por periklesvcl

el problema es el siguiente........tengo delphi 5 y no tengo las indy

Bueno. Los componentes Indy pueden instalarse en Delphi 5, según parece.

Cita:

Empezado por periklesvcl

puede ser q debo mandar la contraseña tambien al servidor??? y si es asi como lo deberia hacer????

Pues sí; probablemente tengas que hacerlo... ese era otro error de bulto que se me escapó, a lo que se ve. ¿Cómo puedes hacerlo? Lo cierto es que no utilizé el componete que usas ahora, pero, supongo que igual que tiene una propiedad "UserID" tendrá alguna como "Pass", "Password" o algo parecido. ¿No?

Nota: En varios Hilos de los que he hallado tras esta búsqueda en los Foros se encarece el uso de los componentes Indy en detrimento del que estás usando ahora mismo. Trata de instalar los componentes Indy, es probable que no te arrepientas.

ContraVeneno · #5 09-09-2005

si mal no recuerdo, hace falta definir el puerto de conecxión por el cuál se enviará el mail.

dec · #6 10-09-2005

Hola,

Cita:

Empezado por ContraVeneno

si mal no recuerdo, hace falta definir el puerto de conecxión por el cuál se enviará el mail.

Así lo creo yo también. ¿Alguien ve algo que halla yo colegido? Porque que se me han pasado posibles errores ya se ve... ¡qué barbaridad!

ContraVeneno · #7 10-09-2005

Ejemplo bastante sencillo de como enviar mails
y lo que veo diferente de lo aquí mostrado y el ejemplo es (además de varias cosas):
- definir el puerto de conexión
- utilizar try except para capturar errores.