Portal    Foro    Buscar    FAQ    Registrarse    Conectarse


Publicar nuevo tema  Responder al tema 
Página 1 de 2
Ir a la página 1, 2  Siguiente
 
Enviar Correo Mediante El Componente Smtp
Autor Mensaje
Responder citando   Descargar mensaje  
Mensaje Enviar Correo Mediante El Componente Smtp 
 
Hola.

Estoy probando el componente smtp, y quisera saber si es que se puede enviar un correo sin la necesidad de tener
instalado un servidor de mail en el equipo. Al estilo de Evolution.

Saludos
 



 
abarzuaf - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Enviar Correo Mediante El Componente Smtp 
 
http://www.gambas-es.org/viewtopic.php?f=1&t=30&highlight=smtp


http://www.gambas-es.org/viewtopic.php?f=1&t=227&highlight=smtp


http://www.gambas-es.org/viewtopic.php?f=5&t=492&highlight=smtp


Puede que te interese el segundo enlace, pero en ningún caso es necesario instalar ningún servidor en tu equipo. Sin embargo, la clase smtp requiere uno, evidentemente, que puede ser remoto, por ejemplo el de una cuenta gmail o cualquier otra.

Saludos
 




===================
Jesús Guardón

Por favor, usemos el corrector ortográfico antes de pulsar el botón "Enviar".

"uo ǝs ʇɐu pıɟıɔıן ɐdɹǝupǝɹ ɐ dɹoƃɹɐɯɐɹ, soןo ɥɐʎ bnǝ dɹodouǝɹsǝןo"
 
jguardon - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Enviar Correo Mediante El Componente Smtp 
 
Hola.

