vbscript - 如何在 VBScript 脚本中断言？

Question

有什么好的使用方法asserts在 VBScript脚本？

是否有内置功能或者必须对其进行模拟？最佳实践是什么？

一个应用程序是在开发过程中测试对象是否Nothing。

Answer 1

一个可操作的答案(对于其他可能需要它的人来说)是定义这个函数，来自 Rosetta Code :

    sub Assert( boolExpr, strOnFail )
        if not boolExpr then
            Err.Raise vbObjectError + 99999, , strOnFail
        end if
    end sub

调用:

    Set obj2 = Nothing
    Assert Not obj2 Is Nothing, "obj2 is Nothing!"

输出:

    someScript.vbs(17, 3) (null): obj2 is Nothing!