ถ้าอย่างฉันคุณกำลังมีปัญหานี้พยายามส่งภาพถ่ายจาก desktop explorer ไปยังผู้รับ Outlook ใน Windows 8.1 / Office 365 ใช้ลิงค์นี้ แต่ให้แน่ใจว่าใช้ 'Joseph's Script' เป็นการแก้ไขที่ง่าย หวังว่านี่จะช่วยใครซักคน
ขอบคุณระบบ Slipstick ที่ช่วยฉันค้นหาคำตอบในฟอรัมอีกหนึ่งวัน
http://www.slipstick.com/outlook/create-a-custom-send-to-shortcut/
วิธีการของโจเซฟใช้สคริปต์หน้าต่างและอนุญาตให้คุณเลือกหลายไฟล์และแนบไปกับข้อความใหม่การรักษาการตั้งค่าลายเซ็นและสเตชันเนอรีของคุณ
หากต้องการใช้ให้เปิดแผ่นจดบันทึกแล้วคัดลอกรหัสนี้และวางลงในแผ่นจดบันทึก บันทึกเป็น SendToMailRecipient.vbs คุณสามารถบันทึกไว้ในโฟลเดอร์ SendTo หรือบันทึกที่อื่นและสร้างทางลัดไปยังสถานที่ในโฟลเดอร์ SendTo
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
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 = "Emailing: " & Left(subjectStr, (Len(subjectStr)-2))
oEmailItem.BodyFormat = olFormatHTML
oEmailItem.Display
โดยวิธีกดปุ่ม windows + R และป้อน "shell: sendto" เพื่อนำคุณไปยังโฟลเดอร์ที่คุณจะต้องบันทึกไฟล์ให้แน่ใจว่าใช้นามสกุลไฟล์ที่ถูกต้อง (ไม่ใช่ txt) คำแนะนำทั้งหมดใน ลิงค์ด้านบน