Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Архивация файла БД [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]

при архивации указать имя - текущую дату в строковом выражении. что значит лучше? это единственно возможный вариант. (не считая изврашений с последующей переименовкий... и т.д.)


Наверх

Титульная страница Поиск, карта сайта Написать письмо