Як завантажити вкладення Outlook із кількох електронних листів до локальної папки

Завантажувати вкладення з одного листа дуже просто. Більшість клієнтів пропонують спосіб завантаження ZIP-файлів. Але це складно, коли справа доходить до вилучення або завантаження вкладень Outlook із кількох електронних листів. Оскільки ця функція не пропонується заздалегідь жодним онлайн- чи офлайн-клієнтом, нам доведеться знайти сценарії та інструменти для її реалізації.

Як завантажити вкладення з кількох електронних листів у Outlook

Ви можете використовувати будь-який із цих методів для завантаження вкладень. Для цього знадобиться сценарій VB, тому переконайтеся, що у вас достатньо прав для вашого облікового запису.

1. NirSoft OutlookAttachView
2. Спеціальний сценарій VB

Кожен інструмент має свої переваги і недоліки. Переконайтеся, що ви знаєте про них, перш ніж вибрати, який з них використовувати.

1] NirSoft OutlookAttachView

Якщо ви використовуєте версію Outlook для Microsoft Office для отримання електронної пошти, ви можете скористатися безкоштовним програмним забезпеченням під назвою OutlookAttachView, щоб завантажити всі свої вкладення. Він працює з усіма типами Outlook з 2003 року, хоча явний Outlook не підтримується.

Щоб почати, завантажте програмне забезпечення (отримайте 64-розрядну версію, якщо ви використовуєте 64-розрядну версію Outlook), розпакуйте ZIP-файл і відкрийте OutlookAttachView.exe.

Відкриються параметри сканування поштової скриньки. Ви можете вказати, які вкладення сканувати. Серед іншого, опції складаються з:

• Який профіль Outlook сканувати
• Сканувати повідомлення, створені за останні X днів
• Виключити певні види документів
• Сканувати повідомлення від конкретних людей
• Сканувати вкладення, що містять певний текстовий вміст

Щоб отримати вкладення, виконайте такі дії:

• Після встановлення програмного забезпечення залиште все за замовчуванням, якщо ви дійсно хочете, щоб усі вкладення у вашій папці “Вхідні” зберігалися. Налаштуйте програмне забезпечення. Коли ви будете готові почати сканування, натисніть OK.
• Сканування відбувається швидко; однак це, очевидно, займе більше часу, якщо ви отримали величезний архів електронних листів. На жаль, під час сканування немає індикатора прогресу, тому ви не можете визначити, як далеко воно зайшло, тому краще залиште його працювати у фоновому режимі та поверніться пізніше, щоб перевірити, чи воно закінчилося.
• Після завершення сканування ви зможете попередньо переглянути та переглянути всі вкладення зі стовпцями, у яких відображаються такі записи, як назва файлу, довжина файлу та розширення.
• Щоб вибрати певні вкладення, утримуйте Ctrl і клацайте лівою кнопкою миші по черзі кожен рядок. Або натисніть Ctrl + A, щоб виділити (вибрати) усі вкладення.
• Потім натисніть меню «Файл» і виберіть «Копіювати вибрані вкладення в» (натисніть F4). Ви можете вказати, куди експортувати вкладення, і форматувати назви документів. Коли будете готові, натисніть OK.
• Він завантажить або збереже всі вибрані вкладення до цільової папки.

Однак їх не можна видалити з ваших електронних листів, тому ви все ще можете отримати до них доступ через Outlook, якщо хочете.

2] Використання сценарію VB

Цей сегмент демонструє код VBA в покроковому керівництві, яке допоможе вам зберігати всі вкладення з різних електронних листів у вибрану папку одночасно .

• По-перше , вам потрібно створити папку для збереження вкладень на локальному диску. Скористайтеся Провідником файлів і відомим розташуванням, щоб створити папку та назвати її вкладеннями.
• Виберіть електронні листи, з яких ви хочете завантажити вкладення , а потім натисніть Alt+F11, щоб відкрити вікно програм Microsoft Visual Basic.

