RE: [vfp] Re: Utilidad para "generar" imágenes QR de Comprobantes Electrónicos AFIP (Argentina)

569 views
Skip to first unread message

Roxana Demattei

unread,
Apr 14, 2021, 9:12:27 AM4/14/21
to publice...@googlegroups.com

Hola! Puede ser por el tipo de archivo que acepta tu PDF. Yo tuve problemas porque mi generador de pdf aceptaba BMP y estos son JPG. Tambien puede ser la resolución del archivo que adjuntas. Pero siempre relacionado con el generador de PDF que usese. Cual usas?

 

Otra pregunta: Esto igual en la afip aun no funciona verdad. He leído el QR de facturas generadas en línea y sigue direccionando a la pagina de especificaciones…

 

 

Saludos,

 

 

De: publice...@googlegroups.com [mailto:publice...@googlegroups.com] En nombre de Marcos Villarreal
Enviado el: miércoles, 14 de abril de 2021 10:04
Para: Comunidad de Visual Foxpro en Español
Asunto: Re: [vfp] Re: Utilidad para "generar" imagenes QR de Comprobantes Electronicos AFIP (Argentina)

 

Hola Grupo.

Estoy teniendo un problema que no comprendo.

Estoy generando el QR con el codigo Luis Maria, todo perfecto en la impresion.

Pero al generar un PDF, me queda el recuadro del QR en naranja

 

A alguien le sucedio algo similar?

El miércoles, 14 de abril de 2021 a las 9:23:54 UTC-3, shr...@gmail.com escribió:

Yo utilicé la llamada a Windows

 

oCod = CREATEOBJECT("base64Helper")

 

Resultado_decodificado = oCod.decodeString( Valor_codificado )

 

Resultado_codificado = oCod.encodeString( Valor_decodificado )

 

El jueves, 18 de marzo de 2021 a las 20:06:25 UTC-3, danie...@gmail.com escribió:

Gracias por responder: Este codigo lo debo reemplazar por la linea: lcString64 = STRCONV(lcString, 13)??

 

Gracias

El jueves, 18 de marzo de 2021 a las 15:26:04 UTC-3, gat...@gmail.com escribió:

Ahí tenes el ejemplo de como convertir a base64 cualquier dato

 

El jue., 18 de marzo de 2021 14:20, Daniel Flores <danie...@gmail.com> escribió:

Que es chilkat??? Me podes orientar un poco mas...

 

Gracias

El jueves, 18 de marzo de 2021 a las 14:09:51 UTC-3, gat...@gmail.com escribió:

Yo use chilkat   .. 

 

El lun., 8 de marzo de 2021 18:17, MármolSoft <marmo...@gmail.com> escribió:

Buenas tardes.

Estoy trabajando con VFP6 -ya sé que el primer consejo que voy a recibir es cambiar a VFP9- pero además de esa solución, ¿cómo puedo reemplazar la función STRCONV con el parámetro 13 (en VFP solo admite hasta 8)

Muchas gracias!

Saludos a todos

El sábado, 6 de marzo de 2021 a la(s) 20:21:08 UTC-3, luism...@gmail.com escribió:

Hola, al sitio que te envia de la AFIP aun no está operativo, pero si ya te envía a ese sitio, es que está bien generado el QR, para que compruebes la parte codificada del QR te copio un mensaje que pasé hace unos días:

Al texto del código QR escaneado, le debes quitar la URL de Afip y decodificar de base64 y te queda una cadena Json con los datos de la factura electrónica.

 

Ej:

 

*-- Texto leido de un QR de AFIP

TEXT TO lcQR NOSHOW PRETEXT 15

  AiLCJ0aXBvRG9jUmVjIjoiODAiLCJwdG9WdGEiOiIzIiwiaW1wb3J0ZSI6IjI1OTMyN

  C4yNyIsInRpcG9DbXAiOiIxIiwiZmVjaGEiOiIyMDIxLTAyLTI0IiwiY29kQXV0Ijoi

  IiwiY3VpdCI6IjMwNzA3OTI3OTQ4IiwidGlwb0NvZEF1dCI6IkUiLCJucm9DbXAiOiI

  xOTIxIiwibnJvRG9jUmVjIjoiMjAxNzg1OTEzMTMiLCJtb25lZGEiOiJQRVMifQ==

