Comunidad Gambas-es

Versión completa: Ayuda para enviar correo electrónico (e-mail) con Gmail y Gambas
Actualmente estas viendo una versión simplificada de nuestro contenido. Ver la versión completa con el formato correcto.
Hola

Intento enviar un correo desde Gambas a través de Gmail pero aunque me dice que funciona justo en Send() me dice algo como que no tengo permisos y es lo que me manda Gmail a mi correo, que una aplicación de tercero ha sido bloqueada por intentar usar el usuario y contraseña para enviar a través de Gmail.

Alguien me dice como puedo corregirlo?

Gracias.

Este es mi código: Uso gb.Net.Smtp

GAMBAS
  1. Dim SmtpClient1 As New SmtpClient
  2. SmtpClient1.Host = "smtp.googlemail.com"
  3. SmtpClient1.User = "user"
  4. SmtpClient1.Password = "password"
  5.  
  6. SmtpClient1.Encrypt = Net.SSL
  7. SmtpClient1.Port = 465
  8.  
  9. SmtpClient1.From = "user@gmail.com"
  10. SmtpClient1.to.Add("user@gmail.com")
  11.  
  12. SmtpClient1.Subject = "Pruebas"
  13. SmtpClient1.Add("Hola mundo")
  14.  
  15. SmtpClient1.Send()


Es una opción de tu cuenta de Gmail. Algo así como "Abrir conexiones inseguras", no recuerdo. Lo cambias y te funciona.