VBSファイルからバッチファイルを呼び出す
2023/10/10追記 将来的にはVBSは非推奨になるらしい
前回はバッチファイルを管理者権限で呼び出すものを作った。
今回もユーザには意識させないで実行させるプログラムを作る。
今回はVBSファイルからバッチファイルを呼び出してみる。
vbsファイルを作ってみる
'変数は宣言しないといけない指定に
Option Explicit
'WshShellオブジェクト変数を宣言
Dim WishShell
'WshShellオブジェクト作成
Set WshShell = CreateObject("WScript.Shell")
'batファイルの実行
WshShell.Run "C:\temp\test.bat"
'オブジェクトの開放
Set WshShell=Nothing
呼び出すバッチファイルは以下
@echo off
rem c:\temp\test フォルダの存在チェック
IF Exist c:\temp\test (
rem 存在する場合はtest1フォルダを作る
mkdir c:\temp\test1
) else (
存在しない場合はtestフォルダを作る
mkdir c:\temp\test
)
exit
結果は無事動いた。
けど一瞬バッチファイルが見える。
バッチファイルを一瞬でも見せないようにする
'変数は宣言しないといけない指定に
Option Explicit
'WshShellオブジェクト変数を宣言
Dim WishShell
'WshShellオブジェクト作成
Set WshShell = CreateObject("WScript.Shell")
'batファイルの実行
WshShell.Run "C:\temp\test.bat",vbhide
'オブジェクトの開放
Set WshShell=Nothing
これで一切画面に表示させずに実行することができた。
今回は以上
その他のバッチファイルの記事は以下
この記事が気に入ったらサポートをしてみませんか?