ENDTEXT

 

*-- 33 caracteres, tomo a partir del 34

lcJson64 = SUBSTR(lcQR, 34)

 

lcJson = STRCONV(lcJson64, 14)

 

? lcJson

 

Luis María Guayán
Tucumán, Argentina
_______________________________
Comunidad Visual FoxPro en Español
http://comunidadvfp.blogspot.com

El 06/03/2021 a las 13:27:54, Estela escribió:

Antes que nada muchísimas gracias por sus aportes!!
 
Yo uso FullQRCodeImage. Tengo problemas al leer el QR, me envía a la web de la Afip, es que ésta aún no funciona? O tengo mal el string de generación? El CAE es ficticio, será eso?
 
{"ver":1,"fecha":"2021-03-06","cuit":30708101229,"ptoVta":10,"tipoCmp":1,"nroCmp":2,"importe":121.00,"moneda":"PES","ctz":1,"tipoDocRec":80,"nroDocRec":33504047089,"tipoCodAut":"E","codAut":70529531894380}
 
Por qué está fijo en el código fuente que sea BMP? Será por baja resolución? m.lnType = 0 &&BMP,0,JPG,1,PNG,2 Por qué está fijo BMP?  Cuál es el inconveniente si adapto el código fuente a que lo genere como PNG?
 
Además tengo algunos clientes que tengo que hacerlo de 132x132 y sólo lo lee si hago zoom al pdf o en el bmp. 
m.lnSize = IIF(Thisform.largocuerpo<=10,4,10). Algunas veces con 10 lo lee bien pero de 198x198 o 200x200
 
 
 
Les agradecería sus comentarios 
Estela
 
El lunes, 22 de febrero de 2021, 20:36:28 (UTC-3), Roxana escribió:
Estimados,
 
Estoy usando FoxBarcodeQR generando el QR con esta configuración:
 m.lcQRImage = loFbc.FullQRCodeImage(lcQR, cArchijpg , 170)
 
Y me imprime bien en el reporte en 4 c 4 cm. Por pantalla el teléfono lo lee perfecto pero no lo lee cuando lo imprimo. Noto que sale como muy cargada la impresión a pesar de que esta en modo borrador. Esta mal la resolución de generación del QR es si lo lee en la pantalla es un problema en la impresión.
 
Usando:
m.lcQRImage = loFbc.FullQRCodeImage(lcQR, cArchijpg , 200)
 
que es lo sugerido por ustedes me pasa lo mismo, salgo que tengo que poner la imagen en el reporte en 5,5 x 5,5 para que se leea por pantalla y en la impresión tampoco la lee. La verdad lo necesito mas chico porque no tengo tanto espacio en el reporte.
 
Algun sugerencia?
 
Muchas gracias!
 
Saludos,
 
 
 Roxana
 
 
 
De: publice...@googlegroups.com [mailto:publice...@googlegroups.com] En nombre de Sergio Castellari [Gmail]
Enviado el: jueves, 18 de febrero de 2021 11:30
Para: publice...@googlegroups.com
Asunto: RE: [vfp] Re: Utilidad para "generar" imagenes QR de Comprobantes Electronicos AFIP (Argentina)
 
Hola Roxana,
 
El tamaño y resolución es muy buena a propósito, para que vos pueda definir su tamaño al momento de imprimirlo o generar el comprobante en PDF para enviarlo.
Yo utilizo en mis impresiones 35x35mm en comprobantes A4 (normalmente impresoras laser) y en comanderas tipo Epson TM20ii, lo incremento a 50x50mm ya que la impresión térmica es de menor calidad.
 
Pero te cuento que en pruebas que hice (con una APP lectora genérica de Celular) , en tamaños de 18x18mm los leía !!!!
Incluso hice pruebas directas de lectura desde la propia pantalla del monitor, y también lo hacía perfectamente.
En fin, creo que el principal obstáculo es la calidad del grafico.
 
