WSH脚本单元测试框架

Question

我正在寻找WSH脚本（vbs/wsf，而不是VB6，VBA）的单元测试框架。

我无法找到任何东西，除了这个项目（看起来不错，但最后一项活动是大约2年前录音机，还没有测试它尚未）：

http://code.google.com/p/vbslib/

谢谢！

Answer 1

还有ScriptUnit，如果你只是谷歌的“VBScript单元测试”，你会发现an ancient posting of mine（不是很成功）。我仍然对这个话题感兴趣，并希望以适合您的方式进行合作。

Answer 2

我刚推了一个GitHub仓库，其中包含一个基于VBScript的超单元测试框架。现在它只有assertEqual便和AssertErrorRaised，但它是超级容易添加更多，如果这甚至是必要的：https://github.com/koswald/VBScript

这里是一个spec file

With CreateObject("includer") 
    Execute(.read("VBSValidator")) 
    Execute(.read("TestingFramework")) 
End With 

Dim val : Set val = New VBSValidator 'Class Under Test 

With New TestingFramework 

    .describe "VBSValidator class" 

    .it "should return True when IsBoolean is given a True" 

     .AssertEqual val.IsBoolean(True), True 

End With 

一个片段，并在这里是一个样本test launcher

Main 
Sub Main 
    With CreateObject("includer") 
     ExecuteGlobal(.read("VBSTestRunner")) 
    End With 
    Dim testRunner : Set testRunner = New VBSTestRunner 
    With WScript.Arguments 
     If .Count Then 

      'if it is desired to run just a single test file, pass it in on the 
      'command line, using a relative path, relative to the spec folder 

      testRunner.SetSpecFile .item(0) 
     End If 
    End With 

    'specify the folder containing the tests; path is relative to this script 

    testRunner.SetSpecFolder "../spec" 

    'run the tests 

    testRunner.Run 
End Sub