Разработка информационной системы "Продажа авиабилетов"

Макросы.

Макрокоманды, которые можно объединять в макросы, совершают разнообразные действия, выполнимые в СУБД Access, а с помощью параметров этим действиям можно придать гибкость, которой иначе можно добиться только путем кропотливого программирования. В Access имеется около пятидесяти макрокоманд. Для того чтобы создать макрос, вам обязательно нужно загрузить окно Конструктора макросов, которое состоит из двух частей (рис. 3.7.). Верхняя служит для ввода макрокоманд и представляет собой таблицу, имеющую от двух до четырех колонок, в зависимости от установленных параметров. В нижней части окна Конструктора макросов вводятся аргументы макроса. В зависимости от выбранной макрокоманды число аргументов динамически меняется. Напротив каждого аргумента имеется его описание. Справа отображается пояснение для рода и типа требуемого аргумента. Очень часто аргумент можно выбрать из раскрывающегося списка.

Для построения более сложных макросов, требующих выполнения определенных условий для запуска отдельных макрокоманд, необходимо добавить колонку Условия. После этого макрокоманды, находящиеся в одной строке с условием, будут выполняться, только если выражение условия будет истинным. Для того чтобы распространить действие условия на последующие строки, достаточно ввести многоточие (...) в колонке условия напротив соответствующих макрокоманд. С помощью Конструктора макросов можно создавать и меню, но все-таки более удобным средством является непосредственно Конструктор меню.

Защита и сохранность данных в Access.

Рассмотрим ситуацию. Вы работаете в Microsoft Access и накопили уже немало данных и программ. Все они хранятся, открыто, а злоумышленники, глупые шутники, просто любопытные только и мечтают добраться в ваше отсутствие до беззащитной информации. Что же делать? Каждый раз переписывать все на дискеты и уносить с собой? Но базы данных Access весьма объемисты, а зачастую их к тому же еще и много. Хранить данные в личной папке сетевого сервера? Но не всегда и не у всех она есть. И потом, остается еще сетевой администратор, которому доступно почти все.

Но не стоит поддаваться панике! Есть несколько способов закрыть данные на виртуальный замок -- правда, до их описания не всегда доходят руки у авторов книжек по Access «для чайников». Что ж, перестаньте, наконец, быть «чайником» и покажите злоумышленникам зубы!

Защита на скорую руку.

Самый простой способ защиты -- это установка пароля, или, как еще говорят, «запароливание» базы данных. В этом случае при каждом открытии файла Access будет спрашивать пароль, и если пользователь его не введет, не видать ему ваших данных, как своих ушей.

Чтобы запаролить базу данных Access , нужно открыть ее в режиме монопольного доступа (этот режим устанавливается в диалоговом окне открытия файла; если база не откроется, причина, скорее всего в том, что с ней работает кто-то еще по сети или вы сами в другом сеансе Access). Затем войти в меню «Сервис*Защита*Задать пароль базы данных» и в появившемся диалоговом окне вводится пароль в поле «Пароль» и повторите его в поле «Подтверждение» (рис. 3.8.). После этого нажмите кнопку «OK» и закройте базу данных. При следующей попытке ее открыть Access вежливо попросит ввести пароль.

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

Пароль -- простейший, но не самый надёжный способ самообороны в виртуальном мире. Сегодня уже известны несколько программ для взламывания запароленных баз данных Access. Но это всё же лучше, чем ничего. Естественно, не следует раздавать свой пароль направо и налево, а также оставлять базу данных открытой на компьютере, если нужно куда-то надолго уйти: в уже открытой базе сможет копаться любой, не вводя никакого пароля.

«Ну, хорошо, -- подумает «продвинутый» киберзлодей. -- Базу данных запаролили, пароль мне не дают, и уходя закрывают Access. Но не больно-то гордитесь! Я ее все-таки посмотрю. Увидишь, кто из нас круче...»

Каким же образом он сможет посмотреть сверхсекретную базу данных? Да очень просто: в текстовом редакторе.

Строковые данные хранятся в Access «как есть», т. е. в виде обычных строк. И их несложно прочитать, открыв базу данных без всякого пароля в любом текстовом редакторе, поддерживающем большие файлы. Правда, таким путем злодей получит не всю информацию, а только строковую, но и это достаточно неприятно.

Чтобы избежать чтения базы как текста, ее можно зашифровать, и тогда вместо внятных слов любопытный увидит невразумительную мешанину символов, раскодировать которую, насколько известно, пока никому не удавалось. Конечно, если зашифрованная база не запаролена, любой без труда откроет ее в Access, так что шифрование осмысленно использовать только вместе с паролем. Итак, приступаем к шифрованию. Запустите Access и войдите в меню «Сервис-Защита-Шифровать/дешифровать». На экране появится диалоговое окно открытия файла; выберите в нем нужную базу данных (она не должна быть открыта) и нажмите «OK». После этого на экране появится окно сохранения файла. Задайте в нем имя зашифрованной базы и нажмите кнопку «OK». Если исходная база данных зашифрована, Access определит это и дешифрует ее.

Рабочие группы.

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

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

Рабочей группой в Access называется группа пользователей, работающих с одной базой данных. Каждый пользователь в рабочей группе имеет свою учетную запись, в которой зафиксированы его имя, пароль и (дополнительный сюрприз от Microsoft) пользовательские настройки среды Access. Из пользователей могут формироваться подгруппы («группы» в интерактивной документации русской версии Access; мы будем пользоваться термином «подгруппа», чтобы избежать путаницы с «рабочей группой»). Каждая подгруппа также имеет свою учетную запись.