Saludos,
Sergio Castellari
 
 
 
 
 
 
 
 
De: publice...@googlegroups.com [mailto:publice...@googlegroups.com] En nombre de Roxana
Enviado el: jueves, 18 de febrero de 2021 11:00 a.m.
Para: Comunidad de Visual Foxpro en Español
Asunto: Re: [vfp] Re: Utilidad para "generar" imagenes QR de Comprobantes Electronicos AFIP (Argentina)
 
Hola Sergio,
 
 
 
Baje el QRfacil.exe. Hice unas pruebas y funciona muy bien.
 
Te queria hacer una pregunta:
 
El tamaño que genera la imagen se puede modificar? Vos lo probaste ya en una factura de AFIP? No queda muy grande?
 
Gracias!
 
 
 
Saludos,
 
 
 
Roxana
 
 
 
 
El miércoles, 17 de febrero de 2021 a las 19:34:18 UTC-3, PabloZa escribió:
 
Hector, yo lo implementé en una comandera y el tamaño que utilicé es 3,5 x 3,5 cm. Mas chico no lo leía. seguramente x la calidad de impresión de la comandera.
 
Una cosa que tuve que hacer es colocar, en el informe, la imagen con Height =3.50 y Width=4.00 porque sino me imprimía en forma rectangular.
 
 
 
El jueves, 11 de febrero de 2021 a la(s) 14:54:50 UTC-3, Hector Kuhn escribió:
 
Buenas tardes, alguien a enviado el codigo QR a una comandera termica y luego  ha intentado leer dicho QR , para ver si lo lee, y en caso de ser leeido cual seria el tamaño a imprimir.
 
 
 
He estado probando una comandera Epson Tm-t20ii y no logro que el lector del celular lo pueda leer. El mismo codigo impreso por Hp laser lo puede leer
 
 
 
El maximo de impresion que he usado hasta ahora es de 35x35  milimetros
 
 
 
Yo genero el codigo  QR de la siguiente manera
 
 
 
IF VARTYPE(loFbc)="O" 
   RELEASE loFbc
ENDIF 
IF VARTYPE(loFbc)#"O" 
 
 
loFbc = CREATEOBJECT("FoxBarcodeQR")
 
 
ENDIF
 
lcQRImage = loFbc.FullQRCodeImage(lcQR,lcArchivo , 200)
 
* Convierto bmp a png para libreria python sistemasagiles
 
 
LOCAL lcSource, lcDestination
lcSource      = lcQRImage
lcDestination = STRTRAN(UPPER(lcSource),".BMP",".PNG")
 
IF VARTYPE(loImage)="O" 
   RELEASE loImage
ENDIF 
IF VARTYPE(loImage)#"O" 
loImage = NEWOBJECT("GpImage", "_gdiplus.vcx")
ENDIF
 
loImage.CreateFromFile(lcSource)
loImage.SaveToFile(lcDestination,"image/png")
 
 
 
 
 
El mié, 10 feb 2021 a las 8:28, norberto.ma...@gmail.com (<norberto.ma...@gmail.com>) escribió:
 
Gracias Luis Maria, por tu respuesta. Lo suponia, pero no esta demás consultarlo. Tambien quería aprovechar, para agradecerte tu aporte de la función del armado del Código QR, que esta impecable. Muchas Gracias, por tu aporte.
 
 
 
Norberto Alvarez
 
 
El miércoles, 10 de febrero de 2021 a la(s) 08:19:32 UTC-3, luism...@gmail.com escribió:
 
Los comprobantes pre-impresos continuan iguales. La resolución de la AFIP es solo para los comprobantes electrónicos.
 
 
 
Luis María Guayán
Tucumán, Argentina
_______________________________
 
 
Comunidad Visual FoxPro en Español
http://comunidadvfp.blogspot.com
 
 
El 09/02/2021 a las 16:59:40, norberto.ma...@gmail.com escribió:
 
Hola Grupo, esta es una pregunta de duda de mi parte, con respectos a los Remitos (pre-impresos), hay que rehacerlos con codigo QR o siguen en vigencia los que tienen codigo de Barras. Gracias por vuestra atención. 
 
 
 
Norberto Alvarezx
 
 
El jueves, 4 de febrero de 2021 a la(s) 08:59:50 UTC-3, norberto.ma...@gmail.com escribió:
Hola Luis y Sergio, gracias por la info, creia que no funcionaba. Gracias 
 
 
 