• Натисніть « Вставити » > «Модуль», щоб відкрити вікно «Модуль», скопіюйте один із наведених нижче кодів VBA у вікно.
• Натисніть F5 або скористайтеся меню, щоб запустити код, і всі вкладення з вибраного електронного листа буде завантажено або скопійовано до папки «Вкладення».

код VBA

Dim GCount As Integer
Dim GFilepath As String
Public Sub SaveAttachments()
'Update 20200821
Dim xMailItem As Outlook.MailItem
Dim xAttachments As Outlook.Attachments
Dim xSelection As Outlook.Selection
Dim i As Long
Dim xAttCount As Long
Dim xFilePath As String, xFolderPath As String, xSaveFiles As String
On Error Resume Next
xFolderPath = CreateObject("WScript.Shell").SpecialFolders(16)
Set xSelection = Outlook.Application.ActiveExplorer.Selection
xFolderPath = xFolderPath & "\Attachments\"
If VBA.Dir(xFolderPath, vbDirectory) = vbNullString Then
VBA.MkDir xFolderPath
End If
GFilepath = ""
For Each xMailItem In xSelection
Set xAttachments = xMailItem.Attachments
xAttCount = xAttachments.Count
xSaveFiles = ""
If xAttCount > 0 Then
For i = xAttCount To 1 Step -1
GCount = 0
xFilePath = xFolderPath & xAttachments.Item(i).FileName
GFilepath = xFilePath
xFilePath = FileRename(xFilePath)
If IsEmbeddedAttachment(xAttachments.Item(i)) = False Then
xAttachments.Item(i).SaveAsFile xFilePath
If xMailItem.BodyFormat <> olFormatHTML Then
xSaveFiles = xSaveFiles & vbCrLf & "<Error! Hyperlink reference not valid.>"
Else
xSaveFiles = xSaveFiles & "<br>"& "<a href='file://"& xFilePath & "'>"& xFilePath & "</a>"
End If
End If
Next i
If xSaveFiles <> ""Then
If xMailItem.BodyFormat <> olFormatHTML Then
xMailItem.Body = vbCrLf & "The file(s) were saved to "& xSaveFiles & vbCrLf & xMailItem.Body
Else
xMailItem.HTMLBody = "<p>"& "The file(s) were saved to "& xSaveFiles & "</p>"& xMailItem.HTMLBody
End If
End If
xMailItem.Save
End If
Next
Set xAttachments = Nothing
Set xMailItem = Nothing
Set xSelection = Nothing
End Sub

Function FileRename(FilePath As String) As String
Dim xPath As String
Dim xFso As FileSystemObject
On Error Resume Next
Set xFso = CreateObject("Scripting.FileSystemObject")
xPath = FilePath
FileRename = xPath
If xFso.FileExists(xPath) Then
GCount = GCount + 1
xPath = xFso.GetParentFolderName(GFilepath) & "\"& xFso.GetBaseName(GFilepath) & ""& GCount & "."+ xFso.GetExtensionName(GFilepath)
FileRename = FileRename(xPath)
End If
xFso = Nothing
End Function

Function IsEmbeddedAttachment(Attach As Attachment)
Dim xItem As MailItem
Dim xCid As String
Dim xID As String
Dim xHtml As String
On Error Resume Next
IsEmbeddedAttachment = False
Set xItem = Attach.Parent
If xItem.BodyFormat <> olFormatHTML Then Exit Function
xCid = ""
xCid = Attach.PropertyAccessor.GetProperty("http://schemas.microsoft.com/mapi/proptag/0x3712001F")
If xCid <> ""Then
xHtml = xItem.HTMLBody
xID = "cid:"& xCid
If InStr(xHtml, xID) > 0 Then
IsEmbeddedAttachment = True
End If
End If
End Function

Ви також можете скопіювати код звідси та вставити його.

Як завантажити вкладення з кількох електронних листів у Gmail

Безкоштовне доповнення SendPulse для збереження електронних листів і вкладень для Gmail експортує ваші вкладення в Google. Що виділяє його, так це те, що він автоматично починає пошук нових вкладень, а це означає, що ви ніколи не повинні думати про виконання цього методу вручну. Він працює правильно для одноразового експорту, якщо це все, що вам потрібно.

