6. Работа с окнами сообщений. Получение информации от пользователя. Отображение хода выполнения скрипта

Взаимодействие с пользователем из скрипта VBScript, встроенные функции MsgBox() и Inbox(), метод WshShell.Popup()

6.1 Окна сообщений

Самый простой способ обеспечения взаимодействия с пользователем из скрипта - применение окон сообщений.

Что обычно посылается:

• информация (вроде объявлений, например, о технологических перерывах),
• юридические предупреждения,
• информация о действиях, которые выполняются скриптом на компьютере пользователя.

Очень часто окна сообщений используются в logon scripts.

Вывести окно сообщения можно разными способами. Самый простой способ - WScript.Echo, однако если вы используете для запуска скрипта CScript, то информация будет выведена в командной строке.

Наиболее рекомендуемый способ - функция MsgBox, больше всего возможностей. Всплывающее окно будет выведено, даже если в CScript был указан параметр //b (batch mode).

Пример:

MsgBox "Test"

Еще один вариант - воспользоваться методом Popup объекта WScript.Shell:

set oShell = WScript.CreateObject (“WScript.Shell”)

oShell.Popup “Test”, 3

По возможностям все очень похоже на MsgBox, главное отличие - можно указать время в секундах, в течение которого будет висеть окно сообщения. По истечении этого времени окно закроется.

Возможностей у MsgBox достаточно много:

o       можно отображать разное кол-во кнопок (OK, Cancel, Abort, Retry, Ignore, Yes, No),

o       можно показывать символы Critical, Warning, Question, Information,

o       можно выбирать кнопку по умолчанию,

o       можно делать окно модальным или обычным.

В зависимости от того, на какую пользователь кнопку нажал, такое значение возвращается скрипту (всего 7 вариантов). Можно также подвязывать справку, которая откроется по F1. Подробнее - VBScript help, MsgBox -> Function.

Пример возврата значения от MsgBox:

Dim MyVar

MyVar = MsgBox ("Будем делать?", 65, "Демонстрационное окно сообщения")

Если значение MyVar = 1, то пользователь нажал OK, если 2, то Cancel.

При использовании объекта WScript.Shell если пользователь не нажал ни на какую кнопку, то в этом случае переменной присваивается значение -1.

Если просто кнопками не обойтись, то в этом случае удобнее всего использовать функцию InputBox. Все очень просто:

Dim Input

Input = InputBox("Enter your name")

MsgBox ("You entered: " & Input)

Получить учебные материалы по этому курсу