В Windows ХР символы кириллицы, посылаемые из сценария в стандартный выходной поток, должны быть представлены в Windows-кодировке (CP 1251). В предыдущих версиях Windows для корректного отображения на экране символы кириллицы при использовании потока WScript.StdOut должны быть в DOS-кодировке (OEM 866).
Как и при использовании метода WScript.Echo, в качестве параметра метода WriteLine можно указывать строки, содержащие символы перевода строки (листинги 2.7 и 2.8).
StdOut сразу нескольких строк (JScript)/*******************************************************************/
/* Имя: StdOu2.js */
/* Язык: JScript */
/* Описание: Вывод сразу нескольких строк (StdOut.WriteLine) */
/*******************************************************************/
var s; //Объявляем переменную
s='Пример
вывода
нескольких
строк'; //Формируем строки
WScript.StdOut.WriteLine(s); //Выводим строки
/************* Конец *********************************************/
StdOut сразу нескольких строк (VBScript)'*******************************************************************
' Имя: StdOut2.vbs
' Язык: VBScript
' Описание: Вывод сразу нескольких строк (StdOut.WriteLine)
'*******************************************************************
Option Explicit
Dim s ' Объявляем переменную
' Формируем строки
s='Пример'&vbCrLf&'вывода'&vbCrLf&'нескольких'&vbCrLf&'строк'< /code>
WScript.StdOut.WriteLine s ' Выводим строки
'************* Конец *********************************************
Для создания более компактного текста сценария можно сразу сохранить ссылку на стандартный выходной поток WScript.StdOut в отдельную переменную и затем при вызове методов Write и WriteLine использовать эту переменную (листинги 2.9 и 2.10).
StdOut в переменной (JScript) /*******************************************************************/
/* Имя: StdOut3.js */
/* Язык: JScript */
/* Описание: Пример использования метода StdOut.WriteLine */
/*******************************************************************/
var n,StdOut; //Объявляем переменные
n=1+2;
StdOut=WScript.StdOut; //Сохраняем ссылку на StdOut в переменной
//Выводим строки в StdOut
StdOut.WriteLine('Пример использования метода StdOut.WriteLine() ...');
StdOut.WriteLine('1+2='+n);
/************* Конец *********************************************/
'*******************************************************************
' Имя: StdOut3.vbs
' Язык: JScript
' Описание: Пример использования метода StdOut.WriteLine
'*******************************************************************
Option Explicit
Dim n,StdOut ' Объявляем переменные
n=1+2
Set StdOut=WScript.StdOut ' Сохраняем ссылку на StdOut в переменной
' Выводим строки в StdOut
StdOut.WriteLine 'Это пример использования метода StdOut.WriteLine() ...'
StdOut.WriteLine '1+2=' & n
'************* Конец *********************************************
Функция
В языке VBScript существует специальная функция MsgBox, с помощью которой можно выводить информацию в диалоговое окно с несколькими кнопками; также в этом окне можно задавать заголовок и значок (рис. 2.5).
Рис. 2.5. Диалоговое окно, созданное с помощью функции MsgBox
Пример сценария, создающего такое диалоговое окно, приведен в листинге 2.11.
В языке JScript аналога функции MsgBox нет.
'*******************************************************************
' Имя: MsgBox.vbs
' Язык: VBScript
' Описание: Пример использования функции MsgBox
'*******************************************************************
Dim Res,Text,Title ' Объявляем переменные
Text='Пример вывода строк в диалоговое' & vbCrLf & ' окно VBScript'
Title='Заголовок'
' Выводим диалоговое окно на экран
Res=MsgBox(Text,vbOkCancel+vbInformation+vbDefaultButton2,Title)
' Определяем, какая из кнопок была нажата в диалоговом окне
If Res=vbOk Then
MsgBox 'Нажата кнопка OK'
Else
MsgBox 'Нажата кнопка Отмена'
End If
'************* Конец *********************************************
Подробное описание функции MsgBox приведено в
