Глава 2

Глава 2. ОБРАБОТКА СОБЫТИЯ НА VBScript

Обработка события при загрузке Web-страницы

Представим себе, что на Web-странице должны отображаться текущая дата, месяц и год в текстовом окне, следовательно, необходимо воспользоваться функцией, которая запускает таймер. На рис. 2 показана Web-страница с реализованным заданием, которое можно увидеть, открыв ПРИМЕР1.

Рис. 2. Пример запуска функции при загрузке Web-страницы

Событием при открытии Web-страницы является ее загрузка, поэтому тег <BODY> должен включать в себя обработчик события OnLoad, который ссылается на процедуру работы с преобразованием текущей даты (функция Now()). Текст такой записи выглядит следующим образом:

<BODY Onload="P1()" > (В программе добавлены элементы стиля представления всего тела документа, который открывается перед пользователем). Запись Onload="P1()" обозначает, что подключается обработчик события при загрузке страницы, который выполняет действия, заложенные в виде алгоритма вычислений в процедуре “P1()”. Процедура написана на VBScript, поэтому она обозначена Sub (от сокращения – Subruatine - подпрограмма). Алгоритм формирования текущей даты заключается в том, что при просмотре даты (Day), месяца (Mounth) следует выводить на экран числа, состоящие из двух разрядов, т.е. если число менее 10, то слева от него добавляется ноль. Код подпрограммы на VBScript обычно записывается до того, как будет дано описание на HTML всех элементов, расположенных на Web-странице. На листинге 1 представлен код программы на VBScript.

Листинг 1.

Dim perem ' Ввели переменную

Sub P1() ' Подпрограмма формирования текущей даты

DD=Day(Now()) ' Now() - это стандартная функция VBScript для преобразования даты

If DD < 10 Then

DD = "0" & DD ' Проверка текущей даты и добавление слева нуля

End If

MM=Month(Now())

If MM < 10 Then

MM="0" & MM ' Добавление нуля перед числом, если оно меньше 10

End If

GG=Year(Now())

perem=DD & "." & MM & "." & GG ' Сборка даты с разделителем /

document.F1.Den.value = perem ' Текущая дата заносится в окно с именем Den,

‘ которое относится к форме с именем F1

End Sub

</SCRIPT>

В качестве переменной для сбора составляющих текущую дату выбрано имя perem, после завершения работы алгоритма, объекту с именем Den присваивается значение, которое находится в переменной perem. Так как объект с именем Den находится на форме (имя формы F1), принадлежащей открываемому документу, то создается запись document.F1.Den.value = perem. Отображение текста и окна для вывода текущей даты создаётся с помощью тегов HTML, которые представлены на листинге 2.

Листинг 2

<B>Напоминаем, сегодня:<BR>

</FORM>

</P>

</BODY>

При просмотре примера в браузере Internet Explorer можно увидеть полностью программу, загруженной Web-страницы с системной датой.