QUE USAR PARA ENVIAR UN CORREO, QUE NO SEA CDO

[Javier Bernal]

Buen día, tengo días que no puedo enviar correos generados desde mi aplicación, ya lo hice desde diferentes equipos, porque lo que pienso que pueda ser el puerto y diferente windows (7 y 10).

No se si cambio el numero de puerto de outlook.

Me pueden apoyar si hay otra manera de enviarlo, con código VFP.

Gracias se le agradece.

[Zarlu]

Buenas tardes Javier Bernal!

Ayudaría subas tu código para saber que  usas y menciones si no funciona con algún correo origen/destino en especial

zarlu

Chetumal, Quintana Roo, México

[Javier Bernal]

PARAMETERS  pdf_file

LOCAL email, cve_email,lcSmtp,LcPort

SELECT empresa

email=ALLTRIM(empresa.email)

cve_email=ALLTRIM(empresa.cve_email)

asunto = 'Entrega de Comprobante de Cita'

mensaje = 'Estimado cliente, '+ ALLTRIM(clientes.nombre)+' le hacemos llegar su Recordatorio :'+CHR(13)+CHR(10)+CHR(13)+CHR(10)+;

'Estimado Cliente, si usted tiene alguna duda, envienos su pregunta al presente correo'+CHR(13)+CHR(10)+CHR(13)+CHR(10)+;

'Un saludo cordial'

************* ASIGNA PARAMETRORS AL CORRE *****************************************************************

pini=0

IF pini = 0

pini=ATC("hotmail",empresa.email)

ENDIF

IF pini = 0

pini=ATC("gmail",empresa.email)

endif

IF pini = 0

pini=ATC("yahoo",empresa.email)

endif

IF pini = 0

pini=ATC("colorside",empresa.email)

endif

IF pini = 0

pini=ATC("live",empresa.email)

endif

**********************************************************************************

loCfg = CREATEOBJECT("CDO.Configuration")

WITH loCfg.Fields

.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.live.com"

.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25

.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2

.Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = ALLTRIM(email)

.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = ALLTRIM(cve_email)

.Update

ENDWITH

WITH loCfg.Fields

.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = .T.

.Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = .T.

.Update

ENDWITH

loMsg = CREATEOBJECT ("CDO.Message")

WITH loMsg

.Configuration = loCfg

.From = ALLTRIM(email)

.To = ALLTRIM(clientes.email)

.Subject = asunto

.TextBody =  'Estimado cliente, '+ ALLTRIM(clientes.nombre)+' le hacemos llegar su Recordatorio,'+CHR(13)+CHR(10)+CHR(13)+CHR(10)+;

'si usted tiene alguna duda, envienos su pregunta al presente correo'+CHR(13)+CHR(10)+CHR(13)+CHR(10)+;

'Un saludo cordial'

.addattachment(pdf_file)

.Send()

ENDWITH

return

[Javier Bernal]

disculpa se fue un parrafo de codigo que no corresponde

[Hèctor Javier Yost]

Javier, buenas!.  Me ha pasado ultimamente en determinados equipos con windows 10 y 7 que no me los envie dando un error de transporte en algunos casos y en otros directamente los revoca.  Tbm en el mismo dia ha pasado que los envia y luego los deja de enviar. Creo que debe ser algo del S.O. de la PC y alternativamente como maneje los puertos el ISP.  Yo uso al dia de  la fecha tando CDO como Chilkat y el dominio de Live con el puerto 25 y en el 99% de los clientes funciona normalmente.

Deberias subir la imagen del error para ver mas claro.

saludos!

--
Visita el Blog de la Comunidad Visual FoxPro en Español: http://comunidadvfp.blogspot.com
---
Has recibido este mensaje porque estás suscrito al grupo "Comunidad de Visual Foxpro en Español" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a publicesvfoxp...@googlegroups.com.
Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/publicesvfoxpro/0bdcc1e5-9e84-4c59-8eec-361a418b3d9b%40googlegroups.com.

[Javier Bernal]

