【VBS】IEを開いてWebページを印刷するスクリプト
2015/11/18
develop
問題
作業を自動化したいので、ブラウザを起動して、指定したURLを開いてWebページを印刷するスクリプトが欲しいです。
答え
例）
sample.vbs などの名前でファイルを作成し、以下を書き込み、ダブルクリックで起動する。
'IE
Set ie = CreateObject("InternetExplorer.Application")
ie.Visible = True
'Webページを開く
ie.Navigate "https://www.softel.co.jp/labs/tools/ip/"
'ページの読み込みが終わるまで待機
Do Until ie.Busy = False
WScript.sleep(250)
Loop
'デフォルトプリンタに印刷する（印刷ダイアログなしで）
ie.ExecWB 6, 2, 3
'IEを終了
ie.Quit
人の操作はVBSを起動するだけ。
PCではIEのウインドウなどは現れるが、印刷まで完了する。