-1

Привет, сообщество суперпользователей!

Я уже пытался найти решение, но ничего не смог найти. Я хочу сделать следующее:

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

Дополнительная информация: Я хочу отправить материал между двумя бизнес-ноутбуками, поэтому Dropbox не является опцией, так как он запрещен, и я также хочу, чтобы файлы появлялись в письмах, а не только на другом компьютере.

Это вообще возможно? Я подумал, что для этого может быть несколько простых трюков.

Что я пробовал до сих пор:

  • В поисках большого количества фраз, похожих на "пакетное перетаскивание файла на иконку электронной почты", и чтения записей форума

  • Попытка перетащить файл на ярлык «mailto:a@b.com» -> безрезультатно

  • Пытаюсь найти какой-нибудь пакетный скрипт, который это делает, но я нашел только странные расширения для написания писем из командной строки, что я не хочу делать

|источник

3 ответа3

0

Мне удалось сделать это для одного файла, что было действительно легко в конце. Удаление нескольких файлов по-прежнему остается проблемой, поскольку Outlook не позволяет подключать несколько файлов через командную строку. Мой "код":

"C:\Program Files (x86)\Microsoft Office\Office15\outlook.exe" /c ipm.note /m "me@mail.de&subject=Files%%20sent&body=See%%20attachements" /a %1

Адаптировать:

  • Найдите расположение вашего Outlook .exe и замените его
  • Измените почтовый адрес, тему и текст по своему усмотрению (пробел = %% 20)
|источник
0

Если вы не возражаете против использования VBS вместо пакетной обработки, это компиляция из нескольких мест, которые я совместил для обработки одной и той же вещи.

Сохраните код в файле .vbs по вашему выбору и поместите его на рабочий стол.

Создайте для него красивый значок и скопируйте в него вставку или перетащите несколько файлов. Пока вы удаляете их все сразу, все они прикрепляются к одному письму Outlook, которое немедленно отправляется на имена, которые вы предварительно настроили в сценарии. Если вы хотите взглянуть на свою работу перед отправкой, закомментируйте последнюю строку «oEmailItem.Послать". Тогда он Swaits для ручной отправки.

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

Если вы можете добавить этот компонент, пожалуйста, отправьте его обратно. 

Option Explicit
Dim objArgs, OutApp, oNameSpace, oInbox, oEmailItem, olMailItem
Dim a, oAttachments, subjectStr, olFormatHTML
olMailItem = 0
olFormatHTML = 2
Set objArgs = WScript.Arguments 'gets paths of selected files
Set OutApp = CreateObject("Outlook.Application") 'opens Outlook
Set oEmailItem = OutApp.CreateItem(olMailItem) 'opens new email
oEmailItem.To = "you@email.net"
oEmailItem.cc = "yourfriend@mailcom"
oEmailItem.bcc = "another@mailcom"
For a = 0 to objArgs.Count - 1
Set oAttachments = oEmailItem.Attachments.Add(objArgs(a))
subjectStr = subjectStr & Right(objArgs(a),Len(objArgs(a))-       (InStrRev(objArgs(a),"\"))) & ", " 'recreates the default Subject e.g. Emailing: file1.doc, file2.xls
Next
If subjectStr = "" then subjectStr = "No Subject "
oEmailItem.Subject = "Important Items " & Left(subjectStr,    (Len(subjectStr)-2))
oEmailItem.BodyFormat = olFormatHTML
oEmailItem.Display
oEmailItem.Send
|источник
0

Короткая версия: Вы можете, и это не слишком сложно, на удивление.

Просто командный файл не подойдет, хотя, вам нужно использовать ключи командной строки для конкретной программы.

Для внешнего вида это выглядит так, как будто это возможно с помощью переключателей командной строки:
https://support.office.com/en-us/article/Command-line-switches-for-Outlook-for-Windows-079164CD-4EF5-4178-B235-441737DEB3A6?ui=en-US&rs=en-US&ad= НАС

А для Thunderbird это можно сделать с помощью Compose Switch:
http://kb.mozillazine.org/Command_line_arguments_%28Thunderbird%29

И вы можете найти, как использовать поддержку перетаскивания для командного файла по этой ссылке:
http://www.computing.net/answers/programming/drag-drop-files-to-batch-/20499.html

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

Надеюсь это поможет!

|источник

Всё ещё ищете ответ? Посмотрите другие вопросы с метками .