Права доступа к конкретным объектам базы данных присваиваются либо пользователям, либо целиком подгруппам и определяют, что разрешено данному пользователю (пользователям) делать с данным объектом. Например, можно указать, что пользователь «Директор» имеет право просматривать таблицу «Зарплата» и изменять в ней данные, пользователь «Бухгалтер» -- только просматривать, а пользователь «Склад» вообще не должен знать о ее существовании (набор прав для каждого типа объектов свой).

Учетные записи пользователей и подгрупп хранятся в специальном файле рабочей группы; он имеет расширение mdw. По умолчанию Access при установке создает в системной папке Windows файл System.mdw, содержащий учетные записи для пользователя Admin и подгрупп Admins и Users. При открытии Access по умолчанию используются установки учетной записи Admin. Информация о правах пользователей и подгрупп по отношению к тем или иным объектам баз данных хранится в файлах соответствующих баз.

· Обычная последовательность действий по созданию системы защиты на уровне пользователей следующая:

· создается новая рабочая группа;

· в нее вносятся учетные записи пользователей и подгрупп;

· подгруппам и пользователям присваиваются соответствующие права доступа к различным объектам базы данных;

· все пользователи защищаемой базы данных подключаются к созданной рабочей группе.

Однако, прежде всего следует разобраться, какие группы и с какими правами должны быть созданы. Для этого:

· выключить компьютер -- он на данном этапе не понадобится;

· с листом бумаги и ручкой обойти все отделы и выяснить, кто с какими данными работает и хотел бы работать;

· проконсультироваться у начальства, действительно ли всем нужны те полномочия, которые они запрашивают.

В результате получится своеобразный план построения системы защиты. Возможно, он будет выглядеть так: слева расположены названия отделов -- подгрупп, справа -- имена пользователей; связи пользователей с подгруппами показаны линиями. Главное, чтобы схема была понятна всем.

Новый файл рабочей группы мы создадим сразу на сервере, в папке общего доступа. Очевидно, вы должны быть подключены к сети и иметь права на создание файлов в этой папке.

Для формирования рабочих групп и подключения к ним служит утилита «Администратор рабочих групп MS Access»; при установке Access в папке Office (по умолчанию ”\Program files\Microsoft Office”) создается ее ярлык. Откройте эту папку, запустите утилиту и в появившемся окне нажмите кнопку «Создать...». На экране появится новое окно, в котором следует ввести данные владельца рабочей группы (по умолчанию подставляется ваше имя и название вашей организации) и ее код -- произвольную последовательность из не более чем 20 букв и цифр (рис. 3.9.). Далее нажать кнопку «OK».

После этого вам будет предложено задать имя файла вновь создаваемой рабочей группы и путь к нему. Путь должен указывать на выбранную папку общего доступа, а в качестве имени можно как оставить предложенное программой, так и выбрать любое другое (рис. 4.0.). Нажмите кнопку «OK» и в ответ на появившийся запрос подтвердите создание файла. Утилита создаст заданный файл, о чем выдаст сообщение, и автоматически подключит к нему Access.

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

Сейчас открыли базу с правами администратора рабочей группы. Теперь можно переходить к созданию учетных записей для подгрупп и пользователей.

Учетные записи.

Вновь созданная рабочая группа содержит учетные записи подгрупп Admins и Users и входящего в них пользователя Admin. Подгруппа Admins объединяет пользователей со специальными, так называемыми административными полномочиями: они могут просматривать и изменять права доступа пользователей к объектам базы; кроме того, в их ведении находятся репликация базы и изменение параметров ее запуска (заголовок, форма, открываемая при запуске, и т. д.). Нормально, чтобы этими полномочиями обладал только один человек; в любом случае не следует давать их кому попало. В подгруппу Users входят все пользователи базы.

