КонспектЛекций

General – двоичное поле произвольной длины

Язык программирования FoxBASE

Язык является строко-зависимым и регистронезависимым. Содержит большое количество команд и функций, часто дублирующих друг друга (в основном в целях совместимости с другими СУБД). Некоторые команды одинаковы даже по названию (например, SELECT). Язык истинно структурный, поддерживает аппарат процедур и функций, а также механизм макроподстановок. Использует многомерные массивы и функции массового копирования данных, однако не работает с множествами. Областью вывода по умолчанию является фон главного окна программы (как продолжение традиции DOS-версии).

Некоторые правила языка:

1)кириллица может быть использована лишь в символьных строках и примечаниях;

2)ограничителями строковых констант могут быть как кавычки, так и апострофы;

3)символ примечаний && или * ;

4)оператор вывода на главное окно – команда ? или ?? (в первом случае вывод с новой строки, во втором – с текущей позиции);

5)Ввод и вывод даты:

MyBirthDate={^1969-08-23} Set date german

? MyBirthDate

6) Использование макроподстановок

N = ”Date()”

M = ”&N+7”

?M && выводится текст Date()+7

?&M && выводится текущая дата, увеличенная на 7 (дней)

?”&M” && выводится текст Date()+7

Команды могут вводится интерактивно или запускаться программно. Структура команд:

<Имя команды> [<границы>] [<список выражений>] [ FOR <условие>] [ WHILE <условие>]

Здесь:

<границы> – область действия команды – ключевые слова: ALL (все записи), REST (вниз от текущей), NEXT <n> (следующие n записей, начиная с текущей), RECORD <n> – только для записи с номером n.

FOR <условие> – выполнение команды только для записей, отвечающих условию.

WHILE <условие> – выполнение команды до тех пор, пока не перестанет выполняться условие.

Пример программы поиска:

Clear ALL && очистка экрана, удаление пользовательских переменных и массивов, окон и меню Use Phonebook && выбираем уже созданную базу данных со списком телефонов nRec=Reccount() && подсчитываем число записей в базе (переменную объявлять не надо)

? nRec && выводим полученную цифру на экран for i=1 to nRec do && организуем цикл по записям

goto i && прямое позиционирование на запись с номером i

if Alltrim(phone)=’555555’ && сравниваем поле с именем phone со строковой константой display && если условие выполнено, показываем запись на экране

endif

endfor

Описание основных команд FoxBASE

51

1)Выбор таблицы. В среде FoxPro только одна таблица может быть активной. USE <имя таблицы> – открытие таблицы в текущей рабочей области

USE без параметров – закрывает таблицу

SELECT <i> – переход в рабочую область с индексом i

CLOSE ALL – закрытие всех файлов и переход в рабочую область 1

2)Перемещение по таблице и контроль перемещения.

GO {TOP | BOTTOM | <n>} – переход к первой, последней или записи с номером n SKIP [<n>] – переход к записи, отстоящей на n от текущей или на следующую запись Recno([<i>]) – функция, возвращающая номер текущей записи в области i

Reccount([<i>]) – выдаёт общее число записей в таблице (включая помеченные на удаление) Eof([<i>]), Bof([<i>]) – функции, отмечающие конец и начало таблицы

3) Вставка и удаление записей

APPEND [BLANK] – дополнение таблицы интерактивное (открывается окно ввода данных) или пустой записью

INSERT [BEFORE] – вставка новой записи после (или до) текущей (открывается окно ввода данных)

DELETE – пометка к удалению записей в указанных границах или отвечающих указанным условиям

PACK – физическое удаление помеченных ранее записей и сжатие файла.

USE Peoples

GO BOTTOM

SKIP -3

DELETE NEXT 3

PACK

Просмотр содержимого таблицы

LIST – выводит записи активной таблицы на главное окно

CHANGE <параметры> – вызывает окно редактора отдельных записей таблицы с возможностью интерактивного или предварительного задания параметров редактирования (в т.ч. ввод значений по умолчанию).

BROWSE <параметры> – мощное средство представления данных в табличном виде, позволяющее осуществлять просмотр и редактирование (ввод) записей в одной или нескольких таблицах. Параметры представления данных могут указываться интерактивно или с помощью параметров. Перечислим некоторые параметры команды:

[FIELDS <поле>[:<ключ>],…] – перечень предъявляемых полей (по умолчанию – все). Примеры ключей: :<n> – видимый размер поля в символах :R – разрешён только просмотр поля, :H=<имя> – указание собственного заголовка поля; :W=<выражение>

– условие для входа в поле;

[FOR <условие>] – фильтр для записей;

[VALID <условие> [ERROR <сообщение>]] – контроль выхода из текущей записи (т.е. если <условие> истинно, запись покинуть разрешается, иначе появится <сообщение> об ошибке;

[WHEN <условие>] – контроль доступа к записи (если false, запись только для чтения)

[NOEDIT] – редактирование невозможно для всей таблицы

[NODELETE] – удаление записей невозможно

[NOAPPEND] – дополнение базы невозможно

[NOWAIT] – после открытия окна управление сразу передаётся программе

[LOCK <n>] – разделение окна по вертикали: линия раздела проходит за первыми n полями

52

[LEDIT | REDIT] – левая или правая части окна превращаются в CHANGE

USE Students BROWSE

BROWSE NOEDIT LOCK 3 REDIT FIELDS new=Family + Lastname + Left(Firstname,1) + ’.’ +; Left(Patronymic,1) + ’.’ :25:H=’ФИО’, BirthDate:H=’Дата рождения’ FOR group=21402

Индексирование таблицы

Индекные файлы в FoxPro бывают нескольких видов:

1)одноиндексные – индекс по одному полю, высший приоритет. Файл с расширением .idx.

2)мультииндексный структурный. Имя совпадает с именем таблицы, автоматически открывается для своей таблицы, и не указывается в списке индексных файлов. Расширение файла .cdx.

3)мультииндексный обычный. Может создаваться и подключаться к таблицам программно. Низший приоритет.

INDEX <параметры> – команда создания индексных файлов

SER INDEX TO [<список индексных файлов>] [ORDER <ведущий индекс>] – открывает индексные файлы для активной таблицы.

SER INDEX TO без параметров – закрывает все индексные файлы кроме структурного.

Синоним – CLOSE INDEX

REINDEX – обновляет все индексные файлы, открытые в текущей рабочей области. По умолчанию при редактировании и добавлении данных индексы отключаются. И если их по окончанию редактирования не перестроить, возникает фатальная ошибка обработки данных в базе.

Поиск и упорядочение информации в таблице

SET FILTER TO <условие> – установка условия для всех следующих команд обработки данных SET FILTER TO без параметров – отмена ранее поставленных условий

LOCATE FOR <условие> [<границы>] [WHILE <условие>] – последовательный поиск. Предварительное индексирование не требуется. При успешном поиске функция Found() выдает значение True, а функция Recno() указывает на номер искомой записи с первым вхождением заданного условия поиска. Продолжение поиска осуществляется командой CONTINUE.

USE Students

SET FILTER TO Group=21402

LOCATE FOR Name=”Екатерина”

DISPLAY

CONTINUE

SORT ON <список полей с ключами> TO <имя новой таблицы> [<границы>][<условия>] – создание новой таблицы, в которой физическое размещение записей соответствует заданному принципу. Первое поле в списке считается главным. Ключи: /A – сортировка по возрастанию, /D – сортировка по убыванию.

SEEK <выражение> – быстный поиск по ведущему индексу. Если поиск удачен, Found() возвращает True, а Recno() – номер первой записи, удовлетворяющей условию (при этом остальные искать не надо, они находятся ниже по соседству). Помимо команды SEEK и её синонима FIND существует аналогично работающая функция Seek(<выражение>), возвращающая True, если поиск удачен.

53

Пример программы изменения данных в таблице: откроем БД Streets, найдём запись со значением «Урицкого» (считаем, что запись уникальная) и заменим её на «Александра Невского».

Clear ALL

Set near off && включаем нежёсткий режим поиска

Use Streets

Set index to && закрываем все дополнительные индексные файлы

INDEX on street_nam to ind_name && создаём новый индексный файл по полю street_nam SEEK ”Урицкого” && быстрый поиск возможен только с использованием индекса

If Found()

Replace street_nam WITH ”Александра Невского”

else

? ”Нет такого имени”

endif

BROWSE && проверим, что сейчас таблица упорядочена по алфавиту по полю street_nam Set index to

