Урок 7

Ця вправа показує технологію VBScript.

Як це працює

Основна частина цього сценарію - це програма обробки події OnClick кнопки надсилання cmdSubmit. Починаємо ми з перевірки, чи ввів користувач взагалі що-небудь у полі, за допомогою вбудованої функції VBScript Len. Ця функція повертає довжину вказаного рядка. Якщо ця довжина дорівнює 0, дані не коректні. Ми повідомляємо про це користувачеві та виходимо з роцедури відправки за допомогою виразу Exit Sub:

'Перевіряємо, чи введена інформація користувачем.

If (Len(document.frmExample5a.txtAge.value) = 0) Then

MsgBox "Перед відправкою ви повинні ввести свій вік."

Далі ми перевіряємо, чи є ця інформація числом. Вбудована функція VBScript IsNumeric повертає значення true, якщо значення, що перевіряється - числова величина. Якщо ні, ми говоримо про це користувачеві та виходимо з програми:

'Перевірка того, чи є введена інформація числом.

If (Not(IsNumeric(document.frmExample5a.txtAge.value))) Then

MsgBox "У полі віку необхідно ввести число."

Остання перевірка полягає у відсіві значень, більших 100 і менших 0.

'Перевіряємо, чи правильно введено вік.

If (document.frmExample5a.txtAge.value 100) Then

MsgBox "Ви ввели невірний вік (стільки не живуть)."

Ось і все. Познайомившись із цим прикладом, ви дізналися про основні прийоми для перевірки даних із використанням засобів VBScript.

Порівняно з перевірками процес відправки виглядає дуже простим. У нашому прикладі ми використовували стандартну кнопку HTML з написом Відіслати, пов'язану з проседурою обробки,яка перевіряє та відсилає вміст форми.

Код, який потрібно було додати для відправлення, показаний нижче:

' Якщо дані коректні, то відправляємо їх.

MsgBox "Вік введено правильно. Спасибі."

Вираз із функцією MsgBox повідомляє користувачеві, що введена інформація оброблена. Потім форма відправляє на сервер за допомогою методу submit об'єкта form.

---