Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > OOP
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Coloboración Paypal con ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #16  
Antiguo 19-02-2008
solemno solemno is offline
Registrado
 
Registrado: feb 2008
Posts: 7
Poder: 0
solemno Va por buen camino
Discriminar carpetas a comprimir.

Primero pido disculpas por revivir un hilo tan viejo pero es que me ha servido muchisimo para empezar con abbrevia, y como mi pregunta es relacionada a este hilo......
Al grano:
Tengo en un formulario un GroupBox con 3 opciones:
  1. Hacer BackUp de la BD
  2. Hacer BackUp de la BD e Imágenes
  3. Hacer BackUp de la BD, Imágenes y Reportes
Uso para tal efecto un componente AbZipKit y sigo los paso arriba descriptos para comprimir los archivos con todos las subcarpetas y "todo eso".


Código Delphi [-]
     // Nos situamos en el directorio de la BD
    AbZipKit.BaseDirectory := ExtractFilePath(Application.ExeName)+'\BD';
    AbZipKit.AddFiles('*.*', 0); // Y añadimos todos sus archivos
    // Nos situamos en el directorio de las imagenes
    AbZipKit.BaseDirectory := ExtractFilePath(Application.ExeName)+'\Imgs';
    AbZipKit.AddFiles('*.*', 0); // Y añadimos todos sus archivos
    AbZipKit.CloseArchive;
    AbZipKit.Save
El Problema que me surje es que a la hora de "rescatar el BackUp" están todos los archivos mesclados.

Quiciera si alguien puede ayudarme hacer algo parecido a esto:



Código Delphi [-]
 AbZipKit.StoreOptions := [soRecurse];
// Nos situamos en el directorio de la aplicación
    AbZipKit.BaseDirectory := ExtractFilePath(Application.ExeName);
//en este punto me gustaria poder filtrar las carpetas a tener en cuenta
//a la hora de comprimirlas, por ejemplo: '\BD' + '\Imgs' + '\Reports' pero no se como.
//entonces en el archivo comprimido quedaría todo en su carpeta original
   AbZipKit.AddFiles('*.*', 0); // Y añadimos todos sus archivos  
   AbZipKit.CloseArchive;
   AbZipKit.Save;

Última edición por solemno fecha: 19-02-2008 a las 21:41:39.
Responder Con Cita
 


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 05:54:15.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi