- •Основы языка vbScript
- •Оглавление
- •Задание 1. Вставка сценария на vbScript в Web-страницы
- •Работа с несовместимыми броузерами
- •Первое упражнение по языку vbScript
- •Упражнение 1: вставка сценария на vbScript на страницу
- •Создание документа html
- •Добавление сценария
- •Как это работает
- •Лучший метод для внедрения vbScript
- •Как это работает
- •Задание 2. Работа с переменными
- •Объявление переменных
- •Правила для названия переменных
- •Варианты и подтипы
- •Присваивание значений
- •Сферы влияния переменных
- •Константы
- •Второе упражнение по языку vbScript
- •Создание документа
- •Добавление vbScript
- •Как это работает
- •Задание 3. Объекты и vbScript
- •Добавление объектов на страницу
- •Связывание кода на vbScript с объектами
- •Третье упражнение по vbScript
- •Упражнение 3: работа с объектами
- •Исследование документа html
- •Добавление vbScript
- •Как это работает
- •Задание 4. Управляющие операторы vbScript
- •Условные выражения
- •Операторы цикла
- •Четвертое упражнение по vbScript
- •Упражнение 4: работа с циклами
- •Как это работает
- •Просмотр товаров
- •Вычисление скидок
- •Развитие этого приложения
- •Задание 5. Использование vbScript при создании форм
- •Проверка содержимого ваших форм
- •Проверка вводимой информации
- •Как это работает
- •Отправка формы
- •Пятое упражнение по vbScript
- •Упражнение 5: как проверить и отправить форму
- •Исследование документа html
- •Как это работает
- •Проверка формы
- •Отправка формы
Проверка содержимого ваших форм
Этот процесс заключаетсч в проверке того, что:
введены все требуемые данные;
все данные введены правильно.
Написание сценария, осуществляющего такую проверку, однообразно и утомительно, но позволяет избавиться от ошибок при передаче данных.
Пример такой проверки, который мы будем исследовать, не задействует ничего нового из средст VBScript. Мы просто использовали элементы, изученные в предыдущих заданиеах, и соединили их новым способом. Перед тем как идти дальше, вы можете посчитать для себя полезным поразмышлять самостоятельно, как это все можно сделать с помощью уже знакомых средств VBScript.
Уже подумали? Теперь рассмотрим пример, для того чтобы показать вам, что можно сделать для проверки содержимого форм.
Проверка вводимой информации
Этот пример на удивление прост. В нем есть единственное поле, куда пользователь может ввести свой возраст и кнопку, используемую для отправки данных на сервер.
<HTML>
<HEAD>
<TITLE>Упражнение по VBScript: 5</TITLE>
<SCRIPT LANGUAGE="VBScript">
<!--Это сделано для броузеров, которые не понимают
Option Explicit
Sub cmdSubmit_OnClick()
'Проверяем, введена ли информация пользователем.
If (Len(document.frmExample5a.txtAge.value) = 0) Then
MsgBox "Перед отправкой вы долны ввести свой возраст."
Exit Sub
End If
'Проверка того, является ли введенная информация числом.
If (Not(IsNumeric(document.frmExample5a.txtAge.value))) Then
MsgBox "В поле возраста необходимо ввести число."
Exit Sub
End If
'Проверяем, правильно ли введен возраст.
If (document.frmExample5a.txtAge.value < 0) Or _
(document.frmExample5a.txtAge.value > 100) Then
MsgBox "Вы ввели неверный возраст (столько не живут)."
Exit Sub
End If
'Если данные корректны, то отправляем их.
MsgBox "Возраст введен верно. Спасибо."
document.frmExample5a.submit
End Sub
-->
</SCRIPT>
</HEAD>
<BODY>
<H1>Проверка вводимой информации</H1>
<P>Это упражнение демонстрирует технологию VBScript.</P>
<FORM NAME="frmExample5a">
<TABLE>
<TR>
<TD>Введите свой возраст:</TD>
<TD><INPUT TYPE="Text" NAME="txtAge" SIZE=2></TD>
</TR>
<TR>
<TD><INPUT TYPE="Button" NAME="cmdSubmit" VALUE="Отослать"></TD>
<TD></TD>
</TR>
</TABLE>
</FORM>
</BODY>
</HTML>
Как это работает
Основная часть этого сценария -- это программа обработки события OnClick кнопки отправки cmdSubmit. Начинае мы с проверки, ввел ли пользователь вообще что-нибуть в поле, с помощью встроенной функции VBScript Len. Эта функция возвращает длину указанной строки. Ели эта длина равна 0, данные не корректны. Мы сообщаем об этом пользователю и выходим из роцедуры отправки с помощью выражения Exit Sub:
'Проверяем, введена ли информация пользователем. If (Len(document.frmExample5a.txtAge.value) = 0) Then MsgBox "Перед отправкой вы долны ввести свой возраст." Exit Sub End If
Дальше мыпроверяем, является ли эта информация числом. Встроенная функция VBScript IsNumeric возвращает значение true, если проверяемое значение -- числовая величина. Если нет, мы говорим об этом пользователю и выходим из программы:
'Проверка того, является ли введенная информация числом. If (Not(IsNumeric(document.frmExample5a.txtAge.value))) Then MsgBox "В поле возраста необходимо ввести число." Exit Sub End If
Последняя проверка заключается в отсеве значений, больших 100 и меньших 0.
'Проверяем, правильно ли введен возраст. If (document.frmExample5a.txtAge.value < 0) Or _ (document.frmExample5a.txtAge.value > 100) Then MsgBox "Вы ввели неверный возраст (столько не живут)." Exit Sub End If
Вот и все. Познакомившись с этим примером, вы узнали об основных приемах для проверки данных с использованием средств VBScript.