Связи между таблицами

SET RELATION TO <ключевое поле> INTO <область>, … [ADDITIVE] – связывает указатель записей в активной рабочей области с указателями записей из других рабочих областей по заданному полю. Дочерние таблицы должны быть открыты, и в обязательном порядке проиндексированы по ключевым полям. Создаётся связь вида 1:1.

SET RELATION TO без параметров – разрывает связи между всеми таблицами. SET SKIP TO <область> – преобразует связь 1:1 к связи 1:М

JOIN <параметры> – альтернативный вариант команды для связывания таблиц

Пример: создадим программу, осуществляющую выборку из двух таблиц, связанных по одному индексному полю. Программа должна запросить фамилию и вывести на экран владельцев телефонов с заданными фамилиями, номера их телефонов и адреса.

clear select 1 use streets

index on id_street to id_1 unique && совершенно очевидно, что код улицы уникален pathind=ndx(1) && функция возвращает путь к индексному файлу

select 2

use phones_flat

set relation to id_street into streets && связь один-к-одному var_name=Space(30) && определим переменную текстового типа

@4,4 SAY "Введите имя для дальнейшего поиска:"

@5,4 GET var_name PICTURE "@!" && воспользуемся простыми средствами ввода данных

READ

set filter to Alltrim(Upper(name))==AllTrim(m.var_name) && можно и так ...

i=1

FormatFont="FONT 'Courier',12 " && эта переменная будет использована как макроподстановка

@6,1 && всего лишь начало области вывода

do while not eof()

&& самая простая команда вывода при желании может обрести неожиданный вес

? i PICTURE "@L 9999 " &FormatFont STYLE 'BI',; Padr(Substr(surname,1,At(" ",surname)),20," ") &FormatFont ,; house PICTURE "@R дом 9999 " FONT 'Tahoma',14 STYLE 'B',; " по ",;

AllTrim(streets.street_typ) &FormatFont,; streets->street_nam &FormatFont

i=i+1 skip

54

enddo

set filter to set relation to close indexes close tables

erase "&pathind"

Разработка форм в FoxPro 6.

Вызов редактора форм из командной строки с целью создания формы: create form <имя формы> При этом создаётся файл <имя формы>.scx.

Редактирование формы: modify form <имя формы> При этом открывается окно Form Designer с панелями Form Controls и Properties. Прежде всего необходимо сформировать среду окружения (выпадающее меню Data Environement при клике на окне формы) для формы: добавить таблицы и связать их между собой.

Созданная форма сразу готова для выполнения (меню Form / Run Form или кнопка «!»). Запуск формы на выполнение из командной строки:

do form <имя формы> read events

Обращение к объектам текущей формы:

thisform.<имя объекта>.<имя свойства> = <значение>

Основные поля, методы или свойства формы и связанные с ними типичные реакции:

Unload Event	закрытие формы	clear events
Init Event	инициализация формы	устанавливаются нач. знач. объектов формы
Caption	заголовок формы	уже установлен

Основные объекты формы:

		1.	Поле комментария (Label)		текстовая информация (заголовки)
		2. Текстовое поле (Text Box)			поле ввода и вывода данных с форматом и маской
		3.	Поле редактирования (Edit Box)		поле для редактирования символьных полей
					большого размера и memo-полей
		4.	Кнопка (Command Button)		одиночная кнопка с надписью или рисунком
		5.	Группа кнопок (Command Group)		заданное количество кнопок в одном контейнере*
		6.	Группа переключателей (Option Group)		Кнопки с зависимой фиксацией*
		7.	Флажок (Check Box)		Принимает значение 0 или 1
		8.	Поле со списком (Combo Box)		Данные вводятся или выбираются из вып. списка
		9.	Список выбора (List Box)		Отображение многостолбцовых данных со скролл.
		10.		Катушка (Spinner)	инкремент/декремент с заданным шагом
		11.		Табличное представление (Grid)	если не хочется использовать BROWSE
		12.		Изображение (Image)	поддерживаются все известные графич. форматы
		13.		Таймер (Timer)	отображение системных часов или обновление
					данных через заданный интервал
	мастер	14. Рамка вкладок (Page Frame)			составной объект из заданного числа страниц*
	помогает	15.		Элем. отображения ActiveX (ActiveX	подключение внешних элементов управления для
	установить	Bound Control, OLE Bound Control)			отображения значений поля типа General
		16.		Элем. управления ActiveX	создание ActiveX-объекта
	параметры
		17.		Линия, Контур (Line, Shape)	линия, прямоугольник, эллипс, окружность
	объектов
		18.		Контейнер (Container)	собирает объекты для однотипного управления
		19.		Разделитель (Separator)	разделитель кнопок

