インストールバッチ等をユーザーに気付かれないように仕込む際、ウインドウ抑止処理をいちいち書くのもめんどくさいので、対象の.batと同じフォルダに入れて同じ名前にリネームすれば動くようにするものを作り置きしておくと便利。
set fso = createObject("Scripting.FileSystemObject")
CreateObject("Wscript.Shell").Run """" & fso.getParentFolderName(WScript.ScriptFullName) & "\" &fso.getBaseName(WScript.ScriptFullName) & ".bat""", vbHide