powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Поиск в адресной книге Outlook
4 сообщений из 4, страница 1 из 1
Поиск в адресной книге Outlook
    #33498476
Drakula76
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Нужно в короткие сроки сделать программульку, которая будет на основе Excel-евского файла генерировать мэйл, который будет рассылаться списку адресатов, основанному на содержимом отдельных ячеек Excel-файла. Сложность состоит в отсутствии у меня опыта программирования объектов Аутлука. С помощью мерзкого VBA-шного хелпа я разобрался, как генерировать письмо с нужными темой, текстом и адресатом. Но как программно осуществлять поиск в адресной книге, уже не осилил. Литературы нет, Интернета на рабочем месте нет (только дома или в специальной комнате с ограниченным числом компов), а сроки поджимают.

Может, кто посоветует какой-нибудь онлайн-ресурс с качественным описанием объектной модели Аутлука, примерами применения свойств и методов, описанием типовых ситуаций и тп?
...
Рейтинг: 0 / 0
Поиск в адресной книге Outlook
    #33498478
Drakula76
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Забыл указать, среда программирования - VBA
...
Рейтинг: 0 / 0
Поиск в адресной книге Outlook
    #33498546
вероятно,
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
полнее
http://www.slipstick.com

найти затруднительно, если вообще возможно.
...
Рейтинг: 0 / 0
Поиск в адресной книге Outlook
    #33523804
Фотография Drema
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Drakula76 Но как программно осуществлять поиск в адресной книге, уже не осилил. Литературы нет, Интернета на рабочем месте нет (только дома или в специальной комнате с ограниченным числом компов), а сроки поджимают.
А зачем вам адресная книга если адреса будут содержаться в Excel?
Для обращения к адресной книге можно использовать примерно такой код:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
Dim OutlookObject, AddressEntries, Index, MailTo

Set OutlookObject = CreateObject("Outlook.Application")
Set AddressEntries = OutlookObject.GetNameSpace("MAPI").AddressLists( 1 ).AddressEntries
For Index =  1  To AddressEntries.Count
  MailTo = AddressEntries(Index)
  ...
Next
...
Рейтинг: 0 / 0
4 сообщений из 4, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Поиск в адресной книге Outlook
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]