GERANDO ARQUIVO .ZIP

17/12/2003

1

Delphi

Alguem sabe como fazer isso...
quando sair da minha aplicação, gerar um arquivo .ZIP dos arquivos .db
???????????????????????????


Pkarling

Pkarling
Responder

Posts

17/12/2003

Marconi

Coloque isto

WinExec(PChar(´C:\Arquivos de Programas\WinZip\WinZip32 -min -a -r -ex ´´ + diretorio+´\´+destino+
´´ ´+´´´+diretorio+´\´+origem+´´´),1);

Onde Origem é o nome do arquivo de origem (que pode ser *.db ou até *.* para juntar todos os arquivos do banco de dados.

Destino é o nome do arquivo zip que sera gerado.

Subustitua Diretório, pelo seu diretório.

Este comando utiliza o próprio Winzip para gerar os zips.

Marconi


Responder
Gostei + 0

17/12/2003

Marconi

Ah!

Não se esqueça de zipar também os arquivos auxiliares, tais como Indexes, memos, etc.. Senão o seu backup acaba não servindo para nada.

Marconi


Responder
Gostei + 0