Execute cmd command from VBScript

How I can Execute a cmd command from VBScript (not by .bat file)

For example, I want to execute the following from VBScript:开发者_JAVA百科

cd /d C:dir_test\file_test 
sanity_check_env.bat arg1

To run 'dos' commands you need to instantiate the WScript.Shell object and use it's Run() method:

Set oShell = WScript.CreateObject("WScript.Shell")
oShell.run "cmd cd /d C:dir_test\file_test & sanity_check_env.bat arg1"

Create WScript.Shell object and invoke Run() method on it.

http://msdn.microsoft.com/en-us/library/d5fk67ky(v=vs.85).aspx

Can also invoke oShell.Exec in order to be able to read STDIN/STDOUT/STDERR responses. Perfect for error checking which it seems you're doing with your sanity .BAT.