Norberto Alvarez
 
 
El miércoles, 3 de febrero de 2021 a la(s) 11:16:02 UTC-3, serc...@gmail.com escribió:
 
 
Hola Norberto,
 
Lamentablemente, AFIP dicto la disposición sobre la implementación del QR, pero hasta ahora NO tiene una URL activa para “verificar” los datos enviados por el link QR. 
Por lo tanto, independientemente del método para “lograrlo”, todas te envían a la página de especificaciones sin más.  O sea, que por el momento confiamos que hemos realizados todos los pasos correctamente, pero SIN SABER realmente si todo esta OK.
En mi caso, el motivo de compartir libremente QRFacil.exe fue para intentar facilitar su obtención y una forma de agradecer toda la ayuda que me brindan.
 
Saludos,
Sergio Castellari
 
 
 
 
 
 
 
 
 
 
 
 
De: publice...@googlegroups.com [mailto:publice...@googlegroups.com] En nombre de norberto.ma...@gmail.com
Enviado el: miércoles, 03 de febrero de 2021 09:56 a.m.
Para: Comunidad de Visual Foxpro en Español
Asunto: [vfp] Re: Utilidad para "generar" imagenes QR de Comprobantes Electronicos AFIP (Argentina)
 
Hola Grupo, pregunta, use el codigo de Luis Maria, el cual me parece fantástico y logre hacer el QR, lo comencé a implementar con mis facturas, pero cada vez que lo leo, me manda a la pagina de la AFIP, a la parte de especificaciones del codigo QR. Mi pregunta es esto desde la AFIP ya esta implementado, porque me deberia mostrar información de la factura que he emitido, o algo estoy haciendo mal. Desde ya muchas gracias por vuestra atención.
 
 
 
Norberto Alvarez
 
Buenos Aires, Argentina
 
 
El martes, 2 de febrero de 2021 a la(s) 21:00:32 UTC-3, serc...@gmail.com escribió:
 
 
Hola Gente,
 
He creado una pequeña utilidad (QRFacil.exe) que facilita la creación de la imagen QR de los comprobantes electrónicos de AFIP. 
Solo tienen que enviar una cadena (string) con los campos de datos solicitados por AFIP.
QRFacil.exe, arma el Json, codifica en Base64 y genera una imagen QR en formato JPG y el link QR en un archivo TXT.
 
Pueden descargarla de este link https://mega.nz/file/UIFh3Yjb#uqQXq6SqM4rY-lxyBxUGQP6X4V_9PTejb0CIU7tEWMY
 
Es libre y gratuita.
La idea es ayudar a colegas a obtener las imágenes QR lo más fácil posible.
Contiene una pequeña ayuda de uso.
 
Cualquier sugerencia o error encontrado, con gusto lo corregiré.
 
Saludos,
Sergio Castellari
 
 
 
 
 
 
 
