- •Тема 5. Разработка пользовательского интерфейса.
- •5.1. Средства быстрой разработки приложений.
- •5.2. Сложные системы. Методы их декомпозиции.
- •5.3. Создание классов разработчика.
- •5.4. Язык sql. Sql – запросы.
- •Sql – запросы.
- •Запрос 1. Простые запросы.
- •Запрос 2.Сложные условия поиска.
- •Сортировка результатов.
- •Запросы с подзапросами
- •5.5. Работа с “Word”, “Excel” и ActiveX
- •Понятие о com-клиенте и com-сервере
- •Vtf как com-клиент.
- •Листинг программы экспорта в Word
- •Основные структуры программы.
- •Комментарии к каждой строке листинга
- •Листинг программы экспорта в Excel
- •ActiveX → Календарь
- •Процедура определения календарной даты
- •5.6. Визуальные средства проектирования.
- •5.6.1. Мастера.
- •5.6.2. Конструкторы.
- •5.6.3. Построители.
Запросы с подзапросами
Select fname,lname,position;
From Dreamhome!staff;
where bno=(select bno;
From Dreamhome!branch;
where street = "163 Main St");
into table "Запрос13(13.19).dbf"
browse
use
****** ТЕКСТ ЗАПРОСА –Скалярный подзапрос
* Составьте список персонала, работающего
* в отделении компании, расположенном
* на улице "Main St" в доме 163
*Select sno,street,area,city;
*From Dreamhome!property_for_rent;
*where sno = All(Select sno;
* From Dreamhome!staff;
* where bno = (select bno;
* From Dreamhome!branch;
* where street = "163 Main St"));
*into table "Запрос14(13.21).dbf"2
*browse
*use
****** ТЕКСТ ЗАПРОСА- Строковый подзапрос
* Составьте перечень сдаваемых в аренду объектов,
* за которые отвечают работники отделения компании
* с личными номерами SA9 и SL41
Select sno,fname,lname,position,salary;
From Dreamhome!staff;
where salary > any ;
(Select salary;
From Dreamhome!staff;
where bno="B3");
into table "Запрос15(13.22).dbf"
browse
use
****** ТЕКСТ ЗАПРОСА – Ключевые слова ANY, ALL, SOME
* Найдите всех работников, чья зарплата превышает
* зарплату хотя бы одного работника отделения
* компании под номером "B3"
Select sno,fname,lname,position,salary;
From Dreamhome!staff;
where salary > All (Select salary;
From Dreamhome!staff;
where bno="B3");
into table "Запрос16(13.23).dbf"
browse
use
****** ТЕКСТ ЗАПРОСА - Ключевые слова ANY, ALL, SOME
* Найдите всех сотрудников, чья зарплата больше
* заработной платы любого работника отделения
* компании под номером "B3"
*Select r.rno,fname,lname,pno,comment;
*From Dreamhome!renter r, viewing v;
*Where r.rno=v.rno;
*into table "Запрос17(13.24).dbf"
*browse
*use
****** ТЕКСТ ЗАПРОСА – Многотабличные запросы
Составьте список имён всех клиентов, которые уже
* осмотрели хотя бы один сдаваемый в аренду объект
* и сообщили своё мнение по этому поводу
Select b.bno,b.city,s.sno,fname,lname,pno;
From Dreamhome!branch b,staff s,property_for_rent p;
Where b.bno=s.bno AND s.bno=p.bno;
order by b.bno,s.sno,pno;
into table "Запрос18(13.26).dbf"
browse
use
****** ТЕКСТ ЗАПРОСА – Естественное соединение трех таблиц
* Для каждого отделения компании перечислите работников,
* отвечающих за какие-либо сдаваемые в аренду объекты,
* с указанием города, в котором расположено данное
* отделение компании и номеров объектов
Select area;
From Dreamhome!branch;
union;
Select area;
From Dreamhome!property_for_rent;
into table "Запрос19(13.32).dbf"
browse
use
****** ТЕКСТ ЗАПРОСА- Объединение множеств
* Создайте список всех регионов, в которых
* либо находится отделение компании, либо
* располагаются сдаваемые в аренду объекты
5.5. Работа с “Word”, “Excel” и ActiveX
Понятие о com-клиенте и com-сервере

Если VTF использует Word или Excel или любое другое объектное приложение, то такое приложение называется COM-клиент.

Если Access использует VTF как свой объект, то это приложение VTF называется COM-клиент.
