WSHの使用法

解決済

質問者：skkyam
質問日時：2012/03/04 09:58
回答数：1件

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

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

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

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

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

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

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

通報する

この質問への回答は締め切られました。

質問の本文を隠す

回答 (1件)

ベストアンサー優先
最新から表示
回答順に表示

No.1ベストアンサー

回答者： luka3
回答日時：2012/03/04 11:47

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のバグなんじゃないかと思いますが。