-- 
 
 
Visita el Blog de la Comunidad Visual FoxPro en Español: http://comunidadvfp.blogspot.com
--- 
Has recibido este mensaje porque estás suscrito a un tema del grupo "Comunidad de Visual Foxpro en Español" de Grupos de Google.
Para cancelar la suscripción a este tema, visita https://groups.google.com/d/topic/publicesvfoxpro/bv2j6tm0bVg/unsubscribe.
Para cancelar la suscripción a este grupo y a todos sus temas, 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/aacaefa4-2c42-4cec-8a53-a8650d0a9ae0n%40googlegroups.com.
-- 
Visita el Blog de la Comunidad Visual FoxPro en Español: http://comunidadvfp.blogspot.com
--- 
Has recibido este mensaje porque estás suscrito a un tema del grupo "Comunidad de Visual Foxpro en Español" de Grupos de Google.
Para cancelar la suscripción a este tema, visita https://groups.google.com/d/topic/publicesvfoxpro/bv2j6tm0bVg/unsubscribe.
Para cancelar la suscripción a este grupo y a todos sus temas, 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/9a2e2b6b-a7a2-42d9-bf0b-ec338f932c80n%40googlegroups.com.
-- 
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/b66c3036-8503-4fdb-b0c2-6e3f2515594an%40googlegroups.com.
-- 
Visita el Blog de la Comunidad Visual FoxPro en Español: http://comunidadvfp.blogspot.com
--- 
Has recibido este mensaje porque estás suscrito a un tema del grupo "Comunidad de Visual Foxpro en Español" de Grupos de Google.
Para cancelar la suscripción a este tema, visita https://groups.google.com/d/topic/publicesvfoxpro/bv2j6tm0bVg/unsubscribe.
Para cancelar la suscripción a este grupo y a todos sus temas, envía un correo electrónico a publice...@googlegroups.com.
Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/publicesvfoxpro/82f000ab-d120-4b33-9cbb-6a62c6e5fd6fn%40googlegroups.com.
-- 
Visita el Blog de la Comunidad Visual FoxPro en Español: http://comunidadvfp.blogspot.com
--- 
Has recibido este mensaje porque estás suscrito a un tema del grupo "Comunidad de Visual Foxpro en Español" de Grupos de Google.
Para cancelar la suscripción a este tema, visita https://groups.google.com/d/topic/publicesvfoxpro/bv2j6tm0bVg/unsubscribe.
Para cancelar la suscripción a este grupo y a todos sus temas, envía un correo electrónico a publice...@googlegroups.com.
Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/publicesvfoxpro/006f01d70602%24800436a0%24800ca3e0%24%40com.
 

--
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.

--
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.

--
Visita el Blog de la Comunidad Visual FoxPro en Español: http://comunidadvfp.blogspot.com
---
Has recibido este mensaje porque estás suscrito a un tema del grupo "Comunidad de Visual Foxpro en Español" de Grupos de Google.
Para cancelar la suscripción a este tema, visita https://groups.google.com/d/topic/publicesvfoxpro/bv2j6tm0bVg/unsubscribe.
Para cancelar la suscripción a este grupo y a todos sus temas, 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/a108ee34-b9b7-4006-beaa-c35dc33905c8n%40googlegroups.com.

Sergio Bagnasco

unread,
Apr 15, 2021, 4:37:16 PM4/15/21
to Comunidad de Visual Foxpro en Español
Buenas Tardes Grupo, necesito una ayuda especial, el problema es el siguiente, genero un QR con:
DECLARE LONG URLDownloadToFile IN URLMON.DLL ;
LONG, STRING, STRING, LONG, LONG

=URLDownloadToFile(0, m.lcUrl, m.tcFile, 0, 0)
return m.tcFile

Este código funciona bien
EL PROBLEMA ES QUE CUANDO EJECUTO LA APLICACIÓN EN EL ENTORNO DEL SISTEMA FACTURACIÓN, NO ME GUARDA/DESCARGA LA IMAGEN, EN CAMBIO CUANDO EL PRG LO CORRO DESDE EL ENTORNO DEL VFP (VENTANA DEL SISTEMA) LO GUARDA PERFECTAMENTE.-
PODRÁ SER UN PROBLEMA DE PARÁMETROS, O DE CONFIGURACIÓN?
LES VOY A AGRADECER SI ME PUEDEN AYUDAR.
MUCHAS GRACIAS

Sergio Rojas

unread,
Apr 16, 2021, 3:08:23 AM4/16/21
to Comunidad de Visual Foxpro en Español
Yo utilizo la librería FoxBarcodeQR:

PUBLIC cod_qr, img_qr
THIS.ADDPROPERTY("oFbc", NULL)
THIS.oFbc = CREATEOBJECT("FoxBarcodeQR")
cod_qr = "codigo_QR_a_generar"
img_qr = THISFORM.oFbc.FullQRCodeImage(cod_qr, , 330, 0)

Te queda el la imagen en "img_qr" con formato jpg
Suerte!!

Luis Maria Guayan

unread,
Apr 16, 2021, 7:30:16 AM4/16/21
to Comunidad de Visual Foxpro en Español
Hola, el código que muestras no genera ningún código QR, ese código descarga un archivo de internet. También deberías verificar el valor retornado por la función URLDownloadToFile() que de tener éxito retorna 0 (cero)

Deberías mostrar el valor de las variables m.lcUrl y m.tcFile. Parecería un problema de permisos para guardar la imagen en la carpeta de la ruta m.tcFile

