Q&AサイトYahoo!知恵袋のHSPコーナーより、『テキストエディタのよ うなソフトを作ってい るのですが、出力形式 を.docにしたいと 思っています。文章だけならできるの ですが、文章の最後に 画像も付けたいです。』

 Microsoft Officeの「Word」(ワード)の出力形式であるドキュメントファイル(*.doc)をHSP(HSP3)から作成したいというもの。WordのCOMコンポーネントを呼んで実現します。

 今回は任意の文章を指定し、ファイルとして出力保存するHSPサンプルソース。資料はマイクロソフトのMSDNページをチェック!


// HSP3でWordのドキュメントを出力 [by 無題な濃いログ]
// 解放処理のdelcomは忘れずに

 notesel buf
 noteload "readme.txt"

 newcom pWord,"Word.Application"
 if stat != 0 : end
 
 pWord("Visible") = 1 ; Word画面表示したいなら
 pWord("DisplayAlerts") = 0 ; 警告メッセージなし

 pDocments = pWord("Documents")

新しい文章を作成 
 pDoc = pDocments("Add")

テキストを挿入
 pRange = pDoc("Range", 0, 0)
 pRange("Text") = buf

;
文章を保存
 pDoc->"SaveAs" "C:\\hsp_hogehoge.doc"

;
終了
 pWord->"Quit"