VBSからバッチファイルをコール

[vbs][wsh]

Set WSHShell = WScript.CreateObject("WScript.Shell")
cmd = "D:\a.bat"
return = WSHShell.Run(cmd)

ネタ元