Основні модулі, алгоритми
При створенні проекту було використано наступні модулі:
1. Модуль реєстрації користувача:
Рис. 4.2.1 – Модуль реєстрації користувача.
2. Модуль фільтрації або пошуку книги(за запитом користувача)
Рис. 4.2.2 – Модуль фільтрації / пошуку книг(и)
3. Модуль знайдених або відфільтрованих книг за запитом.
Рис. 4.2.3 – Модуль перегляду списку знайдених / відфільтрованих книг по запиту користувача.
4. Інформаційний модуль перегляду даних про книги.
Рис. 4.2.4 – Модуль перегляду повної інформації по вибраній книзі.
5. Модуль управління бібліотекою.
Рис. 4.2.5 – Модуль управління бібліотеки.
Для роботи бази даних з проектом було використано наступний алгоритм: Sub Page_Load(ByVal Sender as Object, ByVal E as EventArgs)
If Len(Session("LibUserID")) = 0 Then
Response.Redirect("./index.aspx")
End If
If Session("UserType") <> "Бібліотекарь" Then
Response.Redirect("./menu.aspx")
End If
If Not IsPostBack Then
Dim DBConn as OleDbConnection
Dim DBCommand As OleDbDataAdapter
Dim DSPageData as New DataSet
DBConn = New OleDbConnection("PROVIDER=Microsoft.Jet.OLEDB.4.0;" _
& "DATA SOURCE=" _
& Server.MapPath("/INetBook/C5/Library/" _
& "Access/C5Library.mdb;"))
DBCommand = New OleDbDataAdapter _
("select LibBookCategoryID, CategoryName " _
& "from LibCategories Order By CategoryName" _
, DBConn)
DBCommand.Fill(DSPageData, _
"Categories")
ddlibBookCategoryID.DataSource = _
DSPageData.Tables("Categories").DefaultView
ddlibBookCategoryID.DataBind()
DBCommand = New OleDbDataAdapter _
("select LibBookID, BookTitle " _
& "from LibBooks Order By BookTitle" _
, DBConn)
DBCommand.Fill(DSPageData, _
"Books")
ddlBooks.DataSource = _
DSPageData.Tables("Books").DefaultView
ddlBooks.DataBind()
End If
End Sub
Sub Delete_Click(Sender As Object, E As EventArgs)
Dim DBConn as OleDbConnection
Dim DBCommand As OleDbDataAdapter
Dim DSPageData as New DataSet
Dim DBDelete As New OleDbCommand
DBConn = New OleDbConnection("PROVIDER=Microsoft.Jet.OLEDB.4.0;" _
& "DATA SOURCE=" _
& Server.MapPath("/INetBook/C5/Library/" _
& "Access/C5Library.mdb;"))
DBDelete.CommandText = "Delete From LibBooks " _
& "Where LibBookID = " & ddlBooks.SelectedItem.Value
DBDelete.Connection = DBConn
DBDelete.Connection.Open
DBDelete.ExecuteNonQuery()
DBCommand = New OleDbDataAdapter _
("select LibBookID, BookTitle " _
& "from LibBooks Order By BookTitle" _
, DBConn)
DBCommand.Fill(DSPageData, _
"Books")
ddlBooks.DataSource = _
DSPageData.Tables("Books").DefaultView
ddlBooks.DataBind()
End Sub
Sub Add_Click(Sender As Object, E As EventArgs)
Dim DBConn as OleDbConnection
Dim DBInsert As New OleDbCommand
DBConn = New OleDbConnection("PROVIDER=Microsoft.Jet.OLEDB.4.0;" _
& "DATA SOURCE=" _
& Server.MapPath("/INetBook/C5/Library/" _
& "Access/C5Library.mdb;"))
DBInsert.CommandText = "Insert Into LibBooks " _
& "(BookTitle, Author, LibBookCategoryID, ISBN, " _
& "Keywords, Description, Status, CheckedOutTo) " _
& "values (" _
& "'" & Replace(txtBookTitle.Text, "'", "''") & "', " _
& "'" & Replace(txtAuthor.Text, "'", "''") & "', " _
& ddlibBookCategoryID.SelectedItem.Value & ", " _
& "'" & Replace(txtISBN.Text, "'", "''") & "', " _
& "'" & Replace(txtKeywords.Text, "'", "''") & "', " _
& "'" & Replace(txtDescription.Text, "'", "''") & "', " _
& "'Доступна', 0)"
DBInsert.Connection = DBConn
DBInsert.Connection.Open
DBInsert.ExecuteNonQuery()
Response.Redirect("./menu.aspx")
End Sub
Висновок
В ході виконання курсової роботи було реалізовано WEB – додаток, який надає можливість користувачам замовляти реальну книгу в електронній черзі, що надає собою зручність та оперативність бібліотекарю та користувачу.
До основних функцій продукту належать:
· Реєстрація користувача;
· Замовлення книги;
· Повернення книги;
· Додавання книги в базу даних;
· Пошук або фільтрація книг по запиту;
· Перегляд основної інформації по вибраній книзі.
Основне призначення додатку є функція створення віртуальної черги, яка не допускає собою створення реальної(фізичної) черги в бібліотеці. Користувачу достатньо замовити книгу через WEB – додаток і отримати книгу «на руки». Реалізується це все за допомогою WEB – додатку (сторінки), що розміщений на сервері(локальний сервер).
Початкова WEB – сторінка надає користувачеві змогу увійти(реєструватися) в систему(на сайт) для отримання подальших можливостей, які запропоновані WEB – додатком. Кожна із сторінок відповідає певному розділу інформації. За основне призначення додатку відповідає сторінка «book.aspx» та «man_menu.aspx». В «book.aspx» виконується замовлення книги, а в «man_menu.aspx» виконується управління бібліотекою (додавання/видалення книг).
Даний WEB – додаток значно спрощує життя людям(користувачам) замінюючи реальну(фізичну) чергу на електронну, що надає собою більш швидку оперативність при своєму використанні.
Література
1. http://msdn.microsoft.com/ru-ru/asp.net/gg404476.
2. Разработка Web- приложений на Microsoft Visual Basic.NET.
3. Microsoft Visual C#.NET. Учебный курс MCAD MCSD.
4. Бучек Г. ASP.NET. Учебный курс — СП6.: Питер. 2002. — 512 с.: ил.
5. Архитектура безопасности ASP.NET http://msdn.microsoft.com/ruru/library/yedba920.aspx 6.05.09.
6. Троелсен Э. «C# и платформа.NET. Библиотека программиста» - СПб.: Питер 2007 796л.
7. http://www.ebooks.streltsov.spb.su/microsoft.htm.
8. http://www.aabooks.ru/books/180.html.
9. Шилдт Г. — Самоучитель C++, видавництво — «БХВ-Петербург, 3-е издание, 2003», 318с. ISBX 944-53S-328-2.
10. Т. А. Павловська, Програмування високого рівня, Києво-Могилян. акад. 285с. 2005. ISBX 911-11S-418-4.
11. Н. Вірт - Алгоритми і структура даних, Києво-Могилян. акад., 366с. ISBX 962-75S-358-0.
12. Charls Petsold (Ч. Петзольд) - Код – таємна мова програмування. Washing. P., 2004. 206c. ISBX 162-53S-238-4.
Дата добавления: 2016-06-05 | Просмотры: 343 | Нарушение авторских прав
1 | 2 | 3 | 4 | 5 |
|