WSHの使用法

質問

毎日　同様な操作をするので　WSHを活用して　少しでも効率を上げようとしております

操作内容ですが
　１　定められた　HPを開く
　２　HPの内容をすべてコピー
　３　コピーされた内容をエディーター（Mifes）で加工処理
　４　加工されたデータを　Excelに　貼り付ける

このなかで　２　の　HPの内容をすべてコピーするのに　
ブラウザーのメニューの編集から

１　すべてを選択（Ctrl+A)　　
２　コピー（Ctrl+C）

を手動で操作しております

この　２つの手動を　WSHで　自動処理することができないでしょうか？

アドバイスよろしくお願いします

回答No.1

luka3 · ベストアンサー

1行目のurlを変更して拡張子を js で保存してください。
IEのバージョンによっては、「クリップボードへアクセスするのを許可しますか」と出ますので、その場合は6行目をClipboardCopy2に変更して下さい。

--　ここから
var url = "http://www.yahoo.co.jp/";
var IE = WScript.CreateObject("InternetExplorer.Application");
IE.Visible = true;
IE.Navigate(url);
WaitLoad();
ClipboardCopy(IE.document.body.innerText);
IE.Quit();

function ClipboardCopy(str) {
IE.document.parentWindow.clipboardData.setData("text", str);
}

function ClipboardCopy2(str) {
var OLECMDID_COPY = 12, OLECMDID_SELECTALL = 17;
IE.Navigate("about:blank");
WaitLoad();
IE.document.body.innerText = str;
IE.execWB(OLECMDID_SELECTALL, 0);
IE.execWB(OLECMDID_COPY, 0);
}

function WaitLoad() {
do {
WScript.Sleep(1000);
} while (IE.Busy || IE.Document.readyState!="complete");
}
-- ここまで

ちなみにIEのバージョンの違いなのか、コピーされる内容が違うようです。
XP(SP3)+IE6ではCtrl-A+Ctrl-Cとほぼ同じでしたが、Win7(SP1)+IE9では<!-- -->など若干のタグもコピーされてしまいました。IEのバグなんじゃないかと思いますが。

お礼

ClipboardCopy2　で　うまくいきました

ただし　WHS（拡張子がVBS）で　作成しておりますので　JSからVBSに　変換できますか
できれば　VBSで　統一したいのですが

アドバイス　いただけると　助かります