powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Файлы вложений из общих папок Exchange на диск
2 сообщений из 2, страница 1 из 1
Файлы вложений из общих папок Exchange на диск
    #34291074
Taranaga
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Уважаемые!

Возникла необходимость средствами VBA сохранять вложения из сообщений в общих папках Exchange на диск.
С личными папками типа "входящие" и "отправленные" - вопросов нет.
Сложность именно с общими папками.

Я не могу получить даже список этих папок.
Поискал на форуме - с этим никто особо не бился...
Подскажите где и куда копать.

Спасибо.
...
Рейтинг: 0 / 0
Файлы вложений из общих папок Exchange на диск
    #34291187
Taranaga
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ззыы
Нашел :)

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
Dim oApp As Outlook.Application
Dim oNS As Outlook.NameSpace
Dim oProjectFolder As Outlook.MAPIFolder
Set oApp = New Outlook.Application
Set oNS = oApp.GetNamespace("MAPI")
oNS.Logon
Set oProjectFolder = oNS.Folders("Общие папки"). _
            Folders("Все общие папки"). _
            Folders("Подпапка")
А дальше все, как при советской власти :)
Вот здесь было: http://msdb.ru/Downloads/Partner/Events/Materials/020300/2Outlook_KM_Kyiv.ppt
...
Рейтинг: 0 / 0
2 сообщений из 2, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Файлы вложений из общих папок Exchange на диск
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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