0

Word 文書を単一ファイル Web ページ (.mht) 形式で保存するスクリプトを作成しようとしています。私は実際の「保存」コマンドを書くところまで来て、そこで立ち往生しています。これは私がやろうとしていることです:

# the_file is a variable which has been set here
tell application "Microsoft Word"
    activate
    open the_file
    save the_file as [type]
end tell

開いた部分は問題なく動作します。しかし、セーブタイプに何を入れたらいいのかわからない。おそらくもっと重要なのは、利用可能なタイプのリストがどこにあるのかわかりません。誰でも助けることができますか？

編集: コメント投稿者が単語辞書を提案しました。私はそこで以下を見つけましたが、それを解釈する方法がわかりません [私は AS の初心者です]。

[file format format document97/‌format document97/‌format template97/‌format template97/‌format text/‌format text line breaks/‌format dostext/‌format dostext line breaks/‌format rtf/‌format Unicode text/‌format Unicode text/‌format HTML/‌format web archive/‌format stationery/‌format xml/‌format document/‌format documentME/‌format template/‌format templateME/‌format PDF/‌format flat document/‌format flat documentME/‌format flat template/‌format flat templateME/‌format custom dictionary/‌format exclude dictionary/‌format documentAuto/‌format templateAuto] : The format in which the document is saved.
4

2 に答える 2

2

試してみてくださいformat web archive。リストされているすべての形式の中で、これが最も可能性が高いように見えます。

于 2012-07-07T19:44:04.553 に答える
0

save1-コマンドを使用するときは、ファイル パスではなくドキュメントを指定する必要があります。より適切に制御するにはopen、プロパティを指定してコマンドを使用しfile nameます。ドキュメント オブジェクトが返されます。

この : を使用するopen the_fileと何も返されません。この場合は を使用する必要がありますfront documentが、後で別のドキュメントが開いた場合など、信頼性が低くなります。

2- Applescriptsaveでコマンドを使用する場合、Word は拡張子を変更しません。スクリプトは拡張子を置き換える必要があります。また、コマンドの代わりにオプションを増やすことをお勧めします。save assave

回答が更新されました: Web アーカイブの代わりにHTML をフォーマットします 

set the_file to (choose file) 
   tell application "Microsoft Word"
        set thisDoc to open file name (the_file as string)
        set tName to my removeExtension(name of thisDoc)

        -- save in the same directory
    save as thisDoc file format format HTML file name (tName & ".htm") with HTML display only output
        close thisDoc saving no
    end tell

    on removeExtension(t)
        if t does not contain "." then return t
        set tid to text item delimiters
        set text item delimiters to "."
        set t to (text items 1 thru -2 of t) as string
        set text item delimiters to tid
        return t
    end removeExtension

したくない場合はHTML display only output、使用しますwithout HTML display only output

于 2012-07-07T22:23:20.753 に答える