Например

Свойства элемента управления Data.

DatabaseName - имя БД, к которой необходимо подключиться;

Connect – тип подключаемой базы данных (Access, FoxPro 2..6, 3.0, Paradox или другие);

RecordSetType – тип объекта RecordSet;

RecordSource - для определения источника записей объекта RecordSet: имени таблицы или текста запроса к БД, в том числе SQL-запроса.

Затем к форме добавляется связанный элемент управления и привязывается к элементу управления Data, для чего устанавливаются его свойства:

Свойство DataSource устанавливается по имени элемента управления Data.

Свойство DataField устанавливается по имени столбца объекта, указанного в RecordSource, содержимое которого будет выведено в связанном элементе.

После выполнения операции привязки, нажатие на стрелки элемента управления Data (<< - первая запись, < - предыдущая запись, > - следующая запись, >> - последняя запись), будет изменять содержимое связанного элемента управления.

Exclusive = (True/ False) - запрет доступа к БД, пока пользователь ее не закроет.

ReadOnly = (True/ False) – определяет возможность редактирования БД.

Свойство Database объекта Data, заданное в программном коде, создает новый объект Database со своими свойствами и методами (Close, Execute).

Свойство RecordSource позволяет помимо таблиц БД использовать операторы SQL, чтобы выделить подмножество записей, удовлетворяющих некоторым условиям. Это позволяет создавать программные элементы dynaset или snapshot. Следующие фразы составляют предложение на языке SQL:

Select - отбор информации из полей.

From - указывает имя таблицы.

Where - определяет условия выборки.

Group By - для распределения выбранных записей в определенные группы.

Having - определяет условие, которому должна удовлетворять следующая группа записей.

Order By - порядок сортировки выбранных записей.

1. Выбрать всю информацию из таблицы AdressBook

Data1.RecordSource = “Select * From AdressBook"

2. Выбрать информацию из полей Name, Adress по всем записям таблицы AdressBook

Data1.RecordSource = “Select Name, Adress From AdressBook

3. Выбрать информацию из полей Name, Adress таблицы AdressBook для фамилии Иванов

Data1.RecordSource = “Select Name, Adress From AdressBook Where Name = 'Иванов' ‘’

4. Выбрать информацию из полей Name, Adress таблицы AdressBook для фамилиий, начинающихся на «Иван»

Data1.RecordSource = “Select Name, Adress From AdressBook_ Where Name Like 'Иван ' ”

' (Иванов, Иваницкий, Иванченко...)

Можно использовать переменные или значения текстовых полей в SQL-выражении. Например:

1. Выбрать информацию из всех полей таблицы Telephone по записям, в которых содержимое поля Name равно значению, заданному в переменной A$

Data1.RecordSource = “Select *From Telephone Where Name = ‘ “ _

& A$ & ” ’ ”

2. Выбрать информацию из всех полей таблицы Telephone по записям, в которых содержимое поля Name равно значению, заданному в текстовом поле Text1

Data1.RecordSource = “Select * From Telephone Where Name = ‘ “_

& Text1.Text & ” ’ ”

В фразе Where можно использовать логические операции And, Or, Not для соединения нескольких выражений, а также операции сравнения <, <=, >, >=, < >, Between, Like, In

Например. Пусть имеется база данных Products с информацией о заказах и база данных Details с информацией о товарах. Необходимо выбрать данные по заказам, содержащих товар с ценой, превосходящей 25 условных единиц:

Data1.RecordSource = “Select * From Products_

Where Tovar in (Select Tovar From_ Details Where Price>=25)”

Помимо запросов SQL можно изменять (команды Update…, Set новое значение Where...), добавлять (Insert into...), удалять (Delete From...) записи в таблице.

Например. Необходимо откорректировать информацию в таблице Orders в отношении товара "Цемент» (поле Order), увеличив его количество (поле Amount) на 10%, и уменьшив его стоимость (поле Cast) на 3%.

….

Дата добавления: 2014-12-10