SOFTELメモ Developer's blog

会社概要 ブログ 調査依頼 採用情報 ...
技術者募集中

【VBS】IEを開いてWebページを印刷するスクリプト

問題

作業を自動化したいので、ブラウザを起動して、指定した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のウインドウなどは現れるが、印刷まで完了する。

関連するメモ

コメント