Delphi + JScript

[turok7770]

Здравствуйте уважаемые программисты. Пишу ПП исполняющий исходный код JScript. До этого делал тоже самое только заместо JScript исполнялся VBScript. Вот пример кода процедуры

procedure TForm1.BitBtn1Click(Sender: TObject);
var
  vbs: Variant;
  line: string;
begin
  try
  vbs:= CreateOleObject('ScriptControl');
  vbs.language:= 'VBScript';
  Code:= SynMemo1.Text;
  vbs.addcode(code);
  vbs.executestatement('');
  except
    on e: exception do
      begin
        line:= vbs.error.line;
        SynMemo1.Lines.Add(#39 + e.Message + ' -> ' + line);
      end;
  end;
end;

С подключением модулей comObj, OleConst.
Поидее должно работать исправлением vbs.language:= 'VBScript'; этой строчки на JScript, но простейший код типа такого

 var strMessage;
 strMessage = "Привет";
 WScript.Echo(strMessage);

не работает ссылаясь на ошибку "WScript - определение отсутствует"
Поэтому вопрос как сделать тоже самое только для исполнения JScript?