adjunte la imagen del error

El martes, 7 de abril de 2020, 15:39:11 (UTC-7), Hèctor Javier Yost escribió:

Javier, buenas!.  Me ha pasado ultimamente en determinados equipos con windows 10 y 7 que no me los envie dando un error de transporte en algunos casos y en otros directamente los revoca.  Tbm en el mismo dia ha pasado que los envia y luego los deja de enviar. Creo que debe ser algo del S.O. de la PC y alternativamente como maneje los puertos el ISP.  Yo uso al dia de  la fecha tando CDO como Chilkat y el dominio de Live con el puerto 25 y en el 99% de los clientes funciona normalmente.

Deberias subir la imagen del error para ver mas claro.

saludos!

El mar., 7 de abr. de 2020 a la(s) 16:02, Javier Bernal (jbsys...@gmail.com) escribió:

Buen día, tengo días que no puedo enviar correos generados desde mi aplicación, ya lo hice desde diferentes equipos, porque lo que pienso que pueda ser el puerto y diferente windows (7 y 10).

No se si cambio el numero de puerto de outlook.

Me pueden apoyar si hay otra manera de enviarlo, con código VFP.

Gracias se le agradece.

--
Visita el Blog de la Comunidad Visual FoxPro en Español: http://comunidadvfp.blogspot.com
---
Has recibido este mensaje porque estás suscrito al grupo "Comunidad de Visual Foxpro en Español" de Grupos de Google.

Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a publice...@googlegroups.com.

[Miguel A.]

Hola, ¿Has probado cambiando el puerto por el 587?.

Saludos,

Miguel A.

[francisco prieto]

Antes usaba CDO y ahora uso PowerShell 3.0 y se me acabaron los problemas de envio.

Les adjunto la clase.

El fuente instancia lo tienen que adaptar porque es una extraccion directa de mi fuente.

Saludos,

Pancho

Cordoba

Argentina

[Zarlu]

Gracias francisco prieto por el aporte!

Lo probaré también.

[Zarlu]

Buenos días Javier Bernal!

Actualmente uso CDO sin problemas.

Tiempo atrás usé JMAIL, no sé si aún sea funcional.

He escuchado de CHILKAT (de paga)

http://www.chilkatsoft.com/

De todas maneras probare CDO con outlook para comentarte

Suerte

Zarlu

Chetumal, Quintana Roo, México

[Antonio Meza]

Hola!!! puedes probar con esta librería que compartí hace unos días

https://foxydb.wordpress.com/csfoxysmtp/

Aquí los comentarios del grupo

https://groups.google.com/forum/?hl=es#!topic/publicesvfoxpro/RPUpNdx_V2E%5B1-25%5D

saludos

Antonio Meza

[ROBERTO EDGARDO Rogers]

Hola, yo uso CDO pero con gmail sin problemas. Con hotmail tuve problemas no solo con CDO, sino con BLAT y sendemail. El gmail con solo habilitar el uso de envios de mail por parte de terceros desaparecen los problemas

Saludos

Roberto ROGERS

wapp: 2914661135

skype: robertorogers

E-mail: robert...@gmail.com

Remitente notificado con Mailtrack 08/04/20 11:14:36

Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a publicesvfoxp...@googlegroups.com.
Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/publicesvfoxpro/8c84ee3d-1b48-4444-a08a-3c395fa92343%40googlegroups.com.

[Zarlu]

Qué tal francisco prieto!

Configuré así y no funciona. Tampoco marca error

#DEFINE FIRMA.TX_SMTPSRV    "smtp.prodigy.net.mx"
#DEFINE FIRMA.TX_SMTPUSR    "not...@prodigy.net.mx"
#DEFINE FIRMA.TX_SMTPPWD    "mipassword"
#DEFINE FIRMA.NU_SMTPPT        587
#DEFINE OL_MAIL.P_SENDERNAME "not...@prodigy.net.mx"
#DEFINE OL_MAIL.P_ADDRECIPIENT "not...@prodigy.net.mx"
#DEFINE OL_MAIL.P_ADDRECIPIENTCC ""
#DEFINE OL_MAIL.P_ADDRECIPIENTBCC ""
#DEFINE OL_MAIL.P_SUBJECT) "Asunto: Prueba"
#DEFINE OL_MAIL.P_HTMLBODY ""
#DEFINE OL_MAIL.P_BODY "Saludos"