Учетные записи всех прочих необходимых подгрупп и пользователей вам предстоит добавить. Как для пользователя, так и для подгруппы учетная запись должна иметь имя и код. Имя представляет собой строку длиной от 1 до 20 символов, причем символы `/', `\', `[`, `]', `:', `|', `<', `>', `+', `=', `;', `,', `?' и `*' не допускаются; длина кода -- от 4 до 20 символов.

Удобнее начинать с подгрупп. Нужно войдите в меню «Сервис*Защита*Пользователи и группы», в открывшемся окне выбрать закладку «Группы» и нажать кнопку «Создать...». На экране появится окно создания новой учетной записи; укажите в нем имя и код подгруппы, после чего нажмите кнопку «OK».

Определив, таким образом, все необходимые подгруппы, перейти на страницу «Пользователи», нажав опять же кнопку «Создать...» и в уже знакомом вам окне создания учетной записи задать имя и код пользователя. Затем указать подгруппы, в которые будет входить новый пользователь. Чтобы включить пользователя в подгруппу, нужно выделить ее название в списке «Имеющиеся группы» и нажать кнопку «Добавить», после чего оно появится в списке «Участие в группе». Повторите описанную процедуру для каждого пользователя.

Чтобы удалить пользователя из подгруппы, выделите название подгруппы в списке «Участие в группе» и нажмите кнопку «Удалить». Невозможно удалить пользователя из группы Users; кроме того, в группе Admins всегда должен быть хотя бы один пользователь.

Для удаления учетной записи нужно выбрать ее в списке пользователей или подгрупп на соответствующей странице, нажать кнопку «Удалить» и на запрос о подтверждении действия ответить «Да». Access не позволит вам удалить подгруппы Admins и Users, а также пользователя Admin. Единственный способ изменить учетную запись -- удалить ее, а затем создать заново.

Права доступа.

После материализации духов можно приступать к раздаче слонов -- прав доступа. Сначала загружается база данных, которую нужно защищать, и войти в меню «Сервис* Защита* Разрешения». На экране появится диалоговое окно «Разрешения», открытое на одноименной странице (рис.4.3.). Сначала включить кнопку «Группы», чтобы задать права доступа для целых подгрупп. Выделить первую подгруппу в списке. В комбинированном списке «Тип объекта» выбрать тип объектов, после чего в списке «Имя объекта» появятся имена объектов вашей базы, относящихся к этому типу. Выделить нужный объект и установить, как требуется, права доступа в наборе «Разрешения». Не забывать сделать это для вновь создаваемых объектов.

После каждого изменения прав доступа Access будет спрашивать, изменить ли их прямо сейчас, не дожидаясь нажатия кнопки «OK». Чтобы избежать такой назойливости, можно всякий раз нажимать кнопку «Применить». Нужно проделать это со всеми подгруппами, а затем, включить кнопку с зависимой фиксацией «Пользователи», -- с теми пользователями, которым необходимо назначить какие-либо особые права.

Незабыть обратить внимание на то, что права доступа для форм и отчетов не распространяются на таблицы или запросы, данные которых в них отображаются. Поэтому если пользователь «Чайник» имеет право только на чтение таблицы «Зарплата» и на открытие формы «Форма_зарплаты», где отображаются данные этой таблицы, то он сможет только просматривать их.

Если один пользователь входит в несколько подгрупп, его права, определенные в этих подгруппах, логически складываются друг с другом. Пусть, например, пользователь User1 принадлежит к подгруппам Group1 и Group2; пользователи из Group1 могут читать данные и макеты таблиц, а из Group2 -- читать и изменять данные таблиц. В таком случае User1 сможет читать макеты таблиц и читать и изменять их данные.

Казалось бы, теперь-то уж база данных защищена. Но если попробовать закрыть и снова открыть ее -- она откроется. В чем же дело? Оказывается, чтобы активизировать систему защиты, необходимо присвоить пароль пользователю Admin.

Нужно снова войти в меню «Сервис-Защита-Пользователи и группы» и в окне «Пользователи и группы» выбрать закладку «Изменение пароля».

Далее нужно ввести свой текущий пароль (в данный момент его нет, поэтому ничего не вводится), новый пароль и еще раз новый пароль для подтверждения. Длина пароля -- до 14 символов, причем регистр букв учитывается. После этого нажмите кнопку «OK» и обязательно закрыть Access.

Когда снова открыть Access, на экране появится диалоговое окно, в котором должны ввести какое-либо из зарегистрированных имен пользователей. Если это будет имя Admin, то придется также ввести пароль. Попробовать указать имя одного из обычных пользователей и поработать с базой данных --увидим, что все права доступа на самом деле действуют. Теперь при желании можно присвоить пароли другим пользователям, но для этого придется попотеть: для каждого пользователя нужно будет открыть базу данных под его именем и задать пароль в окне «Изменение пароля».

Осталось сконфигурировать Access на компьютерах пользователей, чтобы защита работала и там. Для этого придется обойти все машины фирмы и каждую связать с файлом рабочей группы (он доступен со всех машин, поскольку находится на сервере).

Связь устанавливается с помощью все той же утилиты «Администратор рабочих групп». Запустить ее, нажав кнопку «Связь...», в появившемся окне указать путь к файлу рабочей группы и нажмите кнопку «OK» (рис. 4.5.). Утилита откроет файл рабочей группы и выдаст соответствующее сообщение. Теперь Access на этой машине при запуске будет запрашивать имя пользователя.

Все! Система защиты на уровне пользователей построена. Чего же фактически добились? Главное -- точно определили, кто с какими объектами имеет право работать и что конкретно может с ними делать. Пользователи больше не сумеют изменить или повредить конфиденциальные данные, а злоумышленники отныне обречены, кусать локти от досады. Кроме того, никто не изменит код программы, а значит, авторские права тоже надежно защищены. Правда, на достижение этого результата было потрачено немало сил, и защита не распространяется на отчуждаемые, «коробочные» прикладные системы.

Наверное, можно думать, что уже надежно защитили базу данных. Ан нет! Достаточно «продвинутый» пользователь запустит «Администратора рабочих групп», создаст новый файл рабочей группы, привяжется к нему (более того, программа выполнит привязку автоматически!) и со злобной ухмылкой откроет базу, не введя ни имени, ни пароля.

Действительно, утилита создаст в новом файле рабочей группы пользователя Admin, а Access после подключения к новой, «пустой», рабочей группе откроет базу данных для этого пользователя. И если вы определили для него неограниченные права, то он их и получит.

Самое забавное в том, что пользователя Admin удалить нельзя. Однако можно предоставить ему минимальные права доступа к базе данных и удалить его из группы Admins. Так вы устраните ещё одну лазейку в защите. Но не последнюю!

Дело в том, что пользователь Admin в заново созданном файле рабочей группы по умолчанию попадает в подгруппу Admins, а значит, сможет установить себе любые права доступа к чему угодно. «Красивого» пути решения этой проблемы, насколько мне известно, нет. Остается только удалить с рабочих станций программу администратора рабочих групп (она находится в папке Windows/System и называется Wrkgadm. exe; именно на неё и указывает ярлык в папке Office) и средствами сети закрыть от записи файл рабочей группы на сервере.

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

Владелец объекта.

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

Выбрать в соответствующих списках нужный тип объекта, и затем сам объект, включить кнопку «Пользователи» или «Группы» в зависимости от того, требуется ли сделать владельцем объекта пользователя или сразу подгруппу (имейте в виду, что владельцем самой базы данных может быть только пользователь), задать нового владельца в списке «Новый владелец» и нажмите кнопку «Сменить владельца».

Access позволяет сделать так, чтобы все пользователи автоматически получали права владельца на вновь созданные запросы (права будут распространяться на данные, но не на макет). Для этого нужно открыть окно параметров (меню «Сервис*Параметры...») и на странице «Таблицы/запросы» включите в поле «При запуске предоставляются права» кнопку «Владельца».

Когда включена радиокнопка «Пользователя», защита работает обычным образом.

Чтобы выдать всем пользователям права владельца на уже существующий запрос, нужно запустить для него конструктор запросов (выбрав в окне базы данных закладку «Запросы», отметить нужный запрос и нажмите кнопку «Конструктор»). Затем щелкнуть правой кнопкой мыши в верхней половине окна, где отображаются входящие в запрос таблицы (но не на самих таблицах). Выбрать в контекстном меню пункт «Свойства...» и в списке свойств запроса изменить значение свойства «При запуске предоставляются права». После этого закрыть окно списка свойств и окно конструктора, сохранив макет.

Мастер защиты.

Для облегчения работы по ущемлению прав пользователей в Access включен Мастер защиты, однако довольно примитивный. Единственное, на что он способен, -- это создать новую, защищенную базу данных, чьи объекты имеют ограничения на доступ со стороны пользователей из группы Users. Задаются типы объектов, к которым следует ограничить доступ, и имя базы, а Мастер делает свое дело.

Для создания сколько-нибудь развитой системы защиты Мастер подходит плохо. Но если вы все-таки решили отдаться на его милость, главное не делать владельцем новой базы пользователя Admin. Если у нет другого пользователя с административными полномочиями, нужно создать его, а затем удалить пользователя Admin из подгруппы Admins и перезапустить Access для нового пользователя-администратора. Теперь можно войти в меню «Сервис-Защита-Мастер...» и следовать указаниям Мастера.

Вот и все. Теперь я знаю, как защитить базу данных Access от недозволенного доступа. Я могу создать защиту двух уровней: простую, без разграничения прав пользователей, и сложную, разветвленную, не написав при этом ни строчки кода и не привлекая дополнительных программных продуктов. Тем самым я лишний раз убедились в том, что Access таит в себе немало продвинутых возможностей, о которых не говорится в книжках для «чайников».

Конечно, в мире нет ничего идеального, и система защиты Access не является исключением: в ней хватает «дыр», которые нелегко будет заткнуть. Но ведь Access и не предназначается для построения высокозащищённых систем -- для этого существуют SQL-серверы. Не стоит ожидать слишком многого от настольных СУБД, но и не стоит их недооценивать.

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

Кардинальным выходом остается шифрование данных, но при этом надо менять всю систему управления и отказываться от реляционной модели. Что, по-моему, совершенно недопустимо. Кстати, от возможных потерь информации (например, преднамеренного удаления) шифрование также не может защитить.

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

По статистике в 9 случаях из 10 не требуется глобальная система защиты приложений от «хакерских» атак. Кроме того, убытки от неверных действий пользователей с санкционированным доступом могут быть даже выше, так как приводят к скрытым ошибкам. Тем не менее, обеспечить минимально необходимый уровень защиты данных, безусловно, необходимо. Далее приведен перечень действий для обеспечения такого уровня безопасности:

· Настройка опций запуска («защита от Shift»).

· Настройка прав на объекты на уровне сервера и/или файла рабочих групп.

· Обеспечение входа в приложение только с указанием пароля.

· Подключение при входе и отключение при выходе линкованных таблиц в проектах MDB/MDE.

· Настройка автоматических процедур резервного копирования данных на сервере.

· Ведение журналов изменения критических данных.

· Рекомендуется создавать отдельный файл рабочей группы (первоначально скопировав system.mdw), затем запускать приложение через использование опции командой строки «/wrkgrp».

1.5 Visual Basic как средство разработка информационной системы

Visual Basic является универсальным средством программирования.

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

При запуске Visual Basic вы сразу попадаете в режим разработки и по умолчанию открывается новый проект с готовой к созданию формой. Опишем кратко назначение команд в главном меню Visual Basic. Меню File является достаточно стандартным для всех средств разработки Microsoft и содержит команды, предназначенные для работы с файлами:

New Project - создание нового проекта. В Visual Basic 4.0 одновременно можно работать только с одним проектом. Если вы очень хотите работать сразу с несколькими проектами - запустите еще одну копию Visual Basic.

Open Project - открытие существующего проекта.

Save File - сохранение файла формы или программного модуля.

Save File As - сохранение файла формы или программного модуля с другим именем.

Save Project - сохранение файлов проекта.

Save Project As - сохранение файлов проекта с другим именем.

Add File - добавление в проект уже существующего файла формы, программного модуля, класса или ресурса.

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

Print Setup - вызов диалогового окна установки принтера.

Print - печать файлов проекта.

Make EXE File - создание (компиляция) из файлов проекта исполняемого модуля в виде файла EXE.

Make OLE DLL File - создание (компиляция) из файлов проекта динамической библиотеки Windows в виде файла DLL.

Меню Edit содержит стандартные команды, позволяющие редактировать содержимое формы и текст программы, а также выравнивать в форме элементы управления.

Меню View предназначено для быстрого перехода или вывода на экран различных окон программной оболочки. Две команды этого меню позволяют более эффективно работать с большими программами:

Procedure Definition - позволяет быстро переместиться к коду вызываемой процедуры, если курсор находится на ее имени.

Last Position - обеспечивает перемещение курсора в точку последнего изменения программного кода. Поддерживается до четырех «возвратов». Меню Insert предназначено для вставки в проект новых компонентов (процедуры, формы, модуля класса и т. п.).

Меню Run служит для выполнения программы:

Start - запускает программу на выполнение.

Start With Full Compile - запускает программу на выполнение с предварительной перекомпиляцией всех файлов проекта.

End - прерывает выполнение программы в случае неверного результата.

Restart - возобновляет прерванную работу программы.

Step Into - показывает выполнение последовательно всех строк кода.

Step Over - показывает выполнение кода только данной процедуры.

Step To Cursor - выполняет без вывода на экран часть кода до строки, на которой находится курсор.

Toggle Breakepoint - устанавливает или снимает точку, в которой выполнение программы прерывается.

Clear All Breakepoints - снимает все точки прерывания работы программы.

Set Next Statement - устанавливает строку в программном коде, которая будет выполняться следующей.

Show Next Statement - устанавливает курсор на строку, которая будет выполняться следующей.

Меню Tools включает доступ к дополнительным средствам разработчика:

Add Watch - позволяет показать значение переменной в окне отладчика во время выполнения программы.

Edit Watch - позволяет редактировать значение переменной во время выполнения программы.

Instant Watch - позволяет вывести значение переменной, которое она имеет в данный момент.

Calls - представляет список всех незавершенных процедур.

Menu Editor - вызывает утилиту построения пользовательского меню.

Custom Controls - подключает к проекту дополнительные компоненты VBX и ActiveX.

References - позволяет установить ссылку на внешние объекты.

Get - копирует версию проекта из программы контроля версий и управления групповой разработкой проекта (MS Visual SourceSafe 4.0) в рабочую папку с атрибутом только для чтения.

Check Out - копирует выделенные файлы проекта из программы контроля версий в рабочую папку с атрибутом чтение/запись.

Check In - обновляет версию проекта в программе контроля версий.

Undo Check Out - прерывает команду Check Out, отменяя все сделанные изменения.

Options - выводит на экран диалоговое окно настройки параметров среды разработки.

Меню Add-In служит для расширения среды разработчика. Стандартно в него входят команды для вызова:

Data Mananger - утилита для интерактивной работы с данными.

Add-In Manager - включение дополнительных средств разработчика.

Меню Help предназначено для вызова контекстной помощи и справочной информации о Visual Basic.

В приложении Visual Basic могут присутствовать файлы, типы которых приведены в табл. 3.

Таблица 3. Типы основных файлов в Visual Basic

Тип файла	Расширение файла
Пользовательское приложение, включающее в себя все необходимые компоненты	EXE
База данных	MDB
Отчет	RPT
Готовые компоненты и элементы управления OLE (ActiveX)	OCX (VBX)
Проект	VBP
Форма	FRM
Двоичный код для формы	FRX
Программа	BAS
Файл ресурсов	RES
Модуль классов	CLS

Основные возможности Visual Basic, применимые в разработке приложений для обработки информации, могут быть реализованы благодаря наличию в нем объектов для доступа к данным - Data Access Object (DAO), 32-разрядного процессора данных - JET 3.0 и предназначенных специально для работы с данными элементов управления.

Процессор данных в Visual Basic поддерживает все стандартные операции по созданию, изменению и удалению таблиц, индексов и запросов. Формат БД процессора данных Visual Basic соответствует формату Access. JET 3.0 также обеспечивает поддержку целостности и проверку вводимых и изменяемых данных на уровне полей и записей. Для изменения данных JET 3.0 позволяет использовать язык SQL, который, правда, не соответствует на 100 процентов стандарту ANSI.

Управление базой данных обеспечивается процессором данных с помощью объектов для доступа к данным. Эти объекты позволяют разработчику программным путем, с помощью соответствующих свойств и методов DAO, как манипулировать данными, так и управлять структурой БД, включая ее создание. По сравнению с предыдущей версией Visual Basic возможности объектов для доступа к данным теперь существенно расширены. Вы можете использовать для работы с данными несколько рабочих областей, поддерживать целостность данных, включая каскадное удаление и обновление, и обеспечивать их защиту от несанкционированного доступа. Существенно сократить программный код позволяет использование коллекций.

Уникальным свойством JET 3.0 является возможность создания копий данных (репликации БД). Для создания копии БД разработчику достаточно воспользоваться методом MakeReplica. При задании метода Synchronize выполняется согласование данных в обновляемой и оригинальной БД. Причем эти операции могут выполняться как с файлами формата БД процессора данных, так и с БД других форматов, поддерживаемых через ODBC. Нельзя не отметить, что JET 3.0 использует индексы новой, более компактной структуры, позволяющие уменьшить время их создания и ускорить процесс поиска данных.

В Visual Basic Enterprice Edition включены объекты для доступа к внешним данным - Remote Data Object (RDO) и соответствующие элементы управления - Remote Data Control (RDC). Это позволяет, не прибегая к помощи процессора данных JET 3.0, использовать все возможности работы с курсорами на сервере, достигая максимально возможной скорости доступа к данным и минимизируя сетевой трафик.

Visual Basic for Applications. VBA в Access.

VBA ( Visual Basic for Applications) -- это диалект языка Visual Basic, расширяющий возможности Visual Basic и предназначенный для работы с приложениями Microsoft Office и другими приложениями от Microsoft и третьих фирм.

В принципе, как это не удивительно, при программировании в Office можно вполне обойтись без языка VBA. Подойдет любой COM-совместимый язык, например, обычный Visual Basic, VBScript, JScript, C++, Delphi, Java и т.п. Можно использовать и .NET-совместимые языки программирования -- VB.NET, C# и т.п. Все возможности объектных моделей приложений Office вполне можно будет использовать. Например, если сохранить следующий код в файле с расширением *.vbs и запустить его на выполнение, то будет запущен Word, в нем открыт новый документ и впечатан текст:

Dim oWord

Set oWord = CreateObject("Word.Application")

oWord.Visible = true

oWord.Documents.Add

oWord.Selection.TypeText ("Привет от VBScript")

Однако VBA обычно -- самый удобный язык для работы с приложениями Office. Главная причина проста -- язык VBA встроен в приложения Office (и не только), и код на языке VBA можно хранить внутри документов приложений Office -- документах Word, книгах Excel, презентациях PowerPoint и т.п. Конечно же, этот код можно запускать оттуда на выполнение, поскольку среда выполнения кода VBA (на программистском сленге -- хост) встроена внутрь этих приложений.

В настоящее время VBA встроен:

· во все главные приложения MS Office -- Word, Excel, Access, PowerPoint, Outlook, FrontPage, InfoPath;

· в другие приложения Microsoft, например, Visio и M icrosoft Project;

· в более чем 100 приложений третьих фирм, например, CorelDraw и CorelWordPerfect Office 2000, AutoCAD и т.п.

У VBA есть также множество других преимуществ:

VBA -- универсальный язык. Освоив его, можно не только получите ключ ко всем возможностям приложений Office и других, перечисленных выше, но и будете готовы к тому, чтобы:

· создавать полноценные приложения на Visual Basic (поскольку эти языки -- близкие родственники);

· использовать все возможности языка VBScript (это -- вообще урезанный VBA). В результате в вашем распоряжении будут универсальные средства для создания скриптов администрирования Windows (об этом -- в конце курса), для создания Web-страниц (VBScript в Internet Explorer), для создания Web-приложений ASP, для применения в пакетах DTS и заданиях на MS SQL Server, для создания серверных скриптов Exchange Server и многое-многое другое.

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

При создании приложений на VBA вам, скорее всего, не придется заботиться об установке и настройке специальной среды программирования и наличии нужных библиотек на компьютере пользователя -- MS Office есть практически на любом компьютере.

Несмотря на то, что часто приложения VBA выполняются медленнее, чем бы хотелось, они нересурсоемки и очень хорошо работают, например, на сервере терминалов. Но, как правило, для программ на VBA особых требований про производительности и нет: для написания игр, драйверов, серверных продуктов они не используется. По моему опыту, чаще всего проблемы с производительностью VBA-приложений -- это не проблемы VBA, а проблемы баз данных, к которым они обращаются. Если проблемы действительно в VBA (обычно тогда, когда требуется сложная математика), то всегда есть возможность написать важный код на C++ и обращаться к нему как к обычной библиотеке DLL или встраиваемому приложению (Add-In) для Word, Excel, Access и т.п.

Программы на VBA по умолчанию не компилируются и поэтому вносить в них исправления очень удобно. Не нужно разыскивать исходные коды и перекомпилировать программы.

В среде программистов-профессионалов считается, что самый короткий путь "с нуля" и программ типа "Hello, World" до профессиональных программ, которые делаются под заказ -- именно через связку Office- VBA (а конечно, не через C++, Java или Delphi).

1.6 Visual Basic for Applications в Access

Программирование в Access сильно отличается от программирования в Word, Excel и других приложениях Office. Главное принципиальное отличие заключается в том, что Word, Excel, PowerPoint, Project и т.п. предназначены прежде всего для непосредственной работы с ними пользователя, без какой-либо доработки со стороны разработчиков предприятия. Access иногда также используется как конечное приложение пользователями, но чаще он все-таки применяется как платформа для создания своих приложений разработчиками.

Второе отличие заключается в том, что в Access встроено свое собственное ядро для работы с данными. Фактически Access -- это полноценная система управления базами данных, поэтому для полного использования его возможностей необходимы знания о принципах работы с базами данных: что такое таблицы и отношения между таблицами (система ключей), что такое нормализация данных, типы данных и ограничения целостности и т.п. Очень часто пользователи на предприятиях такими знаниями не обладают.

Кроме того, существуют разные варианты использования Access с точки зрения архитектуры приложения. Иногда Access (файл MDB) используется просто как ядро, которое управляет данными, находящимися с таблицами. Пользователи работают с этими данными через внешние приложения, созданные разработчиками, например, на Visual Basic, Delphi или C++. В других ситуациях Access, наоборот, используется только для предоставления пользовательского интерфейса для работы с данными, которые физически расположены на серверах баз данных, например, SQL Server, Oracle, IBM D2 и т.п.

В Access предусмотрен встроенный язык запросов JET SQL, который активно используется разработчиками для работы с данными в базах данных Access.

Подводя итоги, можно сказать, что программирование средствами VBA в Access, которое будет рассмотрено в этой главе -- это лишь малая часть возможностей Access. Очень многие возможности работы с Access (например, его язык запросов или проектирование и создание таблиц) останутся за пределами этой книги. По этим возможностям существует отдельная литература. Заметим, что во многих книгах по Access за рамками остается как раз язык VBA и объектная модель самого Access, так что эта глава может послужить дополнением к ним.

Какие задачи на предприятии чаще всего решаются средствами автоматизации в Access?

Сразу можно сказать, что поскольку Access -- это система управления базами данных, то он очень часто используется как контейнер для хранения данных. Данные при этом могут быть самыми разными, например, обычные данные о заключенных договорах или клиентах нашего предприятия, или цифровые фотографии, или шаблоны Word или Excel, которые используются для генерации отчетов из баз данных. То, что в Access все это вместе с графическим интерфейсом можно "упаковать" в один файл MDB, позволяет сделать приложение очень компактным и удобным для переноса с компьютера на компьютер.

Еще одно важное назначение Access -- обеспечение клиентского интерфейса для работы с данными, которые хранятся на мощных клиент-серверных системах, таких, как MS SQL Server, Oracle, IBM DB2. Согласно достаточно условной градации от Microsoft рекомендуется использовать настольные системы (такие, как Access, FoxPro, Paradox и т.п.), если к данным одновременно будут обращаться не более 10 пользователей. Если пользователей может быть больше (или, к примеру, самих данных будет очень много -- гигабайты), то рекомендуется использовать более сложные, но и более функциональные клиент-серверные системы. А уже в рамках обеспечения доступа к данным (на клиент-серверных системах или прямо в базах данных Access) решаются более узкоспециализированные задачи приложений:

· создание обычных форм -- программных интерфейсов для занесения/изменения/просмотра данных в базе данных и Web-форм (они называются страницами доступа к данным);

· создание отчетов к базам данных, в том числе параметризованных;

· создание программной логики приложения обычным способом -- на VBA (модули) и для начинающих пользователей -- макросы (макросы всегда можно преобразовать в модули);

· вспомогательные действия -- печать, экспорт и преобразование данных (хотя для преобразования данных обычно удобнее использовать объектную модель DTS), загрузка данных, репликация и т.п.

Объект Application , его свойства и методы.

Объектная модель Access по своей архитектуре сильно отличается от объектных моделей Word и Excel. Возможно, это объясняется тем, что Access -- не "родной", как Word и Excel, а приобретенный продукт третьей фирмы.

Один из немногих моментов, в котором программирование в Access похоже на программирование в Word и Excel -- это наличие объекта Application, который находится на вершине иерархии объектной модели Access. Он точно так же может использоваться для программного запуска Access из других приложений, и его свойства и методы доступны из любой части кода. Запуск Access из другого приложения может выглядеть так:

Dim appAccess As Object

Set appAccess = CreateObject("Access.Application")

appAccess.Visible = True

MsgBox appAccess.Name

Если не поставить свойство Visible в True, то по умолчанию Access откроется в невидимом окне (увидеть его можно будет только в списке процессов в Task Manager). Если запустить такой код из процедуры Word или Excel, то по умолчанию по завершении работы этой процедуры объект будет удален из оперативной памяти (поэтому здесь и поставлено окно сообщения, чтобы этот процесс задержать).

Можно программно запускать Access еще множеством разных способов -- через объектную модель Windows Explorer, через командный интерпретатор операционной системы (в этом случае можно использовать интересные параметры командной строки Access), через текстовый ярлык *.mad, через API и т.п.

На практике программным образом запускать Access приходится достаточно редко -- поскольку обычно удобнее всего оболочку приложения, запускающего Word, Excel и т.п. делать именно в Access. Открывать Access для доступа к данным базы данных в файле MDB не рекомендуется -- для этой цели лучше использовать объекты ADO, более простые и удобные и менее ресурсоемкие.

Теперь -- о свойствах и методах объекта Application. Как можно убедиться, их набор в Access мало похож на соответствующий набор в Word и Excel. Вначале -- о наиболее важных свойствах:

· AutomationSecurity -- позволяет определить уровень безопасности при открытии базы данных. По умолчанию используется значение msoAutomationSecurityByUI -- использовать то, что настроено на графическом экране через меню Макрос -> Безопасность. Можно вообще запретить открытие файлов баз данных с макросами ( msoAutomationSecurityForceDisable), но чаще используется значение msoAutomationSecurityLow, которое позволяет открыть файл данных без лишних вопросов;

· BrokenReference -- возможность проверить, есть ли разорванные ссылки (когда ваше приложение не может найти модуль dll или другую базу данных). Наличие конкретной ссылки можно проверить при помощи объекта Reference;

· CodeContextObject -- очень полезное свойство, которое позволяет определить, из какого объекта базы данных (формы, отчета и т.п.) был запущен модуль/макрос. Это свойство можно, например, использовать для обнаружения источника ошибок;

· CodeData -- еще одно важнейшее свойство. Оно позволяет получить доступ к коллекциям AllDatabaseDiagrams, AllFunctions, AllQueries, AllStoredProcedures, AllTables и AllViews. Правда, в этих коллекциях находятся одни и те же объекты AccessObject. Возможностей у них на первый взгляд не так много, но на самом деле при помощи этого объекта мы получаем возможность настраивать десятки свойств для таблиц, запросов, диаграмм и других объектов базы данных Excel. Пример применения свойства CodeData для получения информации о всех таблицах в базе данных может выглядеть так:

For Each oTable In CodeData.AllTables

Debug.Print oTable.Name

Next

· CodeProject -- используется для тех же целей , что и CodeData , но предоставляет доступ к коллекциям программных модулей AllForms, AllReports, AllMacros, AllModules и AllDataAccessPages.

· свойство CommandBars возвращает коллекцию объектов CommandBar -- то есть панелей инструментов Access. Эту коллекцию можно использовать для настройки пользовательского интерфейса приложения, построенного на основе Access.

· CurrentData действует аналогично CodeData и CodeProject. Это свойство позволяет получать доступ к тем же коллекциям, включая полученные с внешнего источника данных (SQL Server). Аналогично работает свойство CurrentProject.

· свойства CurrentObjectName и CurrentObjectType позволяют определить, какой объект на момент запуска процедуры находился в фокусе (из какого объекта был вызван данный код). Эти свойства, конечно, удобно использовать для проверок, когда один и тот же код может быть вызван разными способами. При этом свойство CurrentObjectType ведет себя несколько неожиданно. Оно возвращает значение из перечисления в обычных ситуациях, но если вызвавшего объекта уже нет (объектная ссылка установлена в Nothing) или информацию о нем получить не удалось, это свойство почему-то возвращает True.

· свойство DataAccessPages позволяет получить ссылку на одноименную коллекцию, в которой находятся объекты всех Web-форм базы данных (они называются страницами доступа к данным) -- объектов DataAccessPage.

· свойство DBEngine позволяет получить ссылку на объект DBEngine, при помощи которого можно просмотреть или настроить свойства ядра Jet, на котором работает Access. Например, при помощи этого свойства можно сжать базу данных, настроить для нее пароль, определить используемую кодировку и т.п.

· свойство DoCmd позволяет получить доступ к еще одному очень важному объекту -- DoCmd, при помощи которого можно выполнить множество важных операций. Фактически этот объект -- основная "рабочая лошадка" Access с точки зрения VBA. Он будет рассмотрен в отдельном разделе. Сам объект DoCmd создавать нет необходимости -- он и так всегда доступен через свойство объекта Application, например:

Application.DoCmd.RunSQL "Delete from table1"

· свойство Forms позволяет вернуть ссылку на коллекцию объектов Form. От уже рассмотренной коллекции AllForms эта коллекция отличается двумя моментами:

- в ней находятся только открытые в настоящий момент формы;

- в ней находятся не объекты AccessObject, а объекты Form с гораздо богатым набором свойств и методов.

· свойство MenuBar позволяет не совсем стандартным образом настроить пользовательское меню (уровня всего приложения, если для формы предусмотрено свое меню, оно будет иметь приоритет), вернуться к показу встроенного меню или вообще отключить показ меню. Для нестандартной работы с контекстным меню предусмотрено свойство ShortcutMenuBar.

· свойство Modules действует аналогично свойству Forms. Оно позволяет получить доступ к одноименной коллекции с объектами Module, представляющими стандартные модули и модули классов. У объектов Module намного больше свойств и методов, чем у объекта AccessObject;

· свойства Printers и Printer возвращают все установленные в системе принтеры и принтер по умолчанию соответственно. При помощи объекта Printer можно настроить множество свойств принтера, которые будут использоваться при печати.

· свойство References позволяет получить ссылку на коллекцию объектов Reference (ссылки на библиотеки типов). Можно использовать для проверки работоспособности ссылок или для добавления ссылок программным способом.

· свойство Reports работает аналогично свойствам Forms и Modules, позволяя получить доступ к коллекции объектов Report.

· Screen -- это свойство позволяет получить доступ к специальному объекту Screen, при помощи которого можно получить доступ к активным элементам Access -- формам, отчетам, элементам управления и т.п. (В Word и Excel свойства Active… встроены непосредственно в объект Application). При помощи этого объекта можно также изменить вид курсора мыши и вернуться к предыдущему элементу управления.

· свойство UserControl позволяет определить, как именно был запущен Access -- вручную пользователем или программным способом из другого приложения (в зависимости от этого, к примеру, можно решить, закрывать Access автоматически или положиться на пользователя).

· свойство Version позволяет вернуть версию Access (например, для дополнительных проверок работоспособности приложений). Для Access 2003 эта версия -- 11.0.

· свойство Visible позволяет сделать Access видимым для пользователя (или наоборот, спрятать). По умолчанию Accesss, запущенный программным способом, невидим для пользователя, и для этого свойства необходимо установить True.

Методов у объекта Application также очень много (плюс часть методов достаточно искусственно перенесена в объект DoCmd). Ниже представлены самые важные из них:

· AccessError() -- очень важное свойство для обработки ошибок. Оно позволяет получить описание тех ошибок, для которых стандартное Err.Description возвращает "Application-defined or object-defined error" -- ошибок библиотек Access и DAO.

· метод BuildCriteria() позволяет очень быстро и удобно сконструировать критерий отбора записей, который может применяться в SQL-запросах, фильтрах для формы и отчетов, и т.п. Возвращает правильно сконструированное строковое значение.

· CloseCurrentDatabase() -- возможность закрыть текущую базу данных без закрытия Access. Обычно применяется для того, чтобы затем открыть следующую базу данных без запуска нового экземпляра Access.

· CodeDb() -- возвращает объект DAO.Database, представляющий базу данных, в которой в настоящее время выполняется код (обычно используется, когда у вас есть специальная библиотечная база данных с программными модулями, выполняющими различные операции с другими базами данных). Ссылку на такой же объект для текущей базы данных можно получить при помощи метода CurrentDb().

· CompactRepair() -- возможность сжать/починить базу данных Access и вернуть код ошибки (можно также записать протокол). Сжимаемая/ремонтируемая база данных должна быть в настоящий момент закрыта.

· ConvertAccessProject() -- возможность выполнить еще одну служебную операцию, на этот раз по преобразованию версии базы данных Access. Возможны варианты от acFileFormatAccess2 до acFileFormatAccess2002.

· метод CreateAccessProject() позволяет программным образом создать проект Access (программный интерфейс для доступа к SQL Server). Для того, чтобы его сразу создать и открыть, можно использовать метод NewAccessProject(), а чтобы просто открыть существующий -- OpenAccessProject().

· CreateAdditionalData() -- возможность создать объект AdditionalData, который можно использовать вместе с методом ExportXML() при экспорте родительской таблицы в файл XML. Применение этого объекта позволяет экспортировать набор таблиц.

...