20.Гиперссылка (Hyperlink)

*чтобы проникнуть внутрь контейнера для редактирования его объектов следует выбрать в выпадающем меню опцию «Edit», щёлкнув по объекту-контейнеру правой кнопкой мыши.

55

С помощью команд меню Format (/Align, /Size) можно сделать объекты одинакового размера, выровнять их относительно друг друга или формы, сделать равными расстояния между ними и т.п.

Для каждого объекта существуют свойства и методы, управляющие его внешним отображением (вкладка Layout в окне Properties), взаимодействием с источником данных для этого объекта (вкладка Data), методами обработки событий от других элементов или связанных с действиями пользователя (вкладка Methods), прочие свойства (вкладка Other).

В выделенном на рисунке окне может работать построитель выражений (кнопка fx) для определения значения свойства (если в этом есть необходимость). Если для метода указано [Default], то выполняются действия по умолчанию для каждого из методов. Если требуется ввести собственные действия, после двойного щелчка открывается окно для ввода программы, назначаемой данному методу, помимо действий, выполняемых по умолчанию.

Основные методы объектов формы и связанные с ними типичные реакции:

Caption	текст для Label и Button	конечно,	можно	менять	программно,
		например this.caption = time()
Name	имя объекта (уникальное)	зная его, программно управляем объектом
Value	текущее значение объекта	можем устанавливать и читать, например:
		Thisform.Text1.Value = Date()
Picture	изображение для Button и Image	вводится имя файла изображения
Click Event	нажатие – прежде всего для Button	пример для кода кнопки «К началу таблицы»:
		if !bof()
		go top
		endif
		_screen.ActiveForm.Refresh()
Format,	для полей ввода	такие же опции форматирования, что и для
InputMask		команд SAY/GET с шаблоном PICTURE
RowSource	для списков – источник данных	совместно с полем RowSourceType

Пример кода для кнопки «Выход из формы»:

if MessageBox(“Выходить из формы ?”, 4+32+256, ”Выход”) = 6

_screen.ActiveForm.Release() else _screen.ActiveForm.Refresh()

EndIf

Если переменную или массив намечается использовать вне формы или при взаимодействии нескольких форм, создавайте её как Public.

Разработка отчётов в FoxPro 6.

Под отчётом понимается форматированное представление данных, выводимое на экран, принтер или в файл.

Вызов редактора отчётов из командной строки с целью создания нового отчёта:

56

create report <имя отчёта>. При этом создаётся файл <имя отчёта>.frx. На экране появляется окно Report Designer и панель инструментов Report Controls. Редактирование отчёта: modify

report <имя отчёта>.

Создание исполняемых модулей в FoxPro 6.

1. Создаём главную программу :

2.В окне Project Manager нажимаем кнопку Build и выбираем Build Executable:

3.Microsoft Access. Oбзор.

Microsoft Access – реляционная СУБД для персональных компьютеров. Наилучшим образом отвечает потребностям индивидуального использования или использования в рабочих группах для манипулирования данными, объем которых исчисляется несколькими мегабайтами. Для обеспечения многопользовательского доступа Access использует архитектуру "файл-сервер" вместо архитектуры "клиент-сервер". СУБД Access включена в версии пакета Microsoft Office Professional.

1. Возможности.

Ядро

1.Jet 4 - механизм обработки данных, принятый в Access по умолчанию.

2.MSDE (Microsoft Data Engine) использует технологию, применяемую в СУБД SQL Server 2000. Используя MSDE, пользователям Access обеспечивается возможность работать с

SQL Server и применять многие его функции.

Jet обеспечивает поддержку двухбайтового представления символов Unicode, позволяющего использовать символы нескольких национальных алфавитов. Чтобы компенсировать возрастающий объём памяти при использовании Unicode, применяется сжатие данных.

