Foros Néfele 4 Harbour › Foros › Dudas › Envio de email
-
AutorEntradas
-
-
25-11-2020 a las 18:05 #1563
quim
ParticipanteBuenos 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 SanzSuperadministradorYo 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
ParticipanteGracias 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
XeviParticipanteXailer y envios de eCorreos (uso GMail)
Xailer dispone de la clase TBlatMail, TCdoMail, TGmailSend y TMapi
Yo lo estoy utilizando así...
123456789101112131415161718WITH 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 )ElsexMsgDlg( "No s'ha pogut enviar el correu.", "ERROR", mbOK,, IDI_ERROR )EndIfENDUn Saludo,
Xevi.
-
-
AutorEntradas
- Debes estar registrado para responder a este debate.