Bạn có thể làm điều này với một chút mã trong Outlook và một ít mã trong Emacs.
Trước tiên, nếu bạn đang sử dụng Outlook 2007, bạn sẽ cần bật URL Outlook với bổ sung đăng ký. Hướng dẫn và các tập tin đăng ký có thể được tìm thấy ở đây lịch sự của David Tan.
Tiếp theo, macro này có thể được thêm vào Outlook và sẽ nhận được GUID của thông báo email hiện tại, tạo liên kết Org-Mode và gửi nó vào bảng tạm.
'Adds a link to the currently selected message to the clipboard
Sub AddLinkToMessageInClipboard()
Dim objMail As Outlook.MailItem
Dim doClipboard As New DataObject
'One and ONLY one message muse be selected
If Application.ActiveExplorer.Selection.Count <> 1 Then
MsgBox ("Select one and ONLY one message.")
Exit Sub
End If
Set objMail = Application.ActiveExplorer.Selection.Item(1)
doClipboard.SetText "[[outlook:" + objMail.EntryID + "][MESSAGE: " + objMail.Subject + " (" + objMail.SenderName + ")]]"
doClipboard.PutInClipboard
End Sub
Hầu như ở đó, thêm một chút lisp này vào thư mục lisp emacs của bạn để kích hoạt các liên kết Outlook.
;;; org-outlook.el - Support for links to Outlook items in Org
(require 'org)
(org-add-link-type "outlook" 'org-outlook-open)
(defun org-outlook-open (id)
"Open the Outlook item identified by ID. ID should be an Outlook GUID."
(w32-shell-execute "open" (concat "outlook:" id)))
(provide 'org-outlook)
;;; org-outlook.el ends here
Và cuối cùng, cập nhật tệp .emacs của bạn để bao gồm mã liên kết Outlook. Chỉ cần thêm nó vào đâu đó sau khi cài đặt chế độ org.
(require 'org-outlook)
Bây giờ bạn có thể gọi macro (tôi đã thêm nó vào thanh công cụ của mình trong Outlook để truy cập nhanh) và bạn có thể nhanh chóng tạo một liên kết đến email trong Emacs.
Một gotcha, GUID thay đổi khi bạn di chuyển một tin nhắn giữa các cửa hàng tài liệu, vì vậy nếu bạn nhận được GUID cho tin nhắn trong khi trên máy chủ Exchange của bạn và sau đó chuyển nó sang tệp PST cục bộ của bạn, liên kết sẽ thay đổi. Di chuyển tin nhắn trước khi bạn nhận được GUID.