Pido ayuda para enviar correos desde formulario
Impreso de: Foro de Access y VBA
Categoría: Access y VBA
Nombre del foro: Access y VBA
Descripción del foro: Foro de programacion en Access (Con código y sin código)
URL: http://www.mvp-access.com/foro/forum_posts.asp?TID=86221
Fecha de impresión: 08/Junio/2023 a las 06:34
Tema: Pido ayuda para enviar correos desde formulario
Publicado por: mapacheman
Asunto: Pido ayuda para enviar correos desde formulario
Fecha de publicación: 02/Enero/2022 a las 13:41
|
Primero de todo gracias por mantener este foro, que por lo que veo es muy activo. Mi problema y para el que pido ayuda es el siguiente. La cuenta es de office 365 y utilizo la siguiente configuración: Dim MiCorreo As CDO.Message Dim Configuration Set MiCorreo = New CDO.Message Set Configuration = CreateObject("CDO.Configuration") Configuration.Load -1 ' CDO Source Defaults Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.office365.com" Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 ' 587 Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1 Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 10 Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = "usuario@hotmail.com" Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "contraseña" Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendtls") = True Configuration.Fields.Update Al final, utilice el puerto que utilice (25, 587, 465, etc...), siempre me aparece el mensaje de error de automatización. LLevo varios días buscando por internet, y todas las soluciones que al gente le funciona a mi no :.( Copio literalmente los códigos de la gente, adaptándole mis datos de usuario y contraseña, y no hay forma de enviar correos. Si alguien tiene una rutina en access que le funcione le agradecería que me la compartiese. Un saludo y feliz año.
|
Respuestas:
Publicado por: mapacheman
Fecha de publicación: 02/Enero/2022 a las 13:56
|
Por cierto, el mensaje de error es el siguiente : No se pudo enviar el mensaje al servidor SMTP. El código de error de transporte fue 0x80040217. La respuesta del servidor fue not available |
Publicado por: xavi
Fecha de publicación: 03/Enero/2022 a las 18:27
|
Yo también me encontré con un mensaje parecido al ejecutar una aplicación que mandaba correos mediante CDO y se debía a las configuraciones de seguridad del servidor dónde se ejecutaba el código. Me lo bajé a mi portátil y desde ahí no he tenido problema. Es un proceso que hago una vez al año y no me acuerdo del motivo exacto de la configuración que impedía el envio (mi memoria ya no es la que era....) ¿Desde dónde lo envías tu? Un saludo ------------- Xavi, un minyó de Terrassa http://www.llodax.com" rel="nofollow - Mi web 
|
Publicado por: lupecinda
Fecha de publicación: 03/Enero/2022 a las 19:50
|
Hola, en mi caso se solucionó modificando la cuenta de gmail diciendo que se podían enviar mails desde aplicaciones ajenas a gmail. Saludos ------------- Lupita |
Publicado por: rokoko
Fecha de publicación: 06/Enero/2022 a las 14:53
|
Hola. Si usas Gmail. En Gmail hay, o mejor dicho habia una opcion para activar las aplicaciones poco seguras, pero hace muy poco lo han retirado. Si no lo tienes activado no te ira. Ahora no se como queda la cosa........ A mi de momento me sigue funcionando.... https://support.google.com/a/answer/6260879?hl=es#zippy=%2Caviso-de-retirada-de-un-ajuste" rel="nofollow - Controlar el acceso a aplicaciones poco seguras - Ayuda de Administrador de Google Workspace
|
Publicado por: mapacheman
Fecha de publicación: 09/Enero/2022 a las 14:16
|
Buenas, mi problema es con una cuenta bajo Office 365, no de Gmail. Por lo que veo en Gmail no hay tantos problemas. Me estoy volviendo loco, veo soluciones por todos lados pero ninguna me funciona!!! Gracias de todas formas y feliz año |
Publicado por: Mihura
Fecha de publicación: 10/Enero/2022 a las 16:04
|
Te falta poner: ObjMsg.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = True ------------- Jesús Mansilla Castells. Saludos desde Móstoles. http://www.accessaplicaciones.com" rel="nofollow - Access Aplicaciones http://www.tecsys.es" rel="nofollow - Tecsys.es |
Publicado por: dokk
Fecha de publicación: 13/Enero/2022 a las 12:08
|
@Rokoko yo lo sigo usando con Gmail. Aunque los de Google parece que han cambiado algo a nivel administrativo, se puede modificar aquí: https://support.google.com/accounts/answer/6010255#zippy=%2Csi-tu-cuenta-tiene-desactivado-el-acceso-de-aplicaciones-poco-seguras" rel="nofollow - Aplicaciones poco seguras y la cuenta de Google ------------- Albert Hostein Aprendiendo cayendo |
Publicado por: rokoko
Fecha de publicación: 13/Enero/2022 a las 12:23
Lo he mirado y sale esto, pero existe la posibilidad de desactivar la verificacion en dos pasos, y me imagino que volvera a salir la opcion de aplicaciones de terceros para acticar o desactivar..... Algunos dispositivos y aplicaciones utilizan una tecnología de inicio de sesión poco segura, lo que aumenta la vulnerabilidad de tu cuenta. Te recomendamos que desactives el acceso de estas aplicaciones, aunque también puedes activarlo si quieres usarlas a pesar de los riesgos que conllevan. Desactivaremos este ajuste de forma automática si no lo utilizas. https://support.google.com/accounts?p=less-secure-apps&hl=es" rel="nofollow - Más información Esta configuración no está disponible para las cuentas que tienen habilitada la verificación en dos pasos. Dichas cuentas requieren una contraseña específica de la aplicación para acceder a las aplicaciones poco seguras. https://support.google.com/accounts/bin/answer/185833?hl=es" rel="nofollow - Más información |
dokk escribió:Publicado por: dokk
Fecha de publicación: 13/Enero/2022 a las 12:25
Vale. Debe ser que yo tengo desactivada la verificación en dos pasos y me da la siguiente opción:Aplicaciones poco seguras y la cuenta de GoogleSi una aplicación o un sitio web no cumple con nuestros https://support.google.com/accounts/answer/6010255#more-secure-apps-how" rel="nofollow - estándares de seguridad , podemos bloquear el acceso a los usuarios que intenten iniciar sesión en tu cuenta desde esa aplicación o ese sitio. Las aplicaciones poco seguras pueden facilitar el acceso de los hackers a tu cuenta, por lo que bloquear los inicios de sesión procedentes de estas aplicaciones contribuye a proteger la cuenta. Si tu cuenta tiene desactivado el acceso de aplicaciones poco seguras, puedes https://myaccount.google.com/lesssecureapps" rel="nofollow - volver a activarlo . No obstante, te recomendamos que solo permitas que accedan a tu cuenta las https://support.google.com/accounts/answer/6010255#more-secure-apps-how" rel="nofollow - aplicaciones seguras . ------------- Albert Hostein Aprendiendo cayendo |
Publicado por: rokoko
Fecha de publicación: 13/Enero/2022 a las 12:27
Correcto, he mirado en otra cuenta que tengo, y si sale porque NO tengo la verificacion en dos pasos activada
|
Publicado por: Luismical
Fecha de publicación: 08/Marzo/2023 a las 15:31
|
Buenas, tengo el mismo problema, no puedo enviar correo desde access via VBA cdo de una dirección de HOtmail El mensaje de error que aparece es: -2147220973:Error de transporte en la conexión al servidor. Alguien sabe de alguna solución para enviar desde hotmail? la solución es cambiar el correo a gmail? Muchas gracias.
|
Publicado por: Luismical
Fecha de publicación: 08/Marzo/2023 a las 16:26
|
Hola.... El problema que yo tenía es que me pedía certificado digital para enviar los correos via macro/VBA, y me daba el fallo anteriormente descrito. Acabo de solucionar el problema....(seguramente de casualidad) no tengo muy claro si ha sido porque se había corrompido el archivo, y al bajarlo de nuevo se ha solucionado. La otra opción y que me convence más es que acabo de renovar el certificado digital que permite firmar correos y ya funciona la macro.. Por favor si alguien pudiese confirmarme lo del certificado digital renovado, se lo agradecería. Un saludo y muchas gracias a todos los del foro, no he escrito casi nunca, pero si lo visto y leido muchas veces. |