Чтение онлайн

на главную - закладки

Жанры

Windows Script Host для Windows 2000/XP

Попов Андрей Викторович

Шрифт:

/* Описание: Вывод сразу нескольких строк (StdOut.WriteLine) */

/*******************************************************************/

var s; //Объявляем переменную

s="Пример\nвывода\nнескольких\nстрок"; //Формируем строки

WScript.StdOut.WriteLine(s); //Выводим строки

/************* Конец *********************************************/

Листинг 2.8. Вывод в
StdOut
сразу нескольких строк (VBScript)

'*******************************************************************

' Имя: StdOut2.vbs

' Язык: VBScript

' Описание: Вывод сразу нескольких строк (StdOut.WriteLine)

'*******************************************************************

Option Explicit

Dim s ' Объявляем переменную

' Формируем строки

s="Пример"&vbCrLf&"вывода"&vbCrLf&"нескольких"&vbCrLf&"строк"

WScript.StdOut.WriteLine s ' Выводим строки

'************* Конец *********************************************

Для создания более компактного текста сценария можно сразу сохранить ссылку на стандартный выходной поток

WScript.StdOut
в отдельную переменную и затем при вызове методов
Write
и
WriteLine
использовать эту переменную (листинги 2.9 и 2.10).

Листинr 2.9. Сохранение ссылки на поток
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);

/************* Конец *********************************************/

Листинr 2.10. Сохранение ссылки на поток StdOut в переменной (VBScript)

'*******************************************************************

' Имя: 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

'************* Конец *********************************************

Функция MsgBox языка VBScript

В языке VBScript существует специальная функция

MsgBox
, с помощью которой можно выводить информацию в диалоговое окно с несколькими кнопками; также в этом окне можно задавать заголовок и значок (рис. 2.5).

Рис. 2.5. Диалоговое окно, созданное с помощью функции

MsgBox

Пример сценария, создающего такое диалоговое окно, приведен в листинге 2.11.

Замечание

В языке JScript аналога функции

MsgBox
нет.

Листинг 2.11. Создание диалогового окна с помощью функции MsgBox (VBScript)

'*******************************************************************

' Имя: 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
приведено в приложении 1. Здесь же мы отметим только то, что значением функции
MsgBox
является константа, соответствующая нажатой в диалоговом окне кнопки (в нашем примере такими константами являются
vbOk
и
vbCancel
). Таким образом,
MsgBox
может использоваться в сценариях для организации выбора пользователем одного из возможных вариантов, однако это не совсем удобно, т.к. надписи на кнопках нельзя задавать произвольным образом (можно указать только OK, Отмена, Стоп, Повтор, Пропустить, Да и Нет).

Поделиться:
Популярные книги

Лабиринт Сумерек

Клименко Анна Борисовна
2. Квадрат мироздания
Фантастика:
фэнтези
6.00
рейтинг книги
Лабиринт Сумерек

Камень

Минин Станислав
1. Камень
Фантастика:
боевая фантастика
6.80
рейтинг книги
Камень

Старый, но крепкий 5

Крынов Макс
5. Культивация без насилия
Фантастика:
рпг
аниме
уся
фэнтези
5.00
рейтинг книги
Старый, но крепкий 5

Сердце Дракона. Том 11

Клеванский Кирилл Сергеевич
11. Сердце дракона
Фантастика:
фэнтези
героическая фантастика
боевая фантастика
6.50
рейтинг книги
Сердце Дракона. Том 11

Неверный

Тоцка Тала
Любовные романы:
современные любовные романы
5.50
рейтинг книги
Неверный

Травница Его Драконейшества

Рель Кейлет
Любовные романы:
любовно-фантастические романы
5.00
рейтинг книги
Травница Его Драконейшества

Хозяин теней 2

Демина Карина
2. Громов
Фантастика:
аниме
попаданцы
фэнтези
7.00
рейтинг книги
Хозяин теней 2

Валькирия

Семёнова Мария Васильевна
Фантастика:
фэнтези
9.49
рейтинг книги
Валькирия

Последний Паладин. Том 5

Саваровский Роман
5. Путь Паладина
Фантастика:
фэнтези
попаданцы
аниме
5.00
рейтинг книги
Последний Паладин. Том 5

Натиск

Осадчук Алексей Витальевич
12. Последняя жизнь
Фантастика:
аниме
фэнтези
попаданцы
6.20
рейтинг книги
Натиск

Глэрд VIII: Базис 2

Владимиров Денис
8. Глэрд
Фантастика:
фэнтези
боевая фантастика
попаданцы
5.00
рейтинг книги
Глэрд VIII: Базис 2

Кодекс Охотника. Книга XIII

Винокуров Юрий
13. Кодекс Охотника
Фантастика:
боевая фантастика
попаданцы
аниме
7.50
рейтинг книги
Кодекс Охотника. Книга XIII

Петля, Кадетский Корпус. Книга четвертая

Алексеев Евгений Артемович
4. Петля
Фантастика:
боевая фантастика
попаданцы
аниме
5.00
рейтинг книги
Петля, Кадетский Корпус. Книга четвертая

Кодекс Охотника. Книга XII

Винокуров Юрий
12. Кодекс Охотника
Фантастика:
боевая фантастика
городское фэнтези
аниме
7.50
рейтинг книги
Кодекс Охотника. Книга XII