Jet проще в использовании и администрировании, чем MSDE, что обеспечивает ему преимущество при разработке новых и относительно простых приложений, от которых не требуется совместимости с SQL Server. Он не предъявляет высоких требований к оперативной памяти и объему жесткого диска и практически не нуждается в администраторе. Кроме того, Jet является механизмом, принятым в Access 2000 по умолчанию. Базы данных, созданные при использовании Jet, могут быть позднее перенесены под SQL Server с помощью мастера Upsizing Wizard, хотя не исключено, что при этом потребуется произвести некоторые дополнительные модификации.

MSDE имеет архитектуру "клиент-сервер", а Jet является механизмом обработки данных с архитектурой "файл-сервер". Большим преимуществом MSDE перед Jet является его процесс выполнения запросов и регистрации транзакций. Если во время записи в базу данных произойдет ошибка или сбой - ошибка обращения к диску, сбой сети или отключение питания - MSDE сможет восстановить базу, поскольку он ведет регистрацию транзакций. После того как система восстановит работоспособность, MSDE вернет базу к последнему согласованному состоянию.

57

Диалоговые средства конструирования объектов, программы-Мастера, технология

Drag and Drop, технология IntelliSence

без комментариев

Поддержка языка XML

С помощью интерфейса Microsoft Access можно легко создавать данные и структуры документов XML, используя структуры и данные Jet или SQL Server. Кроме того, в формах, отчетах и на страницах доступа к данным можно использовать данные XML из других приложений. Допустим, например, что нужные данные находятся в нескольких источниках — внутренних серверах SQL, электронных таблицах и других средствах доступа. Поскольку в этих источниках в качестве формата обмена данными используется XML, то в Microsoft Access можно создать набор статистических запросов для вставки этих данных в представления, а затем создавать формы и отчеты с помощью этих представлений.

Кроме того, Microsoft Access предоставляет методы удобного управления данными за счет упрощения создания и применения схем и таблиц стилей. Microsoft Access позволяет легко описывать и доставлять сложные, структурированные данные в или из любого приложения стандартным, совместимым способом. Например, с помощью Microsoft Access можно создать схему, которая описывает структуру данных, и отправить ее поставщикам, чтобы они точно знали, каким образом данные должны выводится в их счетах.

Поддержка расширенных свойств с помощью Microsoft SQL Server 2000

Встроенная интеграция Microsoft Access 2002 и Microsoft SQL Server 2000 значительно усовершенствована за счет включения расширенных свойств базы данных SQL в проект Microsoft Access. Применение расширенных свойств в проектах Microsoft Access 2002 сделало возможным использование таких средств как связи подстановок, условия на значения (также известные как ограничения), форматирование текста и подтаблицы. Расширенные свойства можно использовать в таблицах, представлениях, сохраненных процедурах точно так же, как в аналогичных объектах файлов данных Microsoft Access. Расширенные свойства упростили процедуру перемещения делового приложения из базы данных Microsoft Access в проект

Microsoft Access, подключенный к Microsoft SQL Server.

Прочие возможности

В Microsoft Access существуют два инструмента, помогающие усовершенствовать структуру базы данных Microsoft Access.

Мастер анализа таблиц позволяет проанализировать структуру таблицы, предложить подходящие новые структуры и связи, а также разделить таблицу на новые связанные таблицы, если это имеет смысл.

Анализатор быстродействия исследует всю базу данных и дает рекомендации по ее улучшению. Мастер может также выполнить эти рекомендации.

Только для Access 2000 характерна возможность использовать запросы в режиме запроса ANSI92 (Один из двух типов синтаксиса SQL. ANSI-89 SQL (который также называют Microsoft Jet SQL и ANSI SQL) представляет традиционный синтаксис SQL; ANSI-92 SQL содержит новые и измененные зарезервированные слова, правила синтаксиса и подстановочные знаки) без использования объектов доступа к данным ADO (ActiveX Data Objects – интерфейс доступа к данным, взаимодействующий с источниками данных, совместимыми с OLE DB, для

58

подключения, загрузки, обработки и обновления данных) в процедуре Microsoft Visual Basic в

базе данных Microsoft Access.

2. Объекты Microsoft Access.

База данных ( файл *.mdb), внутри которой могут находиться: Таблицы и связи между ними

