需要一个applescript使textutil将最前面的TextEdit文档保存为HTML

Question

我无法创建一个AppleScript来在最前面的TextEdit文档上执行“另存为html”，并将其保存到同一目录（同名，只需添加一个“html”扩展名....我认为无论如何都是默认行为。

我的理解是它应该使用textutil来做到这一点。

为了额外的润色和感激：它是否可以检查该目录中是否已存在具有相同名称和扩展名的文件，如果是，则自动重命名已保存的HTML文件ala“xxxx2.html”？

Answer 1

这会将〜/ Desktop / test.rtf保存为〜/ Desktop / test.html，如果HTML文件已存在则覆盖该文件：

tell document 1 of application "TextEdit"
    save
    path
end tell
do shell script "textutil -convert html " & quoted form of result

使用UI脚本的另一种方法（仅在10.8中测试）：

tell application "System Events" to tell process "TextEdit"
    click menu item "Save As…" of menu 1 of menu bar item "File" of menu bar 1
    tell sheet 1 of window 1
        tell pop up button 1 of group 1 of group 1
            click
            click menu item "Web Page (.html)" of menu 1
        end tell
        click button "Save"
    end tell
end tell