Gracias

[Zarlu]

Qué tal francisco prieto!

Sigo sin poder hacer funcionar tu aporte.

Faltan algunos archivos/código que compartas??

Alguna indicación en específico?

[francisco prieto]

Instalaste el powershell 3.0 no? porque sino no anda.

Ya no estoy con mi notebook, mañana por la mañana veo si te armo un prg completo que funcione.

Saludos,

Pancho

Cordoba

Argentina

[Esteban H]

Fijate Zarlu si te sirve este código. Nunca llegué a probarlo, xq uso Chilkat.

Lo tenía guardado p probarlo algún día, es p hacer envío utilizando PowerShell.

 

Saludos

--

Visita el Blog de la Comunidad Visual FoxPro en Español: http://comunidadvfp.blogspot.com
---
Has recibido este mensaje porque estás suscrito al grupo "Comunidad de Visual Foxpro en Español" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a publicesvfoxp...@googlegroups.com.

Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/publicesvfoxpro/eed3606b-b2b9-4a79-827c-7f797f4d17dd%40googlegroups.com.

[HernanCano]

Hola, Esteban.

Tu propuesta de PSDEMO.PRG es similar a la de Francisco en que se basan en PowerShell.

Pero tu único .PRG tiene todo lo que necesita para ejecutar, mientras que la de Francisco --además de depender de un set procedure to psclass.prg, y de tener abiertos dos .DBFs (no incluidos) como FIRMA y OL_MAIL (que --quizás-- podrían subsanarse con los DEFINE que propone Zarlu)-- parece depender también de un INCLUDE "G:\SHARED\INCLUDE\SYSWIN.H" que no está incluido.

Además Francisco dice que se debe instalar PowerShell (me parecía que PowerShell era un CMD mejorado, y que estaba incluido en Windows; nunca he mirado algo de él).

Te cuento, Esteban, que tu PSDEMO.PRG funciona como debe y --luego de ajustar los parámetros para enviar desde mi cuenta-- el receptor la recibe adecuadamente (no he instalado PowerShell; lo único que hice fue ejecutar PSDEMO....desde VFP9-SP2... y funcionó bien).

[francisco prieto]

A mi me funciona perfectamente y no depende del syswin.h ni de firma, solo es una extraccion de mi fuente para que vean como se usa la clase que si debe ser referenciada con set procedure to...

En fin era solo a los fines de responder que si se podia con algo que no sea CDO.

Se basa en la documentacion de Microsoft

https://docs.microsoft.com/en-us/powershell/module/microsoft.powershell.utility/send-mailmessage?view=powershell-7

https://social.technet.microsoft.com/Forums/es-ES/e6899c27-0982-4c32-a1e6-f1b79f9698a9/enviar-correo-desde-servidor-domino-utilizando-powershell?forum=scriptgenerales

Y me salvo las papas cuando quise usar CDO en un Windows Server 2008 R2.

Lamentablemente no cuento con tiempo suficiente para armar un ejemplo, pero creo que con esas referencias pueden salir adelante.

Saludos,

Pancho

Cordoba

Argentina

[Esteban H]

Gracias Hernan x Probarlo…

 

Saludos

Esteban

[Esteban H]

Pancho….

 

Q bueno es volver a verte en el grupo, aunque sea con un problema jeje.

 

Saludos

Esteban

[Zarlu]

Buenos días Colegas!

Gracias francisco prieto!

Espero si puedas armar el prg completo y apoyarme con esas dos "variables" que marcan error y que en mensaje anterior señalé

Gracias Esteban H.!

Ya corrí tu prg

Les comento (..el fantasma de los sistemas...)

