В начало

Сервер для таблицы «Скидки»

 

            Постановка: нужно написать сервер в IDE «Дельфи 7» для таблицы «Скидки», находящейся в базе «Скидки.mdb».

            Создаем новое приложение в среде разработки «Дельфи 7», сохраняем проект как «ServerSkidki.dpr», затем переходим в главное меню программы и выбираем «File – New – Other…». А в появившемся окне переходим на закладку «Multitier», где выбираем «Remote Data Module».

Рис. 1. Remote Data Module

Рис. 1. Remote Data Module

 

            После этого выбираем имя для сокласса.

Рис. 2. CoClass

Рис. 2. CoClass

 

            Далее создастся модуль удаленного доступа, на окно которого нужно поместить компоненты: ADOConnection, ADOTable, DataSetProvider.

Рис. 3. Окно дата модуля

 

            Настраиваем компоненты на дата модуле.

Компонент

Настройка

ADOConnection1

ConnectionString = « Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\ACCESS\Скидки.mdb;Persist Security Info=False»

LoginPrompt = False

Connected = True

ADOTable1

Connection = ADOConnection1

TableName = Скидки

DataSetProvider1

DataSet = ADOTable1

ResolveToDataSet = True

Options:

poAutoRefresh = True

poPropogateChanges = True

 

            Затем компилируем проект. Запускаем «Demwer», который создает виртуальный локальный сервер на диске. Помещаем файл сервера «ServerSkidki.exe» в папку «…\localhost\cgi-bin\». Сервер готов для работы, остается создать для его проверки клиент.