Luis María Guayán
Tucumán, Argentina
_______________________________
Comunidad Visual FoxPro en Español
http://comunidadvfp.blogspot.com

Sergio Bagnasco

unread,
Apr 16, 2021, 8:40:27 AM4/16/21
to Comunidad de Visual Foxpro en Español

Buen Día Sr. Luis María, Enorme agradecimiento que me has respondido,  te pregunto ya que si ejecuto desde la ventana del Fox me genera el QR.png y lo guarda en la carpeta que estoy utilizando, en cambio cuando la misma aplicación es llamada desde el sistema de facturación para la impresión del comprobante en el campo que debería mostrar el QR me muestra el "lobito" y eso sucede porque no guarda el .png, te agradeceré si me podés guiar a que puede ser yo utilicé el siguiente código que en lcstringQR tengo todos los datos según la Afip:
cuando me genera el QR y lo escaneo con mi celu, dá correcto enviando a la página de afip que todavía no verifica los datos.
Muchas Gracias!!!
Sergio 


lcString64 = STRCONV(lcStringQR,13)
lcQR = [https://www.afip.gob.ar/fe/qr/?p=] + lcString64
*m.lcQRImage = GoogleApiQRBarcodeImage(lcQr, "", 198)
m.elqr = GoogleApiQRBarcodeImage(lcQr, "sergio", 198)
return

*---------------------------------------------------------
PROCEDURE GoogleApiQRBarcodeImage(tcText, tcFile, tnSize)
  LOCAL lcType, lcFolder, lcUrl
  IF VARTYPE(m.tnSize) <> "N"
    m.tnSize = 198  
  ENDIF
  m.tnSize = MIN(MAX(m.tnSize, 72), 540)
  m.lcType = "PNG" && Solo PNG
    TRANSFORM(m.tnSize) + [x] + TRANSFORM(m.tnSize) + ;
    [&cht=qr&chl=] + tcText

  IF EMPTY(m.tcFile)
    m.lcFolder = TempPath()
    IF NOT DIRECTORY(m.lcFolder)
      MD (m.lcFolder)
    ENDIF
    m.tcFile = FORCEEXT(m.lcFolder + SYS(2015), m.lcType)
  ELSE
    m.lcFolder = JUSTPATH(m.tcFile)
    IF NOT DIRECTORY(m.lcFolder) AND NOT EMPTY(m.lcFolder)
      MD (m.lcFolder)
    ENDIF
* ACA MUESTRA EL NOMBRE DEL QR.PNG  WAIT FORCEEXT(M.TCFILE, M.LCTYPE)+"  2" WINDOW
    m.tcFile = FORCEEXT(m.tcFile, m.lcType)
  ENDIF

  DECLARE LONG URLDownloadToFile IN URLMON.DLL ;
    LONG, STRING, STRING, LONG, LONG
  ERASE (m.tcFile)
=URLDownloadToFile(0, m.lcUrl, m.tcFile, 0, 0)
return m.tcFile

  IF 0 = URLDownloadToFile(0, m.lcUrl, m.tcFile, 0, 0)
    RETURN m.tcFile
ENDPROC



Sergio Bagnasco

unread,
Apr 16, 2021, 8:42:19 AM4/16/21
to Comunidad de Visual Foxpro en Español
SHRojas, Muchas Gracias por responder, lo tendré en cuenta tu consejo.-

Luis Maria Guayan

unread,
Apr 17, 2021, 12:55:44 PM4/17/21
to Comunidad de Visual Foxpro en Español
Parece que es problema de permisos en la carpeta donde tienes el .EXE ya que no le pones una ruta, solo un nombre sin extensión ("sergio")

Utilizalo sin 2do. parámetro que solo te generará un nombre que es el que te retorna la función, o en el caso de poner el nombre de archivo, hazlo completo con ruta, nombre y extensión.

m.elqr = GoogleApiQRBarcodeImage(lcQr, "", 198)

Luis María Guayán
Tucumán, Argentina
_______________________________
Comunidad Visual FoxPro en Español
http://comunidadvfp.blogspot.com
Reply all
Reply to author
Forward
0 new messages