No me funcionó ninguna de las dos propuestas.

Probé con varios correos y servidores de salida.

Probé con VFP9  SP2 W7, W10

Si tengo instalado el PowerShell

(Leí que a partir de la versión W 7 ya viene instalado)

Con CDO y con la propuesta de Antonio Meza funciona bien.

HernanCano será que puedas subir el script que se generá con el prg de Esteban para comparar (activar la línea Modify File (lcTempScript))

Éste es el mío:

$secpasswd = ConvertTo-SecureString "xxxxx" -AsPlainText -Force
$mycreds = New-Object System.Management.Automation.PSCredential ("not...@prodigy.net.mx", $secpasswd)
send-mailmessage -from "Me <not...@prodigy.net.mx>" -to "Peter <not...@prodigy.net.mx>" -subject "Test email from PowerShell at 04/09/20 09:26:08 AM" -body "<html><body>This is a <b>test</b> message.</body></html>" -smtpserver smtp.prodigy.net.mx -port 587 -priority High -DeliveryNotificationOption OnFailure -bodyashtml -credential $mycreds

Muchas Gracias

[HernanCano]

Zarlu:

Sólo ajusté las sgtes líneas al ejemplo propuesto:

 **-- New server definition.
 loPsServer    = CreateObject("clsPsSmtpServer")
 loPsServer.cServer = "smtp.gmail.com"         &&"your.smtpserver.com"
 loPsServer.cUser = "miusuario[ARROBA]gmail.com"  &&"your.email-yourdomain.com"
 loPsServer.cPass = InputBox("yourpassword") &&"yourpassword"
 loPsServer.lNeedCreds = .t.
 loPsServer.nPort = 465 &&465 (25 587)&&587
 loPsServer.lUseSSL = .t.&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&.f.

 **-- Add a message to the server definition. The cDNO setting indicates
 **-- that a delivery notification will only be sent back on failure.
 loMessage.cFrom = loPsServer.cUser&&"Me <your.email-yourdomain.com>"  && sólo para probar
 loMessage.cPriority = "High" && Or Normal or Low
 loMessage.cDNO = "OnFailure" && Or None,OnSuccess,Delay,None
 
 **-- Add recipients (normal, CC and BCC)
 *!* loMessage.colRecipients.Add(CreateObject("clsRecipient", "Peter", "peter-test.com"))   && sólo para probar
 *!* loMessage.colCC        .Add(CreateObject("clsRecipient", "Paul" , "paul-test.com" ))   && sólo para probar
 *!* loMessage.colBCC       .Add(CreateObject("clsRecipient", "Mary" , "mary-test.com" ))   && sólo para probar
 
 loMessage.colRecipients.Add(CreateObject("clsRecipient", loPsServer.cUser, loPsServer.cUser))  && sólo para probar

 **-- Add attachments.
 *!* loMessage.colAttach.Add("c:\temp\out.txt")     && sólo para probar
 *!* loMessage.colAttach.Add("c:\temp\audit.txt")   && sólo para probar
 

El jueves, 9 de abril de 2020, 9:31:10 (UTC-5), Zarlu escribió:

Buenos días Colegas!

[Zarlu]

Gracias HernanCano!

Pos no jala!

Incluso usando correo de gmail como tu ejemplo.

Quiero ver tu script para compararlo. El script que se genera para powerShell

Lo puede ver activando " Modify File (lcTempScript)" en el prg de Esteban

[Antonio Meza]

No probaste la librería que publique, ve un ejemplo.

oSmtp = CreateObject(“CsFoxySmtp“)

• oSmtp.server = “smtp.office365.com“
  oSmtp.port = 587
  oSmtp.ssl = .T.
  oSmtp.user = “mius...@outlook.com“
  oSmtp.password = “micontraseña123“

• Configuramos los datos para el correo, la priority por default es normal, para el ejemplo la cambio a Alta.
  
  oSmtp.from = “mius...@outlook.com“
  oSmtp.subjet = “Asunto del Correo“
  oSmtp.body = “Cuerpo del mensaje de Correo“
  oSmtp.priority = 2

