vbs调用cmd，并判断运行结果的方法

最近写vbs脚本，脚本中需要调用cmd来执行一个命令，但是只是执行了，还不行，还需要根据cmd的输出，判断执行成功与否。

取到cmd的输出有两种方法：

1：本来执行命令的输出是显示在屏幕上的，当然我们也可以将输出保存到文件中，然后读文件，判断是否成功了。

功能说明：下面的脚本是用于判断操作系统是否是win2k的脚本，如果是，返回false,不是返回true。

1. 首先是取到放临时文件的目录;

2. 执行cmd命令，并且用>>或者>将输出保存到文件中;

3. 读文件，文件内容类似于：Microsoft Windows [版本 5.2.3790]，如果包含5.0，说明系统是2k，我的是2k3;

   

代码如下：

'取得系统类型
Function GetOSType()
'Will work with most versions of WSH.
'CMD window will not display.
 

  Err.clear
  On Error Resume Next

  Const OpenAsASCII      =  0
  Const FailIfNotExist   =  0
  Const ForReading       =  1

  GetOSType = True
 
  Dim WshShell
  Set WshShell = CreateObject("WScript.Shell")
  Dim FSO
  Set FS