Muchas gracias por los link .
Lo que estoy probando es el siguiente codigo(Posteado por pcastanedardz 09 marzo 2010 http://www.gambas-es.org/viewtopic.php?f=5&t=492&highlight=smtp) tercer link , que lo ejecuto en consola:

PUBLIC SUB Main()
 DIM Correo AS NEW SmtpClient
Correo.To.Add("email@destinatario")
Correo.From = "email@remitente"
Correo.Subject = "prueba de correo"
Correo.Host = "mail.servidor.com"
Correo.Port = "25"
Correo.Add("Prueba de envio", "text/plain")
Correo.Send()
end


Al ejecutarlo obtengo este error:

"Server won't accept sender while starting dialog(smtp error code #575)"

Buscando que significa el error #575, encontré lo siguiente:

"Error #575 = Falla criptografica, intente un mensaje plano con encriptación"

y hasta ahí quedo, ¿alguna idea?

Saludos
 



 
última edición por abarzuaf el Martes, 23 Marzo 2010, 18:47; editado 3 veces 
abarzuaf - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Enviar Correo Mediante El Componente Smtp 
 
Lo siento, a mí me funciona correctamente, por lo que es seguro que no es problema de gambas, sino del servidor de correo que usas.

Si tienes oportunidad, prueba con otro servidor. No tengo ni remota idea por qué ocurre el error ni cómo solucionarlo.  

Quizás se necesite un password, pero no veo ninguna propiedad al respecto...  

Saludos
 




===================
Jesús Guardón

Por favor, usemos el corrector ortográfico antes de pulsar el botón "Enviar".

"uo ǝs ʇɐu pıɟıɔıן ɐdɹǝupǝɹ ɐ dɹoƃɹɐɯɐɹ, soןo ɥɐʎ bnǝ dɹodouǝɹsǝןo"
 
jguardon - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Enviar Correo Mediante El Componente Smtp 
 
Ok. Muchas gracias de todas formas.

Saludos
 



 
abarzuaf - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Enviar Correo Mediante El Componente Smtp 
 
Hay un hilo en el foro de nables con el mismo problema. Según se manifiesta Benoit, este error se debe a que el servidor de correo requiere contraseña para aceptar el envío y no hay una manera clara de enviar la contraseña con el componente actual.

De momento mejor seguir con los sistemas tradicionales...
 




===================
No podemos regresar
 
shordi - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Enviar Correo Mediante El Componente Smtp 
 
Shordi:

Citar:
De momento mejor seguir con los sistemas tradicionales...

¿A que sistemas te refieres?, a ver si me puedes dar alguna pista....

Saludos
 




===================
Blog personal
Web: SoloGambas seleccion de articulos dedicados a Gambas
Visita el Curso de Gambas3 ¡¡¡Gratuito!!!
 
jsbsan - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Enviar Correo Mediante El Componente Smtp 
 
Este hilo es muy viejo. Desde entonces las cosas han cambiado y ahora SMTP funciona bien. Yo lo uso para enviar mensajes desde mis aplicaciones con servidores con clave y demás y funciona de lujo.
 



 
shordi - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Enviar Correo Mediante El Componente Smtp 
 
Shordi:

A ver si puedes subir un simple ejemplo, no se si el código de abarzuaf es válido o no

Saludos
 




===================
Blog personal
Web: SoloGambas seleccion de articulos dedicados a Gambas
Visita el Curso de Gambas3 ¡¡¡Gratuito!!!
 
jsbsan - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Enviar Correo Mediante El Componente Smtp 
 
Te adjunto la versión simplificada de la función que yo uso para que mi programa envíe avisos a los usuarios en sus cuentas de email. Situada en el famoso módulo mComun.
El tema de los bcc (para envíos múltiples) y de los ficheros adjuntos no está implementado aún, aunque como ves, los parámetros ya existen.
Esto es así porque hasta ahora mis aplicaciones sólo envían mensajes. Ya me han pedido el poder remitir adjuntos, por lo que en unos días me tengo que poner a ello. Si te interesa, te puedo remitir lo que saque en claro.

Public Sub enviarmail(aTo As String[], cAsunto As String, cTexto As String, Optional cFrom As String, Optional bcc As String[], Optional adjuntos As Variant[])

  Dim destino As String
  Dim enviador As New SmtpClient

  enviador.host = "miservidor de correo"  'Estos datos que te pongo entre comillados no los recibo como parámetros, por cuanto los saco de una clase "Usuario" que se instancia en el momento del login  
  enviador.user = "miusuariodecorreo"
  enviador.password = "miclavedeusuariodecorreo"
  If Not cFrom Then cFrom = "micuenta@remitentedecorreo"
  enviador.Alternative = True
  enviador.From = cFrom
  For Each destino In aTo
      enviador.to.Add(destino)
  Next
  enviador.Subject = cAsunto
  enviador.Add(cTexto, "text/plain")
  enviador.send  
    
End
 

 



 
shordi - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Mostrar mensajes anteriores:    
 
Ocultar¡Este tema fue útil?

 

Elegir valoración:                       

Media de valoración Valoración mínima Valoración máxima Número de valoraciones
0.00 0 0 0
 
OcultarTemas parecidos
Tema Autor Foro Respuestas último mensaje
No hay nuevos mensajes Cliente De Correo shordi General 2 Miercoles, 27 Noviembre 2013, 13:49 Ver último mensaje
shordi
No hay nuevos mensajes AvisaMail: Notificador De Correo POP shordi Aplicaciones/Fragmentos de Código 16 Domingo, 30 Octobre 2016, 13:24 Ver último mensaje
shordi
No hay nuevos mensajes Exigir Un Correo O Web Mínimo En Un Textbox v3ctor Aplicaciones/Fragmentos de Código 8 Domingo, 25 Diciembre 2016, 19:38 Ver último mensaje
v3ctor
No hay nuevos mensajes Lista De Correo Internacional Y Bugtracker Shell General 5 Miercoles, 09 Diciembre 2015, 21:39 Ver último mensaje
Shell
 

Publicar nuevo tema  Responder al tema  Página 1 de 2
Ir a la página 1, 2  Siguiente

Usuarios navegando en este tema: 0 registrados, 0 ocultos y 1 invitado
Usuarios registrados conectados: Ninguno


 
Lista de permisos
No puede crear mensajes
No puede responder temas
No puede editar sus mensajes
No puede borrar sus mensajes
No puede votar en encuestas
No puede adjuntar archivos
No puede descargar archivos
No puede publicar eventos en el calendario