Сервер таблицы «Поставщики»

Сервер таблицы «Поставщики» должен обеспечивать доступ к таблице «Поставщики» базы данных «Сеть магазинов.mdb», созданной в «MS Access 2002».

Для создания сервера воспользуемся «Дельфи 7». Создаем новое приложение, сохраняем его под именем «Server-Postavshiki.dpr». Далее переходим в главное меню «Дельфи 7» и выбираем «File – New – Other…». А потом на закладке «Multitier» выбираем «Remote Data Module». Затем придумываем имя для сокласса, типа «Postavshiki». При этом будет создан модуль удаленного модуля, на окно которого надо будет перетащить компоненты: ADOConnection, ADOTable, DataSetProvider.

Рис. 1. Окно модуля удаленного доступа

Настроим компоненты.

Компонент	Настройка, значение
ADOConnection1	ConnectionString = « Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\ACCESS\Сеть магазинов.mdb;Persist Security Info=False» LoginPrompt = False
ADOTable1	Connection = ADOConnection1 TableName = Поставщики
DataSetProvider1	DataSet = ADOTable1

Компилируем проект, сервер готов.