![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Архивация файла БД [D7, Access2003]
boxer © (2005-08-22 12:37:00)Помогите!!! Хочу заархивировать ФАЙЛ БД из делфи, чтобы имя архива было текущая дата. Как лучше сделать?
zx (2005-08-25 17:45:00) [1]ADOConnection1.Connected := false;
syte_ser78 (2005-08-25 08:47:00) [2]boxer (24.08.05 13:59) [14]
Почитай хелп по ключам рара. Можно запаковать используемый другим приложением файл. Правда если в момент паковки содержимое файла изменится то никто не гарантирует корректное содержимое архива.
boxer (2005-08-24 13:59:00) [3]Делаю так:
procedure TForm1.Button2Click(Sender: TObject);
var
komanda:string;
begin
komanda:='C:\Program Files\WinRAR\winrar a -ag+MM-DD-YYYY
c:\copy\opy\PY o:\arhbaz\arhiv.mdb';
winexec(Pchar(komanda), SW_SHOW);
end;
ошибка: arhiv.mdb занят другим процессом
Как отключиться от БД сохранить, а потом подключиться? (соединение через adoconnect)
alex_*** (2005-08-23 12:33:00) [4][9]
'winrar a -ag+MM-DD-YYYY' + arhiv.mdb даст в итоге
ничего кроме
Ошибка:[Error] Unit1.pas(30): Undeclared identifier: 'arhiv'
не даст
Fay (2005-08-23 12:29:00) [5]WinExec - ацтой! 8)
Случай как раз для CreateProcess, т.к. неплохо было бы знать, когда закончится упаковка.
syte_ser78 (2005-08-23 12:14:00) [6]sniknik © (23.08.05 10:32) [10]
У меня по такому принципу создаются суточные архивы рабочих папок пользователей.
sniknik (2005-08-23 10:32:00) [7]syte_ser78 © (23.08.05 08:45) [9]
rar сам подставляет? не знал.
syte_ser78 (2005-08-23 08:45:00) [8]
> sniknik © (22.08.05 18:18) [8]
> и на место MM-DD-YYYY желательно цифры из текущей даты вставить...
> ;)
Зачем?
'winrar a -ag+MM-DD-YYYY' + arhiv.mdb даст в итоге
23-08-20050archiv.rar
sniknik (2005-08-22 18:18:00) [9]и на место MM-DD-YYYY желательно цифры из текущей даты вставить... ;)
syte_ser78 (2005-08-22 16:57:00) [10]boxer (22.08.05 16:30) [6]
ты указал имя файла как имя переменной. А нужно как значение типа стринг. Возьми имя файла в одинарные кавычки
boxer (2005-08-22 16:30:00) [11]делаю так:
var
komanda:string;
begin
komanda:='winrar a -ag+MM-DD-YYYY' + arhiv.mdb+ '''' ;
winexec(Pchar(komanda), SW_SHOW);
end;
Ошибка:[Error] Unit1.pas(30): Undeclared identifier: 'arhiv'
ГДЕ КАСЯК?
boxer (2005-08-22 12:47:00) [12]пасиба всем, вечером попробую
syte_ser78 (2005-08-22 12:44:00) [13]тоесть
komanda:='winrar a MM-DD-YYYY' + имя_файла_который_пакуем+ '"' ;
winexec(Pchar(komanda), SW_SHOW);
syte_ser78 (2005-08-22 12:42:00) [14]komanda:='winrar a -ag+MM-DD-YYYY' + имя_файла_который_пакуем+ '"' ;
winexec(Pchar(komanda), SW_SHOW);
boxer (2005-08-22 12:42:00) [15]а пример можно?
sniknik (2005-08-22 12:40:00) [16]при архивации указать имя - текущую дату в строковом выражении. что значит лучше? это единственно возможный вариант. (не считая изврашений с последующей переименовкий... и т.д.)