hb_sendmail con gmail
Posted: Sun Sep 27, 2020 3:39 pm
Saludos mis amigos, esperando se encuentren todos bien de salud.
Para enviar correos siempre he utilizado hb_sendmail y uso una cuenta corporativa de la empresa en la que trabajo y funciona sin ningún problema:
Se me ha presentado ahora la necesidad de enviar correos usando una cuenta de Gmail, ¿ es posible hacerlo con hb_sendmail ? Si la respuesta es positiva agradeceré me apoyen con los parametros adecuados (y sobre todo recientes) para hacerlo. He consultado algunos foros y la información es algo antigua, por eso apelo a su experiencia reciente.
Deseando se mantengan en salud todos, reciban un cordial abrazo.
Para enviar correos siempre he utilizado hb_sendmail y uso una cuenta corporativa de la empresa en la que trabajo y funciona sin ningún problema:
Code: Select all
FUNC CorreoEnviar( cSubject , cBody , aTo )
LOCAL cPopServer := "mail.farmacom.com.pe"
LOCAL cSMTPServer := "mail.farmacom.com.pe"
LOCAL cSMTPPassWord := "???????????"
LOCAL cFrom := "??????????@farmacom.com.pe"
LOCAL cUser := "??????????@farmacom.com.pe"
lRespuesta := hb_SendMail( ;
cSMTPServer,; // Servidor
25 ,; // Puerto
cFrom,; // From
aTo,; // To
NIL ,; /* CC */
NIL ,; /* BCC */
cBody ,; // Body
cSubject ,; // Subject
Nil ,; // aFiles attached
cFrom ,; // User (obligatorio)
cSMTPPassword,; // Pass (obligatorio)
cPopServer,; // POP Server (obligatorio)
3 ,; /* nPriority */
.F. ,; /* lRead */
.F. ,; /* lTrace */
.T. ,; /* lPopAuth */
.F. ,; /* lNoAuth */
NIL ,; /* nTimeOut */
NIL ,; /* cReplyTo */
.F. ,; /* lTLS */
cSMTPPassWord )
RETURN
Deseando se mantengan en salud todos, reciban un cordial abrazo.
