Главная страница Случайная страница
Разделы сайта
АвтомобилиАстрономияБиологияГеографияДом и садДругие языкиДругоеИнформатикаИсторияКультураЛитератураЛогикаМатематикаМедицинаМеталлургияМеханикаОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРелигияРиторикаСоциологияСпортСтроительствоТехнологияТуризмФизикаФилософияФинансыХимияЧерчениеЭкологияЭкономикаЭлектроника
Лабораторная работа № 8. Регистрация пользователей на сайте.
|
|
Регистрация пользователей на сайте.
- Регистрация пользователей.
Создайте приложение, позволяющее регистрировать пользователей в Вашей таблице Userlogin. По окончанию регистрации выведите на экран всю таблицу Userlogin с сообщением о регистрации. Внешний вид страницы регистрации примерно такой:
Настройка источника данных. В свойствах источника данных определяем запрос InsertQuery для добавления в таблицу Userlogin регистрационной записи. Создаём параметры (переменные) в окне
Command and Parameter Editor (l, p, f, m), в которые заносим значения из элементов TextBox.
В событийную процедуру для кнопки Зарегистрироваться добавляем выражение:
SqlDataSource1.Insert()
Response.Redirect("./prosm.aspx")
Выражение Response.Redirect("./prosm.aspx") отправляет на страницу prosm.aspx, где должна отобразиться таблица Userlogin с новой записью и сообщением: «Вы зарегистрированы». Для вывода таблицы используйте серверный элемент управления GridView. Внешний вид этой страницы приведён на рисунке. Измените названия полей таблицы для удобства пользователя.
2.Разработка гостевой книги
Разработайте гостевую книгу, для чего:
создайте в базе данных таблицу, соответствующую структуре Вашей гостевой книги. Она должна включать текстовые поля, переключатели radiobutton, Checkbox;
вид гостевой книги может быть таким, как на рисунке.
Выбор кнопки отправить должен привести к вводу в таблицу введённых данных и к просмотру гостевой книги.
Работа с дискретными элементами radiobutton, Checkbox:
объявляются глобальные переменные (далее имеем в виду приведённую структуру гостевой книги) до объявления любых других команд в программе:
Public pol, h1, h2, h3 As String,
где pol относится к radiobutton, а h1, h2, h3 - к Checkbox.
Для переключателей radiobutton следует назвать имя группы (одинаковое для всех). Свойство AutoPostBack для дискретных элементов должно иметь свойство False.
Щелчком по каждому!!!!! дискретному элементу вызываем событийную процедуру и в неё вставляем:
для radiobutton (свой код для каждого!):
pol = RadioButton1.Text
для Checkbox:
h1 = CheckBox1.Text,
также и для h2, h3.
Настройка запроса в источнике данных (Insertquery) приведена на рисунке:
!!! Обратите внимание, что для параметров pol, h1, h2, h3 не объявлены значения (Value).
Событийная процедура для кнопки Button1 (отправить) должна включать операторы проверки заполнения полей гостевой книги и команды ввода данных в таблицу БД:
SqlDataSource1.InsertParameters(" pol").DefaultValue = pol
SqlDataSource1.InsertParameters(" h1").DefaultValue = h1
SqlDataSource1.InsertParameters(" h2").DefaultValue = h2
SqlDataSource1.InsertParameters(" h3").DefaultValue = h3
SqlDataSource1.Insert()
Можно предусмотреть переход на просмотр гостевой книги:
Response.Redirect("./prosmotr_guest.aspx")
Код приложения приведён ниже.
Partial Class gostevaya
Inherits System.Web.UI.Page
Public pol, h1, h2, h3 As String
Protected Sub RadioButton1_CheckedChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles RadioButton1.CheckedChanged
pol = RadioButton1.Text
End Sub
Protected Sub RadioButton2_CheckedChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles RadioButton2.CheckedChanged
pol = RadioButton2.Text
End Sub
Protected Sub CheckBox1_CheckedChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles CheckBox1.CheckedChanged
h1 = CheckBox1.Text
End Sub
Protected Sub CheckBox2_CheckedChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles CheckBox2.CheckedChanged
h2 = CheckBox2.Text
End Sub
Protected Sub CheckBox3_CheckedChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles CheckBox3.CheckedChanged
h3 = CheckBox3.Text
End Sub
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
SqlDataSource1.InsertParameters(" pol").DefaultValue = pol
SqlDataSource1.InsertParameters(" h1").DefaultValue = h1
SqlDataSource1.InsertParameters(" h2").DefaultValue = h2
SqlDataSource1.InsertParameters(" h3").DefaultValue = h3
SqlDataSource1.Insert()
Response.Redirect("./Main.aspx")
End Sub
End Class
|
|