Запросы (на выборку, на изменение, с параметрами, перекрёстные, на объединение, к серверу и др.)

Формы

Отчёты

Страницы доступа к данным (html, asp, idc/htx) Макросы (язык макрокоманд)

Модули. Модули представляют наборы описаний, инструкций и процедур, сохраненных под общим именем для организации программ на языке Microsoft Visual Basic. Существуют два основных типа модулей: модули класса и стандартные модули. Модули форм и модули отчетов являются модулями класса, связанными с определенной формой или отчетом. Они часто содержат процедуры обработки событий, запускаемые в ответ на событие в форме или отчете. Процедуры обработки событий используются для управления поведением формы или отчета и их откликом на события, такие как нажатие кнопки. В стандартных модулях содержатся общие процедуры, не связанные ни с каким объектом, а также часто используемые процедуры, которые могут быть запущены из любого окна базы данных. Основное различие между стандартным модулем и модулем класса, не связанным с конкретным объектом, заключается в области определения и времени жизни. Значение любой переменной или константы, определенной или существующей в модуле класса, не связанном с конкретным объектом, доступно только во время выполнения этой программы и только из этого объекта.

3. Средства программирования.

Макросом называют набор из одной или более макрокоманд, выполняющих определенные операции, такие как открытие форм или печать отчетов. Макросы могут быть полезны для автоматизации часто выполняемых задач. Макрос может быть как собственно макросом, состоящим из последовательности макрокоманд, так и группой макросов. В некоторых случаях для решения, должна ли в запущенном макросе выполняться определенная макрокоманда, может применяться условное выражение.

VBA (Visual Basic for Applications) в виде программ (подпрограмм) и модулей. В VBA

база данных рассматривается как совокупность объектов, имеющих свойства и методы, реализующие заранее определенные действия над объектами. Среда VBA объединяет разнообразные наглядные графические инструменты: редактор, окно разрабатываемого проекта, окно свойств объектов проекта, окно просмотра объектов, отладчик и др.

Макросы могут быть преобразованы в программы на VBA !!!

4. Спецификации Microsoft Access.

Размер файла базы данных Microsoft Access (.mdb)	2 Гбайт за вычетом места,
	необходимого системным объектам.
Число объектов в базе данных	32 768
Модули (включая формы и отчеты, свойство Наличие модуля	1 000
(HasModule) которых имеет значение True)
Число знаков в имени объекта	64
Число знаков в пароле	14
Число знаков в имени пользователя или имени группы	20

59

Число одновременно работающих пользователей		255
Число знаков в имени таблицы	64
Число знаков в имени поля	64
Число полей в таблице	255
Число открытых таблиц	2048 (фактическое число может быть меньше из-за
	внутренних таблиц, открываемых Microsoft Access)
Размер таблицы	2 Гбайт за вычетом места, необходимого системным
	объектам.
Число знаков в текстовом поле	255
Число знаков в поле MEMO	65 535 при вводе данных через интерфейс пользователя;
	1 Гбайт для хранения знаков при программном вводе данных.
Размер поля объекта OLE	1 Гбайт
Число индексов в таблице	32
Число полей в индексе	10
Число знаков в сообщении об ошибке	255
Число знаков в условии на значение	2 048
записи
Число знаков в описании таблицы или	255
поля
Число знаков в записи (кроме полей	2 000
MEMO и полей объектов OLE)
Число знаков в значении свойства поля	255
Число объектов в проекте Microsoft Access (.adp)		32 768
Модули (включая формы и отчеты, свойство Наличие модуля		1 000
(HasModule) которых имеет значение True)
Число знаков в имени объекта		64
		250 (Microsoft SQL Server 6.5)

Число столбцов в таблице

1024 (Microsoft SQL Server 7.0 и 2000)

5. Типы данных, которые могут иметь поля в Microsoft Access

1. Текстовый

Текст или комбинация текста и чисел, например, адреса, а также числа, не требующие вычислений, например, номера телефонов, инвентарные номера или почтовые индексы. Сохраняет до 255 знаков. Свойство Размер поля (FieldSize) определяет максимальное количество знаков, которые можно ввести в поле.

2. Поле МЕМО

Длинный текст или числа, например, примечания или описания. Сохраняет до 65 536 знаков.

3. Числовой

60