/ lib / win32com / test / testInterp.vbs
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