Envio de email - Nefele 4 Harbour

Acceder Darse de alta He olvidado la contraseña

Este debate tiene 4 respuestas, 3 mensajes y ha sido actualizado por última vez el 4 años por quim. This post has been viewed 871 times

Mostrando 3 respuestas a los debates

Autor

Entradas

25-11-2020 a las 18:05 #1563

quim
Participante

Buenos dias

Uno de los temas recurrentes en la web, es el envío de email por parte del servidor, en este caso, por nuestro CGI Néfele

Bien sea para confirmar un registro en nuestra app, o bien para enviar un documento generado en el servidor, el envío de email al cliente sigue siendo hoy en dia muy necesario.

Por mi parte, estoy investigando algunas formas de hacerlo en harbour (CDO, hb_SendMail(), etc), seguramente y por desconocimiento, existirá alguna forma de hacerlo en Xailer

... y vosotros, cómo lo hacéis ?

Saludos
25-11-2020 a las 21:54 #1568

Alfredo Sanz
Superadministrador

Yo estoy usando un exe externo que se llama SwithMail, pero como bien dices se puede hacer de varias formas, tanto integrándolo en el cgi como utilizando un ejecutable externo.

Personalmente me inclino por esta segunda solución, ya que si se incorpora en el cgi, el envío del email lo tiene que hacer el propio cgi y eso causa que esté más tiempo cargado en memoria, y cuanto antes se libere el cgi, pues mejor
26-11-2020 a las 12:38 #1577

quim
Participante

Gracias por la respuesta.

No conocía SwithMail pero pinta muy bien. Parece una version mejorada del famoso blat.exe :))

De todas formas, supongo que depende de la lógica que se quiera aplicar al CGI, por ejemplo, si se espera un resultado del envio del correo, aunque se llame a un proceso externo para realizar ese envío, el CGI deberá de esperar a un resultado.

Aún tengo que comprender como poder hacer el envio, liberando al CGI, pero que ese mismo CGI pueda devolver una respuesta

El debate está abierto :))

27-11-2020 a las 12:30 #1578

Xevi

Participante

Xailer y envios de eCorreos (uso GMail)

Xailer dispone de la clase TBlatMail, TCdoMail, TGmailSend y TMapi

Yo lo estoy utilizando así...

   WITH OBJECT TCDOMail():New()
   :cSubject      := cSubj
   :cFrom         := cFrom
   :cUser         := cUser
   :cPassword     := cPass
   :cTO           := ::aClient[27]
   :lHTML         := lHTML
   :lGmailOptions := .T.
   :cMessage      := cMsg
   :aAttachments  := { cFile }
   :Create()

   If :Send()
      xMsgDlg( "Correu enviat a: " + :cTO, "ENVIAMENT", mbOK,, IDI_INFORMATION )
   Else
      xMsgDlg( "No s'ha pogut enviar el correu.", "ERROR", mbOK,, IDI_ERROR )
   EndIf
   END

WITH OBJECT TCDOMail():New()

:cSubject := cSubj

:cFrom := cFrom

:cUser := cUser

:cPassword := cPass

:cTO := ::aClient[27]

:lHTML := lHTML

:lGmailOptions := .T.

:cMessage := cMsg

:aAttachments := { cFile }

:Create()

If :Send()

xMsgDlg( "Correu enviat a: " + :cTO, "ENVIAMENT", mbOK,, IDI_INFORMATION )

Else

xMsgDlg( "No s'ha pogut enviar el correu.", "ERROR", mbOK,, IDI_ERROR )

EndIf

END

Un Saludo,

Xevi.

27-11-2020 a las 17:13 #1579

quim
Participante

Gracias por la respuesta Xevi, compruebo que en este tema estáis muy bien servidos en Xailer 😉

Saludos

Autor

Entradas

Mostrando 3 respuestas a los debates

Debes estar registrado para responder a este debate.