En la 1.1 creo recordar se "arregló" la propiedad lRecursive.
Adjunto el Ejemplo que se utilizó, modificado para estudio del error que me
estoy encontrando.
Ahora cuanso su máscara de ficheros no son "*.*" no realiza la cópia.
Y además, cuando antes utilizaba la máscara "MiCarpetaMisFicheros*.*",
éstos se guardaban en la carpeta "MiCarpeta" , respetando su alojamiento
para su posterior restauración. Ahora los guarda sin respetar la carpeta y
los pone en la raíz.
Podeis verlo si desmarcais el Checkbox de incluir ruta.
Gracias.
Un Saludo,
Xevi.
Attached files filezip.zip (2.6 KB)Â
In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.
Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.
Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.
TZipFile() 1.1
TZipFile() 1.1
Lo he probado de esta manera, y si bien funciona la máscara "*.Db*"
aFilesZip := Directory( "MiCarpeta*.Db*" )
For n := 1 to Len( aFilesZip )
oZip:AddFile( "MiCarpeta" + aFilesZip[n,1] )
Next
lo que no hace es guardar TODOS los ficheros en la carpeta "MiCarpeta".
Utilizando aFileMask
aFiles := Directory( "MiCarpeta*.Db*" )
For n := 1 to Len( aFiles )
Aadd( aFilesZip, "MiCarpeta" + aFiles[n,1] )
Next
oZip:aFileMask := aFilesZip
No funciona la máscara "*.Db*" y si pongo la máscara "*.*" tampoco guarda los ficheros en la carpeta "MiCarpeta"
Un Saludo,
Xevi.
"Xevi" <xevicomas@gmail.com> ha escrit al missatge del grup de discussió: [email=45546b25@news.xailer.com...]45546b25@news.xailer.com...[/email]
> En la 1.1 creo recordar se "arregló" la propiedad lRecursive.
> Adjunto el Ejemplo que se utilizó, modificado para estudio del error que me
> estoy encontrando.
>
> Ahora cuanso su máscara de ficheros no son "*.*" no realiza la cópia.
> Y además, cuando antes utilizaba la máscara "MiCarpetaMisFicheros*.*",
> éstos se guardaban en la carpeta "MiCarpeta" , respetando su alojamiento
> para su posterior restauración. Ahora los guarda sin respetar la carpeta y
> los pone en la raíz.
>
> Podeis verlo si desmarcais el Checkbox de incluir ruta.
>
> Gracias.
>
> Un Saludo,
> Xevi.
>
>
>
--
TZipFile() 1.1
Alguna solución al respecto???
Un Saludo,
Xevi.
"Xevi" <xevicomas@gmail.com> ha escrit al missatge del grup de discussió: 45548ed4$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
Lo he probado de esta manera, y si bien funciona la máscara "*.Db*"
aFilesZip := Directory( "MiCarpeta*.Db*" )
For n := 1 to Len( aFilesZip )
oZip:AddFile( "MiCarpeta" + aFilesZip[n,1] )
Next
lo que no hace es guardar TODOS los ficheros en la carpeta "MiCarpeta".
Utilizando aFileMask
aFiles := Directory( "MiCarpeta*.Db*" )
For n := 1 to Len( aFiles )
Aadd( aFilesZip, "MiCarpeta" + aFiles[n,1] )
Next
oZip:aFileMask := aFilesZip
No funciona la máscara "*.Db*" y si pongo la máscara "*.*" tampoco guarda los ficheros en la carpeta "MiCarpeta"
Un Saludo,
Xevi.
"Xevi" <xevicomas@gmail.com> ha escrit al missatge del grup de discussió: [email=45546b25@news.xailer.com...]45546b25@news.xailer.com...[/email]
> En la 1.1 creo recordar se "arregló" la propiedad lRecursive.
> Adjunto el Ejemplo que se utilizó, modificado para estudio del error que me
> estoy encontrando.
>
> Ahora cuanso su máscara de ficheros no son "*.*" no realiza la cópia.
> Y además, cuando antes utilizaba la máscara "MiCarpetaMisFicheros*.*",
> éstos se guardaban en la carpeta "MiCarpeta" , respetando su alojamiento
> para su posterior restauración. Ahora los guarda sin respetar la carpeta y
> los pone en la raíz.
>
> Podeis verlo si desmarcais el Checkbox de incluir ruta.
>
> Gracias.
>
> Un Saludo,
> Xevi.
>
>
>
--
Un Saludo,
Xevi.
"Xevi" <xevicomas@gmail.com> ha escrit al missatge del grup de discussió: 45548ed4$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
Lo he probado de esta manera, y si bien funciona la máscara "*.Db*"
aFilesZip := Directory( "MiCarpeta*.Db*" )
For n := 1 to Len( aFilesZip )
oZip:AddFile( "MiCarpeta" + aFilesZip[n,1] )
Next
lo que no hace es guardar TODOS los ficheros en la carpeta "MiCarpeta".
Utilizando aFileMask
aFiles := Directory( "MiCarpeta*.Db*" )
For n := 1 to Len( aFiles )
Aadd( aFilesZip, "MiCarpeta" + aFiles[n,1] )
Next
oZip:aFileMask := aFilesZip
No funciona la máscara "*.Db*" y si pongo la máscara "*.*" tampoco guarda los ficheros en la carpeta "MiCarpeta"
Un Saludo,
Xevi.
"Xevi" <xevicomas@gmail.com> ha escrit al missatge del grup de discussió: [email=45546b25@news.xailer.com...]45546b25@news.xailer.com...[/email]
> En la 1.1 creo recordar se "arregló" la propiedad lRecursive.
> Adjunto el Ejemplo que se utilizó, modificado para estudio del error que me
> estoy encontrando.
>
> Ahora cuanso su máscara de ficheros no son "*.*" no realiza la cópia.
> Y además, cuando antes utilizaba la máscara "MiCarpetaMisFicheros*.*",
> éstos se guardaban en la carpeta "MiCarpeta" , respetando su alojamiento
> para su posterior restauración. Ahora los guarda sin respetar la carpeta y
> los pone en la raíz.
>
> Podeis verlo si desmarcais el Checkbox de incluir ruta.
>
> Gracias.
>
> Un Saludo,
> Xevi.
>
>
>
--
TZipFile() 1.1
Xevi,
> En la 1.1 creo recordar se "arregló" la propiedad lRecursive.
> Adjunto el Ejemplo que se utilizó, modificado para estudio del error que
> me estoy encontrando.
>
> Ahora cuanso su máscara de ficheros no son "*.*" no realiza la cópia.
> Y además, cuando antes utilizaba la máscara "MiCarpetaMisFicheros*.*",
> éstos se guardaban en la carpeta "MiCarpeta" , respetando su alojamiento
> para su posterior restauración. Ahora los guarda sin respetar la carpeta y
> los pone en la raíz.
>
> Podeis verlo si desmarcais el Checkbox de incluir ruta.
Perdona el retraso, no he podido hacer nada en todo el finde.
Esta tarde intentaré revisarlo y decirte algo.
--
Un saludo,
José F. Giménez
http://www.xailer.com
> En la 1.1 creo recordar se "arregló" la propiedad lRecursive.
> Adjunto el Ejemplo que se utilizó, modificado para estudio del error que
> me estoy encontrando.
>
> Ahora cuanso su máscara de ficheros no son "*.*" no realiza la cópia.
> Y además, cuando antes utilizaba la máscara "MiCarpetaMisFicheros*.*",
> éstos se guardaban en la carpeta "MiCarpeta" , respetando su alojamiento
> para su posterior restauración. Ahora los guarda sin respetar la carpeta y
> los pone en la raíz.
>
> Podeis verlo si desmarcais el Checkbox de incluir ruta.
Perdona el retraso, no he podido hacer nada en todo el finde.
Esta tarde intentaré revisarlo y decirte algo.
--
Un saludo,
José F. Giménez
http://www.xailer.com