ACCESS

Сервер БД Должники банков

Есть база данных «Должники банков», написанная в СУБД «MS Access 2002», в которой имеется таблица «Должники». Необходимо средствами «Дельфи 7» создать сервер для работы с таблицей «Должники».

Рис. 1. Таблица «Должники» в СУБД «MS Access 2002»

Запускаем IDE «Дельфи 7», создаем новое приложение, сохраняем проект под именем «Server.dpr», чтобы и исполняемые файлы были с тем же именем.

Далее переходим в главное меню и выбираем «File – New – Other», открывается окно, в котором идем на закладку «Multitier», где выбираем «Remote Data Module», обзываем класс «Doljniki».

Рис. 2. Модуль удаленного доступа

Потом на форму удаленного модуля перетаскиваем компоненты: ADOConnection, ADOTable, DataSetProvider. Настраиваем их для доступа к таблице «Должники».

Компонент

Настройка, значение

DataSetProvider1

ResolveToDataSet ₌ True

UpdateMode = upWhereKeyOnly

Options:

poAutoRefresh = True

poPropogateChanges = True

Компилируем проект.

Рис. 3. Форма удаленного модуля

Иногда выскакивает ошибка обращения к реестру OLE. Но она появляется только если вы выполняете приложение из «Дельфи 7» из экаунта, не имеющего административных прав. В общем лобуда, все нормально.

Рис. 4. Ошибка обращения к реестру OLE

Все, сервер готов. Далее нужно его перенести куда следует. Например, я поместил файл в папку «http://localhost/cgi-bin/Server.exe» на локальный сервер «Апачи», создаваемый ИДЕ «Денвер», т.е. туда, где его можно выполнить.