Set objWshShell = Wscript.CreateObject("WScript.Shell")
objWshShell.Run "ipconfig /all", 0, true
 ipconfig /all    実行するコマンド
 0    ウィンドウを表示しない
 true    コマンド実行終了を待つ
Exec関数を使って、コマンドの出力(output)文字列を取得することが可能。
Set objWshShell = Wscript.CreateObject("WScript.Shell")
command = "ipconfig /all"
Set objExec = objWshShell.Exec(command)
Do Until objExec.StdOut.AtEndOfStream
result = result & objExec.StdOut.ReadLine
Loop
 StdOut  標準出力
取得した文字列がresult変数に保存される
0 件のコメント:
コメントを投稿