ローカルHTMLのdom操作と保存 (ID:102862)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 お世話になります。 ローカルマシンにあるHTML(php)ファイルのdom操作を行い 新しいファイルに保存することを考えています。 こちらの掲示板を参考に ---開始--- Dim Doc As MSHTML.HTMLDocument Set Doc = New HTMLDocument Dim ipFile As IPersistFile Set ipFile = Doc ipFile.Load "c:\old.php", STGM_READ Doc.getElementById("TEST").innerText = "OK" 'getElementById("TEST")にはもともと"==="が入っていて 'デバッグウィンドウで '? Doc.getElementById("TEST").innerText 'とすると OKと表示しています ipFIleW.Save "c:\new.php", 0 ---終了--- としています。 このときに、new.phpファイルには、old.phpと全く同じ状態の内容が できあがっています。 dim ipFileを ipFileWriteとIpFileRead と読み書き別に設定してみたり ipPersistStreamInitを使ってみたりしましたが、やはり同じ結果でした。 docの変更時にシグナルを送るとかするのでしょうか ヒントでもかまいませんのでよろしくおねがいします