VBScriptでコマンドを実行するとウィンドウ非表示で実行できる
‘実行時のウィンドウサイズ
‘0 非表示
‘1 通常ウィンドウ
‘2 最小化
‘3 最大化
‘DOSのコマンドの実行が終了するのを待って次のコードを実行したい場合は、同期モード”True”
例
Option Explicit
Dim str,cmdstr
Dim objShell
str = “c:¥temp\ip.txt”
cmdstr = “cmd /c ipconfig /all > ” & str
Set objShell = CreateObject(“WScript.Shell”)
msgbox cmdstr ‘コマンド確認
objShell.Run cmdstr,0,false