Главная страница статей --> Хитрости при программировании php, заметки по базам данных

Упаковка и проверка базы Access

Источник: realcoding.net

{
here is a function i have made to compact and repair an access database.
exclusive access to the db is required!!
}

uses
comobj
;

function
compactandrepair(db: string): boolean; {db = path to access database}
var
v: olevariant;
begin
result
:= true;
try
v
:= createoleobject(jro.jetengine);
try
v
.compactdatabase(provider=microsoft.jet.oledb.4.0;data source=+db,
provider=microsoft.jet.oledb.4.0;data source=+db+x;jet oledb:engine type=5);
deletefile(db);
renamefile(db+x,db);
finally
v
:= unassigned;
end;
except
result
:= false;
end;
end;



Похожие статьи:
- Запросы к базе данных (команда select)
- Как заставить ORACLE анализировать все таблицы?
- Проектирование баз данных
- Создание и удаление таблиц в MS SQL Server
- Локальная баннерная система
- Справочник по ошибкам Oracle
- Как предотвратить превращение хранилища данных в свалку мусора
- Девять советов для работы с Web 2.0


Оглавление | Обсудить на форуме | Главная страница сайта | Карта сайта |

Контакты
Редакция:
[0.001]