Ayuda con vfpconnection.fll (VFP+FTP)
IRCSAsw
Estoy implementando la libreria de Craig Boyd para
Cargar/descargar en VFP ...
http://www.portalfox.com/modules.php?op=modload&name=Sections&file=index&req=viewarticle&artid=161
... pero no me deja bajar un archivo completo, creo que el
servidor me desconecta por que recibo este mensaje:
STATUS:Operation timed out after 10000 millisecconds with
117448 out of 23770450 bytes received
STATUS:Received only partial file: 117448 bytes
STATUS:Closing connectrion #0
STATUS:Timeout was reached
No se si me hace falta indicar algo m�s en la librer�a, este
es el c�digo que corro basado en el ejemplo:
SET LIBRARY TO (LOCFILE("vfpconnection.fll","FLL"))
?FTPGet("ftp://ftp2.sat.gob.mx/agti_servicio_ftp/verifica_comprobante_ftp/CSD.txt",
"d:\temp\csdnuevo.txt", "MyProgress()", "MyTrace()")
SET LIBRARY TO
FUNCTION MyProgress() ....
FUNCTION MyTrace() ...
Siempre que lo corro me corta a los 10000 millisecconds.
El archivo lo puedo descargar desde iexplorer y filezilla
sin problema.
Gracias por su ayuda,
Saludos.
Arturo Ramos
www.ircsasoftware.com.mx
Canc�n, M�xico
Walter R. Ojeda Valiente
Yo también tuve un problema similar, haciendo pruebas y pruebas descubrí que escribiendo:
SET LIBRARY TO VFPCONNECTION.FLL
=SetResponseTimeout(60000) && Default es 10 segundos. Cuanto mayor es este número, mayor es el tamaño del archivo que se puede subir o bajar
esos problemas se solucionaban.
Deberías ajustar el número que está entre paréntesis a tus necesidades, como siempre: prueba y error.
Saludos.
Walter.
IRCSAsw
Eso soluciona el problema, ahora, t� que tienes la
experiecia con el .fll, en tiempo de dise�o me funciona muy
bien pero en mi .exe me marca muchos errores, incluso me
marca errores en la compilaci�n, dice que no encuentra las
definiciones de SETRESPONSETIMEOUT y de FTPGET, c�mo agrego
el .fll al proyecto o que tengo que incluir para que
funcione y evitar los errores ??
Gracias por tu ayuda,
Saludo.
Walter R. Ojeda Valiente
Yo copio el archivo VFPCONNECTION.FLL en la misma carpeta donde está el ejecutable y así funciona perfectamente.
Para realizar todas las operaciones FTP he creado una clase, a la cual invoco cuando necesito subir o bajar archivos.
Saludos.
Walter.
> Date: Sat, 12 Feb 2011 22:30:40 -0600
> From: irc...@gmail.com
> To: publice...@googlegroups.com
> Subject: Re: [vfp] Ayuda con vfpconnection.fll (VFP+FTP)
>
> Gracias Walter,
>
> Eso soluciona el problema, ahora, tú que tienes la
> experiecia con el .fll, en tiempo de diseño me funciona muy
> definiciones de SETRESPONSETIMEOUT y de FTPGET, cómo agrego
> funcione y evitar los errores ??
>
> Gracias por tu ayuda,
>
> Saludo.
>
> Arturo Ramos
> www.ircsasoftware.com.mx
Luis Maria Guayan
Esto está en alguna parte de la documentación, no recuerdo donde, pero está:
*!* Avoid compiler errors with FLL functions
*********************
Function UnzipQuick
Endfunc
*********************
Function FTPGET
Endfunc
*********************
Function HTTPGET
Endfunc
*********************
Function FILEGET
Endfunc
*********************
Function FTPPUT
Endfunc
*********************
Function HTTPPUT
Endfunc
*********************
Function FILEPUT
ENDFUNC
*********************
Luis María Guayán
Tucumán, Argentina
_________________________
http://www.PortalFox.com
Nada corre como un zorro
_________________________
El 13/02/2011 01:30, IRCSAsw escribió:
Gracias Walter,
Eso soluciona el problema, ahora, tú que tienes la experiecia con el .fll, en tiempo de diseño me funciona muy bien pero en mi .exe me marca muchos errores, incluso me marca errores en la compilación, dice que no encuentra las definiciones de SETRESPONSETIMEOUT y de FTPGET, cómo agrego el .fll al proyecto o que tengo que incluir para que funcione y evitar los errores ??
Gracias por tu ayuda,
Saludo.
Arturo Ramos
www.ircsasoftware.com.mx
Cancún, México
IRCSAsw
Si la tengo en un lugar accesible para la aplicaci�n (dentro
del path definido con set path), pero continuan los problemas...
Inicia la descarga pero se bloquea y en unos segundos win
dice que la aplicaci�n no responde y la cierra.
Estoy usando Win 7 y VFP 9...
Alguna idea, Walter, Foro ?
Saludos.
Arturo Ramos
www.ircsasoftware.com.mx
Canc�n, M�xico.
IRCSAsw
No he visto documentaci�n m�s que la de portalfox pero
supuse que con eso se evitaban los errores en la
compilaci�n, as� lo ten�a pero que me marca errores en el
ejecutable pense que esto podr�a estar causando un conflicto
y lo quit� del main.prg, lo regreso entonces para evitar los
mensajes de error en la compilaci�n...
...de cualquier forma se contin�a 'colgando' el proceso y a
los pocos segundos me dice Win que la aplicaci�n no responde
y la cierra, alguna idea??
Este es el c�digo completo:
----------------------------------
Click del bot�n 'descargar'
----------------------------------
SET LIBRARY TO (LOCFILE("vfpconnection.fll","FLL")) ADDITIVE
=SetResponseTimeout(60000)
csd_file = cDefa + '\usr\csd.txt'
*
lstat =
FTPGet("ftp://ftp2.sat.gob.mx/agti_servicio_ftp/verifica_comprobante_ftp/CSD.txt",
csd_file , "MyProgress('CSD.TXT')")
IF !lstat THEN
MESSAGEBOX("Error en la descarga o no se descarg�
completo.", 16, "Sistema")
ENDIF
fcfd_file = cDefa + '\usr\folioscfd.txt'
*
lstat =
FTPGet("ftp://ftp2.sat.gob.mx/agti_servicio_ftp/verifica_comprobante_ftp/FoliosCFD.txt",
fcfd_file , "MyProgress('FoliosCFD.TXT')")
IF !lstat THEN
MESSAGEBOX("Error en la descarga o no se descarg�
completo.", 16, "Sistema")
ENDIF
WAIT CLEAR
RELEASE LIBRARY vfpconnection.fll
--------------------------------------------------------
Funci�n MyProgress en un .prg de utiler�as que se carga en
el programa principal de la aplicaci�n con:
SET PROCEDURE TO utileria.prg ADDITIVE
--------------------------------------------------------
FUNCTION MyProgress(ccFile)
nRest = (m.nConnectBytesSoFar * 100) / m.nConnectTotalBytes
WAIT 'Bajando ' + ccFile + ': ' + TRANSFORM(nRest,
'999%') WINDOW NOWAIT
ENDFUNC
En las pruebas dentro de VFP funciona bien pero en el .exe no.
Gracias por su tiempo, Saludos.
Arturo Ramos
www.ircsasoftware.com.mx
Canc�n, M�xico.
