Глава 6. Структуры управления asp 60
Практикум 6.1. Кнопки в действии 60
Практикум 6.2. Пример обработки некоторого текста 63
Практикум 6.3. Обработка списков, используя структуру перехода 65
Практикум 6.4. Обработка результатов переключателя radio button структурой перехода If Then Else 68
Практикум 6.5. Обработка элемента флажок checkbox 70
Практикум 6.6. Обработайте созданную вами анкету используя приемы рассмотренные в этом практикуме 73
73
Глава 6. Структуры управления asp Практикум 6.1. Кнопки в действии
Щ
<HTML> <HEAD> <TITLE>Pr_6_1</TITLE> </HEAD> <BODY> <H1>Учебный
пример</H1> <FORM
ACTION="Result.asp" METHOD=POST>
<P>Введите
ваше имя</P> <INPUT
TYPE='TEXT' NAME='Firstname'>
<P>Введите
ваше отчество</P> <INPUT
TYPE='TEXT' NAME='Middlename'>
<P>Введите
вашу фамилию</P> <INPUT
TYPE='TEXT' NAME='Lastname'> <BR> <BR> <INPUT
TYPE='SUBMIT' VALUE='Далее'> <INPUT
TYPE='RESET' VALUE='Сброс'> </FORM> </BODY> </HTML> <FORM
ACTION="Result.asp" METHOD=POST> <INPUT
TYPE=”SUBMIT” VALUE=”Submit”> </FORM>
Сохраните этот код в файле под именем pr_6_1.asp. Вид этой страницы показан на рис. 6.1.
Рис. 6.1. Внешний вид страницы pr_6_1.asp
Т
<HTML> <HEAD> <TITLE>Sign
In Sheet for New Products Seminar</TITLE> </HEAD> <BODY> <% Dim
strFirstname, strMiddlename, strLastname strFirstname
= Request.Form("Firstname") strMiddlename
= Request.Form("Middlename") strLastname
= Request.Form("Lastname") Response.Write
"<P style='color:gray'>Добро пожаловать</P>"
Response.Write
"<DIV style='color:red;'>" & strFistname
&"</DIV>" Response.Write
"<DIV style='color:red;'>" & strMiddlename
&"</DIV>" Response.Write
"<DIV style='color:red;'>" & strLastname
&"</DIV>" %> </BODY> </HTML>
При помощи ключевого слова Dim, я описал три переменные (strFirstname, strMiddlename, strLastname), в которых будут храниться данные, введенные пользователем на странице pr_6_1.asp. Далее я присвоил своим переменным новые значения, используя Request.Form (“Name”). На последнем этапе я отображаю значения переменных используя команды HTML. Результат обработки данных показан на рис. 6.2.
Рис. 6.2. Вид страницы result.asp в окне браузера
Практикум 6.2. Пример обработки некоторого текста
С
<HTML> <HEAD> <TITLE>Pr_6_2</TITLE> </HEAD> <BODY> <H1>Учебный
пример pr_6_2</H1> <FORM
ACTION="Result_6_2.asp" METHOD=POST> Введите
название вуза <TEXTAREA
NAME="Txtname" COLS="50" ROWS="5"> </TEXTAREA> <INPUT
TYPE='SUBMIT' VALUE='Далее'> <INPUT
TYPE='RESET' VALUE='Сброс'> </FORM> </BODY> </HTML>
Окно браузера имеет вид:
Рис. 6.3. Вид примера pr_6_2.asp в окне браузера
Создадим страницу result_6_2.asp, результатом работы которой будет, преобразование всех малых букв введенного текста в прописные (заглавные) буквы:
Преобразование букв происходит при помощи функции Ucase.
<HTML> <HEAD> <TITLE>pr_6_2</TITLE> </HEAD> <BODY> <% Dim
strTxtname strTxtname
= Request.Form("Txtname") Response.Write
"<DIV style='color:red;'>" & Ucase(strTxtname)
&"</DIV>" %> </BODY> </HTML>
О
кно
примера result_6_2.asp в окне
браузера:
Рис. 6.4. Окно браузера с многострочным текстовым полем