Функції vbScript.

Функція являє собою послідовність інструкцій мови VBScript, що можуть бути викликані іншою функцією, чи процедурою сценарієм. Функція може одержувати аргументи (змінні чи вираження) і повертати значення її програмі, що її викликала.

Взаємодія з користувачем

Для взаємодії з користувачем VBScript містить дві функції:

• MsgBox — для виводу повідомлень;

• InputBox — для введення значень користувачем.

Функція MsgBox() служить для виведення простих діалогових вікон з текстовими повідомленнями.

Для організації діалогу з користувачем діалогове вікно функції MsgBox може містити кілька кнопок. Синтаксис функції виглядає трохи складніше:

MsgBox(текст, [кнопки], [заголовок])

Обов'язковий аргумент текст — це власне повідомлення, що бачить користувач. Кнопки — які саме кнопки повинні бути видні в діалоговому вікні. Заголовок — напис у верхній частині діалогового вікна. Аргументи кнопки і заголовок необов'язкові. Якщо вони опущені, діалогове вікно містить одну кнопку ОК і заголовок VBScript. Як аргумент кнопки може бути використана або константа, або її значення.

Константа Значення Кнопки

vbOKOnly 0 OK

vbOKCancel 1 OK і Скасування

vbAbortRetryIgnor 2 Перервати, Повторити, Пропустити

vbYesNoCancel 3 Так, Ні, Скасування

vbYesNo 4 Так, Ні

vbRetryCancel 5 Повторити, Скасування

Наприклад, у результаті виконання наступної рядка коду з'явиться діалогове вікно з питанням, чи продовжити роботу, якщо потрібний файл не знайдений:

choice = MsgBox ("Файл не знайдений. Продовжити?, vbYesNo")

Значення, що повертає функція MsgBox, приведені нижче. За цими значеннями можна визначити, яку кнопку вибрав користувач.

Константа Значення

vbOK 1

vbCancel 2

vbAbort 3

vbRetry 4

vblgnore 5

vbYes 6

vbNo 7

Для того щоб у діалоговому вікні разом з повідомленням була показана піктограма, до аргументу кнопки необхідно додати одне зі значень:

Константа Значення Піктограма

vbCritical 16 Критична помилка

vbQuestion 32 Питання

vbExclamation 48 Попередження

vblnformation 64 Інформаційна

Функція InputBox ()

Ця функція призначена для введення користувачем текстових рядків, як показано в наступному прикладі:

UserName = InputBox("Будь ласка, введіть ваше ім'я")

MsgBox "Привіт, " & UserName

Об'єкти VBScript

Функції керування потоком виконання та вбудовані функції VBScript — це тільки базові засоби мови. Взаємодія з Windows, іншими програмними додатками і файловою системою забезпечується об'єктами, що являють собою додаткові компоненти, які розширюють можливості VBScript.

У загальному значенні об'єкт — це невелика програма для обробки якої-небудь визначеної інформації. Як правило, об'єкти являють собою програмну модель таких елементів середовища, як папки, файли, мережеві підключення, чи наприклад, таблиці Excel. Кожен об'єкт має властивості, що характеризують елемент операційного середовища, який він представляє, і методи — дії над цим елементом.

Наприклад, об'єкт VBScript File має такі властивості, як ім'я, розмір і дата створення, тобто ті ж самі, що й кожен файл операційної системи Windows. Методи об'єкта File — це звичні дії, що виконуються з кожним файлом системи: перейменування, читання, запис і т.д.

Код наступного сценарію призначений для відображення обсягу вільного простору на кожнім дисковому накопичувачі, встановленому в комп'ютері.

set fso = CreateObject("Scripting.FileSystemObject")

set drvs = fso.Drives

for each drv in drvs

if drv.IsReady then

MsgBox "На диску " & drv.DriveLetter &

" вільно " & drv.FreeSpace & " байт"

end if

next

Додаткову інформацію про роботу з сервером сценаріїв можна отримати у літературі [2, стор. 852-896].