Задание для самостоятельной работы 13.1 Работа с контактами в Outlook

Ситуация:

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

Задание:

Напишите макрос Outlook ImportContacts(), который бы:

• Создавал новую папку Outlook с элементами типа Контакт под именем Контакты клиентов;
• Создавал бы в этой папке контакты для всех записей таблицы Клиенты базы данных C:\Program Files\Microsoft Office\OFFICE11\SAMPLES\Борей.mdb.

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

Примечание:

на практике, вполне возможно, удобнее было бы создать общую папку на сервере Exchange Server и программным образом создать в ней контакты — чтобы можно было предоставить доступ к ним сразу группе пользователей. В нашем случае для простоты мы создаем элементы контактов в локальной папке Outlook. Код VBA для создания контактов в любом случае будет идентичен.

Получить учебные материалы по этому курсу