Outlook 如何使用AppleScript和文本文件创建事件电子邮件？

我必须使用文本文件作为模板创建Outlook电子邮件。我看过一些剧本，但一点也不像我需要的。在创建电子邮件之前，我还需要编辑文件的某些内容。我还需要知道什么是放置模板文件的最佳位置

有一个创建新电子邮件的脚本，但我不知道如何从这里加载测试和编辑

更新代码----

---

请提供帮助。

您使用的是哪一版本的Mac OS X？是否可以选择Apple Mail而不是Outlook？您的代码来自。我建议你在@adayzdone-hmm脚本中发布或雇佣一位有才华的开发人员。我正在使用Mavericks和outlook 11，现在我可以读取文件并生成电子邮件，但我仍然需要用其他字符串替换某些字符串

    --read source from the file

set theFile to "/Users/eclit/Desktop/MeetingTemplate.html"
open for access theFile
set fileContents to (read theFile)
close access theFile

on replaceText(find, replace, subject)
    set prevTIDs to text item delimiters of AppleScript
    set text item delimiters of AppleScript to find
    set subject to text items of subject

    set text item delimiters of AppleScript to replace
    set subject to "" & subject
    set text item delimiters of AppleScript to prevTIDs

    return subject
end replaceText

-- log fileContents

on categoryForName(_categoryName)
    tell application "Microsoft Outlook"
        try
            return category _categoryName
        on error
            try
                -- Getting by name doesn't always work.
                repeat with _category in categories
                    if _category's name is _categoryName then return _category
                end repeat
            end try
            make new category with properties {name:_categoryName}
        end try
        return category _categoryName
    end tell
end categoryForName

log fileContents

tell application "Microsoft Outlook"
    --set newMessage to make new outgoing message with properties {subject:"Hooray for automation", content:fileContents & return & return}
    set theCategory to my categoryForName("Work")
    --set theCategory to make new category with properties {name:"Fanciful", color:{12345, 23456, 11111}}
    set newEvent to make new calendar event with properties {subject:"Dial In : +442034333797  Conference code: 5270687926", content:fileContents}
    --make new recipient at newMessage with properties {email address:{name:"Jim Shank", address:"jim.shank@example.com"}}
    --open newMessage
    open newEvent
end tell

    --read source from the file

set theFile to "/Users/eclit/Desktop/MeetingTemplate.html"
open for access theFile
set fileContents to (read theFile)
close access theFile

on replaceText(find, replace, subject)
    set prevTIDs to text item delimiters of AppleScript
    set text item delimiters of AppleScript to find
    set subject to text items of subject

    set text item delimiters of AppleScript to replace
    set subject to "" & subject
    set text item delimiters of AppleScript to prevTIDs

    return subject
end replaceText

-- log fileContents

on categoryForName(_categoryName)
    tell application "Microsoft Outlook"
        try
            return category _categoryName
        on error
            try
                -- Getting by name doesn't always work.
                repeat with _category in categories
                    if _category's name is _categoryName then return _category
                end repeat
            end try
            make new category with properties {name:_categoryName}
        end try
        return category _categoryName
    end tell
end categoryForName

log fileContents

tell application "Microsoft Outlook"
    --set newMessage to make new outgoing message with properties {subject:"Hooray for automation", content:fileContents & return & return}
    set theCategory to my categoryForName("Work")
    --set theCategory to make new category with properties {name:"Fanciful", color:{12345, 23456, 11111}}
    set newEvent to make new calendar event with properties {subject:"Dial In : +442034333797  Conference code: 5270687926", content:fileContents}
    --make new recipient at newMessage with properties {email address:{name:"Jim Shank", address:"jim.shank@example.com"}}
    --open newMessage
    open newEvent
end tell