testInterp.vbs
1 set o = CreateObject("Python.Interpreter") 2 if o.Eval("1+1") <> 2 Then 3 WScript.Echo "Eval('1+1') failed" 4 bFailed = True 5 end if 6 7 if bFailed then 8 WScript.Echo "*********** VBScript tests failed *********" 9 else 10 WScript.Echo "VBScript test worked OK" 11 end if 12