• Agregamos las direcciones de correo, es decir los Destinatarios.
  
  oSmtp.AddTo(“corr...@dominio.com”)
  oSmtp.AddTo(“corr...@dominio.com”)
  oSmtp.AddTo(“corre...@dominio.com”)

• Agregamos las direcciones de los Destinatarios que irán en Copia
  
  oSmtp.AddCc(“correoC...@dominio.com”)
  oSmtp.AddCc(“correoC...@dominio.com”)

• Agregamos las direcciones de los Destinatarios que irán en Copia Oculta
  
  oSmtp.AddBcc(“correoO...@dominio.com”)
  oSmtp.AddBcc(“correoO...@dominio.com”)

• Agregamos los archivos Adjuntos al correo
  
  oSmtp.AddAttachments(“c:\carpeta\archivoUno.pdf”)
  oSmtp.AddAttachments(“d:\foto\imagen.jpg”)
  oSmtp.AddAttachments(“c:\doc\listado.xls”)

• Finalmente enviamos el correo y validamos si se envió correctamente
  
  IF oSmtp.Smtp() = .t.
       wait windows “Correo Enviado”
  ELSE
       MessageBox(oSmtp.Error, 0+48, “Error”)
  ENDIF

saludos

Antonio Meza

[Zarlu]

Qué tal Antonio Meza, buenos días!

"...Con CDO y con la propuesta de Antonio Meza funciona bien."

La probé desde que la lanzaste por primera vez. Gracias

Estoy probando y documentando otras opciones.

Saber, en su caso, lo que hay que ajustar en los equipos para que jalen.

[HernanCano]

Zarlu:

No vuelvas a hacer ésto.

Las contraseñas no se pueden compartir. Lo que pides está en un archivo temporal que genera el PowerShell ése. Y la contraseña no está encriptada ahí.

Es una indelicadeza de tu parte pedir éso. Con los datos que te pasé (editando el .PRG), se puede obtener el script que mencionas.

Te paso un text (de acuerdo a lo que pides) editado para ocultar información sensible. Recuerda que debemos respetar las contraseñas personales/propias de nuestros colegas.

$secpasswd = ConvertTo-SecureString "thepassword"
  -AsPlainText -Force
$mycreds = New-Object System.Management.Automation.PSCredential ("theemail[ARROBA]gmail.com", $secpasswd)
send-mailmessage
  -from "thesender[ARROBA]gmail.com"

  -to   "theemail[ARROBA]gmail.com <theemail[ARROBA]gmail.com>"

  -subject "Test email from PowerShell at 04/09/20 01:17:36 PM"

  -body "<html><body>This is a <b>test</b> message.</body></html>"

  -smtpserver smtp.gmail.com
  -UseSSL
  -port 465

  -priority High
  -DeliveryNotificationOption OnFailure
  -bodyashtml
  -credential $mycreds

El jueves, 9 de abril de 2020, 10:20:21 (UTC-5), Zarlu escribió:

[Zarlu]

Buenas tardes HernanCano!

Si te fijas con atención yo compartí el text del script que se generó para PowerShell teniendo el cuidado de censurar la contraseña.

"....HernanCano será que puedas subir el script que se generá con el prg de Esteban para comparar (activar la línea Modify File (lcTempScript))

Éste es el mío:

$secpasswd = ConvertTo-SecureString "xxxxx" -AsPlainText -Force..."

Mi intención era comparar las cadenas para detectar un posible error de mi parte al generarla

Como todos los ejemplos que se comparten los datos privados  se "ocultan".

Un disculpa. Presumí que, al pedírtelo a ti específicamente, tendrías el conocimiento y el cuidado  de ocultar esa información confidencial sin mayor aspaviento.

Se agradece

[Zarlu]

Buenas tardes Foxeros!

Les adjunto el aporte de Esteban H. para enviar correos con PowerShell con una pequeña mejora y unos comentarios.

