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

Internet и почтовые ящики добропорядочных граждан лавиной электронного мусора, причиняя тем самым немалый материальный и

моральный ущерб.

Новая система безопасности Outlook 2002 препятствует доступу VBA-

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

Листин .10. Пример процедуры автоматической рассылки почтовых сообщений

2 3 4 5 6 7 8 9 10 : 11:: :

13 :

Sub MailEveryone( )

Dim Outlook As New Outlook.Application

Dim Folder As MAPlFolder

Set Folder = Outlook.GetNameSpace( MAPI .GetDefaultFolder(,olFolderContacts Dim Contact As Variant

Dim Mailltem As Mailltem

For Each Contact In Folder.Items

Set Mailltem = Outlook.Createltem( olMailltem

Mailltem. To = Contact. Fu 1 INap

Mailltem.Subject = Тест массовой рассылки

Mailltem.Body = Тестовое сообщение

Mailltem.Send

Next

15:End Sub

Код листинга 10 предполагает просмотр адресной книги и автоматическую отправку каждому зарегистрированному в ней абоненту тестового сообщения. Минимальный набор действий таков: следует создать объект сообщения (строка 9) и указать в нем адрес получателя (строка 10). Если этим ограничиться, адресаты получат пустые сообщения. Команды строк И и 12 позволяют указать тему сообщения и наполнить его реальным содержанием. Метод Send, вызываемый в строке 13, выполняет отправку сообщения по назначению.

Резюме

Неужели? Да-да, это правда. Вы одержали победу - примите поздравления! Приобретенный опыт дался вам, смеем надеяться, относительно легко - пустившись в свободное плавание на свой страх и риск, вы затратили бы гораздо больше времени и усилий.

Главная цель этого занятия состояла в том, чтобы продемонстрировать вам всю мощь Access, VBA и объектно-ориентированного подхода в целом. Для вас наверняка не был новым тот факт, что приложения Microsoft Office XP могут осуществлять взаимный обмен информацией - теперь же вы узнали о способах коллективного доступа к объектам на программном уровне. Outlook - мощное самостоятельное приложение, и, разумеется, совершенно невозможно втиснуть исчерпывающее описание лежащей

в его основе объектной модели в тесные рамки одной-единственной главы. Поэтому автор уделил внимание особенно важным вопросам.

Столкнувшись с задачей управления данными, имеющими отношение к электронной почте, смело обращайтесь к функциям Outlook - вряд ли имеет смысл изобретать что-то новое.

Теперь, по завершении последнего занятия, вы можете создавать и использовать объекты - и это самое главное. В данном случае неважно, идет речь об объектах Access, Outlook или каких-либо других. Каждый объект содержит методы и свойства -

достаточно научиться правильно их применять.

Благодарю вас за приятное общество. Позвольте напоследок еще раз воспользоваться правом автора и попросить вас все-таки дочитать главу до конца.

Вопросы и ответы

Вопрос. Можно ли программировать на яз1ке VBA непосредственно в среде Outlook?

Ответ. Да, конечно. Хотя наша книга не об этом, тот же Visual Basic for Application,

уже знакомый вам по Access, поддерживается в Outlook, Word, Excel, PowerPoint и

FrontPage. Чтобы приобщиться к таинствам программирования в среде любого из этих

приложений, вам потребуется приобрести и изучить соответствующую литературу, поскольку имеют место различия как в структурах моделей объектов, так и в способах их

использования.

Вопрос. Можно ли в среде Outlook создавать форм1?

Ответ. Да. Инструментальная среда Outlook достаточно богата - для подробного

освещения всех ее возможностей одной главы, подобной этой, явно недостаточно.

Задания

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

Тесты

1. Как называется объект верхнего уровня, предоставляющий средства доступа к папкам Outlook?

2. Какая из разновидностей (пока единственная) объектов существует в настоящее время?

3. Назовите тип универсального объекта для хранения коллекций сообщений всех видов.

4. Как называется метод, позволяющий перемещать документы Outlook из одной папки (коллекции) в другую?

5. Каково наименование объекта для хранения отдельных почтовых сообщений?

Упражнения

1. Напишите фрагмент кода, позволяющий создать новый объект типа

2. Сохраните созданный объект Journalltem в папке Outlook.

3. Укажите выражение, позволяющее передать фокус объекту Дневник (Journal) в списке папок окна Microsoft Outlook.

Приложение

Ответы V

Ниже приведены ответы на тестовые вопросы и упражнения, которыми завершается каждая глава книги.

1 с. Новинки Access 2002 Тесты

1. Для чего предназначен элемент меню Развернуть?

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

множество элементов меню.

2. Если элементу меню или кнопке панели инструментов назначить гиперссылку, то поведение этого интерфейсного объекта изменится. Верно ли это?

Верно. Функция объекта, предусмотренная по умолчанию, изменится. Вероятно,

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

3. Функция проверки правописания подвергает анализу выражения SQL и такие простые образцы текстовых данных, как сокращения и произвольные последовательности символов. Верно ли это?

Неверно. Функция проверки правописания воздействует только на поля данных и

игнорирует ту информацию, которую не в состоянии интерпретировать как набор слов.

4. Каково наименование библиотеки, содержащей объекты Procedure, предназначенные для создания хранимых процедур?

ActiveX Data Objects Extensions 2.7 for DDL and Security (ADOX).

5. Access 2002 имеет в своем составе функции-мастера, позволяющие создавать Web-страницы, связанные с объектами баз данных. Верно ли это?

Верно. Мастера Data Pages Wizards помогут в создании Web-страниц, представляющих в окне броузера как простые, так и сложные объекты данных.