' Windows Script Host Sample Script
'
' -----------------------------------------------------------------
' Copyright (C) 2003 MyServiceCenter
' -----------------------------------------------------------------

Option Explicit

Dim txt

' Get the version of the language engine.
txt = "Language Engine: " & ScriptEngine() & vbCrLf
txt = txt & "Version: " & ScriptEngineMajorVersion() 
txt = txt & "." + CStr(ScriptEngineMinorVersion()) & vbCrLf
txt = txt & "Build: " + CStr(ScriptEngineBuildVersion())

WScript.Echo txt