Примітка. Служба матиме доступ до вашого облікового запису Gmail, тому зробіть усвідомлений вибір, якщо хочете підключитися.

Дотримуйтесь інструкцій, щоб використовувати цей інструмент

• Перейдіть на веб-сторінку надбудови та натисніть «Установити».
• Виберіть свій обліковий запис Google і натисніть «Дозволити», а потім завершіть.
• Перейдіть до Google Таблиць і створіть нову таблицю.
• Відвідайте Додатки > Зберегти електронні листи та вкладення > Відкрити бічну панель.
• Встановіть мітку Gmail, яку потрібно сканувати, а потім укажіть інші фільтри, наприклад, від кого чи після, і раніше, ніж діапазон дат (ви хочете встановити принаймні ці фільтри).

• Натисніть «Налаштування завантаження», налаштуйте їх за потреби, а потім натисніть «Вибрати папку», щоб вибрати папку на вашому диску, де мають зберігатися вкладення.
• Завершивши, натисніть «Зберегти правило» > «Виконати». Надбудова навіть автоматично запускатиметься позаду та оновлюватиметься, коли надходитимуть нові електронні листи.

Ви можете зберігати вкладення всередині накопичувача. Або відкрийте диск, клацніть папку правою кнопкою миші та виберіть «Завантажити», щоб зберегти локальну репліку. Потім ви можете видалити папку з диска, щоб звільнити хмарне сховище.

Завантажте розширення звідси

Як завантажити вкладення з кількох листів на будь-якому поштовому сервері

Mail Attachment Downloader — це доступний варіант, оскільки він працює в багатьох службах електронної пошти, таких як Outlook, Gmail, AOL, Yahoo або на будь-якому іншому поштовому сервері. Це також безкоштовно для особистого користування.

Недоліком є ​​те, що є кілька доповнень, які ви можете отримати в платній версії. Це включає в себе можливість відпрацювати кілька фільтрів і завантажувати з кількох облікових записів одночасно. Ви можете знайти повну різницю на сторінці ліцензування програмного забезпечення.

Примітка. Вам потрібно буде ввести тут облікові дані електронної пошти. Тому переконайтеся, що ви маєте повну впевненість і зробите усвідомлений вибір.

Давайте розглянемо найпростіший крок для вилучення вкладень із кількох електронних листів.

• Завантажте ZIP, розпакуйте його та запустіть інсталятор EXE. Після підключення запустіть програму завантаження вкладень електронної пошти.
• Натисніть «Налаштування». Тут ви можете вибрати поштовий сервер (незалежно від того, хто надіслав вашу електронну пошту), після чого ввести обліковий запис і пароль. Обов’язково прочитайте чорну смугу внизу, включаючи важливу інформацію.

• Коли будете готові, клацніть Test Connection. Якщо це не спрацює, переконайтеся, що ви ввімкнули протокол POP/IMAP, як потрібно, і що ваш обліковий запис і пароль правильні. Коли все буде правильно, натисніть «Зберегти».
• Якщо ви хочете, щоб вкладення виводилися в унікальну папку, змініть область збереження. Ви можете додатково налаштувати цю систему за допомогою вкладок. Наприклад, у папці/документах можна обмежити пошук вибраними папками. При пошуку можна вказати діапазон дат. У фільтрах ви можете вказати питання, що складаються з відправника або проблемного рядка.
• Коли будете готові, натисніть «Підключитися та завантажити». Потім він збереже ваші вкладення у вибрану вами папку.

Завантажити з офіційного сайту . Програма пропонує безкоштовну версію для особистого використання.

Заключні слова

Завантаження кількох вкладень із кількох електронних листів має бути функцією всіх поштових клієнтів. Я використовую скрипт для завантаження PDF-документів, які отримую від клієнтів щодня наприкінці місяця. Це гарантує, що я маю копії всіх і не витрачаю час на завантаження їх окремо.