Página 1 de 1

TZipFile() 1.1

Publicado: Vie Nov 10, 2006 1:05 pm
por 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.
Gracias.
Un Saludo,
Xevi.


Attached files filezip.zip (2.6 KB)Â

TZipFile() 1.1

Publicado: Vie Nov 10, 2006 3:38 pm
por Xevi

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

Publicado: Sab Nov 11, 2006 5:40 pm
por Xevi
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.
>
>
>
--

TZipFile() 1.1

Publicado: Lun Nov 13, 2006 11:40 am
por jfgimenez
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