-Mis pruebas con VFP 9 Windows7 (Por eso tuve que actualizar algunas cosas)

-Se requiere PowerShell 3 mínimo (A su vez requiere Windows Management Framework (WMF) 4.5 )

-Las pc de Windows 10 ya deben traer una versión mayor de PowerShell

-Modifiqué un poco el código para atrapar el resultado de PowerShell y mostrar un mensaje de error/éxito

-Errores detectados (que pude probar)...servidor smtp, usuario/password, requerimiento de autentificación ssl, archivos adjuntos, estructura de correo destino.

Agradezco a Estaban H, el aporte inicial que es la base.

El modelo de francisco prieto es más estructurado, pero hubo por allá un par de variables que no pude solventar. También le agradezco.

Bueno..a mensaje de inicial de Javier Bernal se tiene PowerShell como otra opción para envío de correos.

[Fabian Toro]

Buenas  Tardes

tambien pueden usar

https://www.tbare.com/software/swithmail/

SwithMail 2.2.4.0

--Send SSL SMTP email silently from command line (CLI), or a batch file using Exchange, Gmail, Hotmail, Yahoo!

Plus, or a custom server - for FREE

--
Visita el Blog de la Comunidad Visual FoxPro en Español: http://comunidadvfp.blogspot.com
---
Has recibido este mensaje porque estás suscrito al grupo "Comunidad de Visual Foxpro en Español" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a publicesvfoxp...@googlegroups.com.

Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/publicesvfoxpro/0610738f-a559-4d20-9221-25ed74138fd7%40googlegroups.com.

[ArturoPC]

Javier.

La mejor opción es Chilkat. Dale un vistazo: https://example-code.com/foxpro/default.asp

Yo personalmente, lo uso para envíos de correo y no he tenido problemas ni con Office 365 ni con la nueva seguridad de Gmail ni con ningún hosting.

Saludos.

Arturo PC.

[Fabian Toro]

Buenas  Dias

tambien pueden usar

https://www.tbare.com/software/swithmail/

SwithMail 2.2.4.0

--Send SSL SMTP email silently from command line (CLI), or a batch file using Exchange, Gmail, Hotmail, Yahoo!

Plus, or a custom server - for FREE

--

Visita el Blog de la Comunidad Visual FoxPro en Español: http://comunidadvfp.blogspot.com
---
Has recibido este mensaje porque estás suscrito al grupo "Comunidad de Visual Foxpro en Español" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a publicesvfoxp...@googlegroups.com.

Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/publicesvfoxpro/0d6060c9-0c41-4e55-b43b-018895df3a0e%40googlegroups.com.

[Javier Bernal]

Arturo, estoy revisando el enlace, hace algunos años use chilkat para la facturación, pero no recuerdo, o no se como se arma un mensaje de correo, con esta aplicación.

[HernanCano]

Si conservaste el serial, seguro podrás usarlo de acuerdo a los ejemplo que hay en la misma página, o a aportes que se han hecho o se harán aquí.

Porque si no tienes el serial, no vas a poder usdarlo.

[Javier Bernal]

Gracias Hernan por el dato, lo voy a revisar,

[Zarlu]

Buenos días Fabian Toro!

Probé SwithMail

Envío de correos a prodigy,gmail,outlook,hotmail sin problemas

Gracias por el aporte

[Fabian Toro]

Buenos Dias

como decimos aca:

Buenos, Bonito y Gratis

FabianToro

--
Visita el Blog de la Comunidad Visual FoxPro en Español: http://comunidadvfp.blogspot.com
---
Has recibido este mensaje porque estás suscrito al grupo "Comunidad de Visual Foxpro en Español" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a publicesvfoxp...@googlegroups.com.

Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/publicesvfoxpro/024bd876-b7e6-4cf6-859a-c2d4557356f7%40googlegroups.com.

[HernanCano]

Sí, Fabián.

Swithmail probado desde la línea de comandos con Gmail: funciona adecuadamente.

Gracias, Fabián, por compartir.