Форум программистов, компьютерный форум, киберфорум
Наши страницы
Visual Basic
Войти
Регистрация
Восстановить пароль
 
AlexeyTyurin
0 / 0 / 0
Регистрация: 28.08.2007
Сообщений: 171
#1

Как можно добраться до вложенного в сообщение Outlook файла Excel? - VB

29.08.2007, 12:25. Просмотров 874. Ответов 4
Метки нет (Все метки)

Как можно добраться до вложенного в сообщение OUtLook файла Excel. Заранее спасибо.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
29.08.2007, 12:25
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Как можно добраться до вложенного в сообщение Outlook файла Excel? (VB):

Как добраться к вложенному в Outlook файлу?
Люди, помогите!!! Есть такая задача. Когда юзер сети открывает Outlook он видит...

QDomDocument. Как добраться до вложенного тега?
здравствуйте. понятия не имею, в чем ошибка/и, но ничего не работает. скорее...

Не могу добраться до вложенного элемента
Всем привет! Есть такой код: <h3 class="active">Заголовок</h3> <div...

Импорт из вложенного файла Excel
Всем,доброго дня! Необходимо вытащить данные из файла xls в поле на форме....

Автоматическое сохранение вложенного файла в excel
Помогите решить такую проблему - раз в несколько дней от одного и того же...

Microsoft Outlook + VBA. Как добраться к данным, что сахраяются с полей в формах?
Как добратса к даным что сахраяютса с полей в формах

4
AndreP
0 / 0 / 1
Регистрация: 22.07.2007
Сообщений: 260
29.08.2007, 13:53 #2
Сохранение вложенного файла из письма папки Inbox с Subject = MailSubject в виде файла с именем FileName
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
  Dim theApp As New Outlook.Application
  Dim Fld As Outlook.MAPIFolder
  Dim MItm As Outlook.MailItem
  Dim MailSubject As String, FileName As String
  
  MailSubject = '...' ' установка Subject
  FileName = '...'  ' установка имени файла
  
  Set Fld = theApp.GetNamespace('MAPI').GetDefaultFolder(olFolderInbox)
  Set MItm = Fld.Items.Find('[Subject] = ''' & MailSubject & '''')
  If Not MItm Is Nothing Then
    If MItm.Attachments.Count > 0 Then
      MItm.Attachments.Item(1).SaveAsFile FileName
    End If
  End If
0
AlexeyTyurin
0 / 0 / 0
Регистрация: 28.08.2007
Сообщений: 171
29.08.2007, 15:07  [ТС] #3
Спасибо!!! А если это сообщение лежит не в паке 'Входящие' а скажем в 'Общая папка' и вложенный файл не надо сохранять а считать от туда данные. Возможно ли это???
0
AndreP
0 / 0 / 1
Регистрация: 22.07.2007
Сообщений: 260
29.08.2007, 15:13 #4
Информация по работе с Outlook лежит в файле VBAOUTL.HLP, можно скачать через ftp здесь

ftp://ftp.rcm-ig.ru/Office/Office97/Eng/OFFICE97.SR1/PATCH/VALUPACK/MOREHELP/VBAOUTL.HLP

или поискать здесь

http://www.filesearch.ru
0
AlexeyTyurin
0 / 0 / 0
Регистрация: 28.08.2007
Сообщений: 171
29.08.2007, 15:25  [ТС] #5
Если не трудно скинь этот файл на мыло. А то у меня Интернет неважно пашет. Пока сообщение в конференции оставишь поседеешь, не говоря уже о скачивании. Заранее спасибо.
0
29.08.2007, 15:25
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
29.08.2007, 15:25
Привет! Вот еще темы с решениями:

Как можно сделать так, что бы при запуске excel файла с макросом не выводилось сообщение о том что макросы могут содержать вирусы?
Может кто нибудь знает как можно сделать так, что бы при запуске excel файла с...

Outlook 2010. Как выполнить отображение новой учетной записи на месте файла данных Outlook?
Здраввствуйте! Вопрос такой: как сделать вместо отображения "Файл данных...

подскажите можно ли из ASP добраться до RAR как к объекту?
хотелось бы без всяких Run обойтись, чтоб контролировать процесс. и если есть,...

Макрос отправки письма Outlook через Excel с автоприкреплением файла
Добрый день! Есть следующий вопрос: Нужно из Excel 2010 макросом создавать...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru