+- Comunidad Gambas-es (https://gambas-es.org)
+-- Foro: Gambas (https://gambas-es.org/forum-3.html)
+--- Foro: General (https://gambas-es.org/forum-4.html)
+--- Tema: [SOLUCIONADO] Ayuda para enviar correo electrónico (e-mail) con Gmail y Gambas (/thread-405.html)
Ayuda para enviar correo electrónico (e-mail) con Gmail y Gambas - gambafeliz - 11-05-2021
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
Código:
Dim SmtpClient1 As New SmtpClient
SmtpClient1.Host = "smtp.googlemail.com"
SmtpClient1.User = "user"
SmtpClient1.Password = "password"
SmtpClient1.Encrypt = Net.SSL
SmtpClient1.Port = 465
SmtpClient1.From = "user@gmail.com"
SmtpClient1.to.Add("user@gmail.com")
SmtpClient1.Subject = "Pruebas"
SmtpClient1.Add("Hola mundo")
SmtpClient1.Send()RE: Ayuda para enviar correo electrónico (e-mail) con Gmail y Gambas - Shordi - 12-05-2021
Es una opción de tu cuenta de Gmail. Algo así como "Abrir conexiones inseguras", no recuerdo. Lo cambias y te funciona.