Como puedo autetificar mi correo de outlook por medio de codigo Vb.net

Daniel Morales 0 Puntos de reputación
2024-11-15T18:15:48.3166667+00:00

he notado que el codgo de vb.net que tengo para acceder a los correos como terceros ya no funciona y quiero ver que necesito cambiar en mi codigo vb.net para que se autentifique y pueda enviar los correos desde la aplicacion que desarrolle.

ASP.NET
ASP.NET
Conjunto de tecnologías de .NET Framework para la creación de aplicaciones y servicios web XML.
42 preguntas
0 comentarios No hay comentarios
{count} votos

1 respuesta

Ordenar por: Muy útil
  1. Gao Chen 3,270 Puntos de reputación Proveedor de Microsoft
    2024-11-15T21:36:11.57+00:00

    Hola Daniel Morales,

    ¡Bienvenido(a) a Microsoft Q&A!

    Por favor ten en cuenta que nosotros no soportamos código, sin embargo, esto puede deberse a cambios en las políticas de seguridad de los proveedores de correo, como Gmail, que han dejado de permitir el acceso a aplicaciones menos seguras.

    Aquí hay algunos pasos y cambios que podrías considerar para actualizar tu código:

    1. Usar OAuth 2.0
    • Muchos proveedores de correo, como Gmail, ahora requieren OAuth 2.0 para la autenticación. Esto implica registrar tu aplicación y obtener un token de acceso en lugar de usar solo el nombre de usuario y la contraseña.
    1. Actualizar el Código de Envío de Correos
    • Asegúrate de que tu código esté configurado para usar SSL/TLS. Aquí tienes un ejemplo básico de cómo debería verse tu código:
       Imports System.Net
       Imports System.Net.Mail
    
       Module Correo
           Sub EnviarCorreo()
               Dim correo As New MailMessage()
               correo.From = New MailAddress("tu_email@gmail.com")
               correo.To.Add("destinatario@example.com")
               correo.Subject = "Asunto"
               correo.Body = "Cuerpo del mensaje"
               correo.IsBodyHtml = True
    
               Dim cliente As New SmtpClient("smtp.gmail.com", 587)
               cliente.Credentials = New NetworkCredential("tu_email@gmail.com", "tu_contraseña")
               cliente.EnableSsl = True
    
               Try
                   cliente.Send(correo)
                   MsgBox("Correo enviado correctamente.")
               Catch ex As Exception
                   MsgBox("Error: " & ex.Message)
               End Try
           End Sub
       End Module
    
    1. Configuraciones del Servidor SMTP
    • Verifica que estás utilizando el servidor SMTP correcto y el puerto adecuado. Para Gmail, generalmente es smtp.gmail.com con el puerto 587 para TLS.
    1. Permitir Aplicaciones Menos Seguras
    • Si aún no has migrado a OAuth, puedes intentar habilitar el acceso a aplicaciones menos seguras en la configuración de tu cuenta de Google, aunque esto no es recomendable por razones de seguridad.
    1. Revisar Errores Comunes
    • Te recomiendo verificar que no haya errores tipográficos en las credenciales y que la cuenta de correo no tenga restricciones adicionales.

    Espero que información brindada fuera útil. Si necesitas más asistencia, estoy a tu disposición.

    Atentamente,

    Gao


    Si esta respuesta resolvió tu consulta, por favor haz clic en 'Aceptar respuesta'. Esto nos ayuda a mejorar continuamente la calidad y relevancia de nuestras soluciones.


Su respuesta

Las respuestas se pueden marcar como respuestas aceptadas por el autor de la pregunta, lo que ayuda a los usuarios a conocer la respuesta que resolvió el problema del autor.