計算機科學(xué)系資料室管理系統(tǒng)的設(shè)計與實現(xiàn)--畢業(yè)論文(編輯修改稿)
2024-12-04 23:04 本頁面
【文章內(nèi)容簡介】 (1)支持資料室實現(xiàn)規(guī)范化的管理。 (2)支持資料室高效率完成資料管理和借閱的基本處理，包括資料、用戶、記錄、操作員的添加、修改、刪除以及歸還提示等信息。 (3)盡量采用資料室現(xiàn)有軟硬件環(huán)境，及先進的管理系統(tǒng)開發(fā)方案，從而達(dá)到充分利用學(xué)?，F(xiàn)有資源，提高 系統(tǒng)開發(fā)水平和應(yīng)用的目的。 (4)系統(tǒng)采用模塊化程序設(shè)計方法，既便于系統(tǒng)功能的各種組合和修改，又便于未參與開發(fā)的技術(shù)維護人員補充、維護。 系統(tǒng)功能模塊設(shè)計 對上述各項功能進行集中、分塊、按照結(jié)構(gòu)化程序設(shè)計的要求，得到如下圖所示的系統(tǒng)功能模塊圖： 圖 功能模塊 本系統(tǒng)主要有系統(tǒng)登陸模塊、用戶模塊、一般管理員模塊、超級管理員模塊四個功能模塊。 系統(tǒng)登陸 在登陸這個模塊中共包括用戶登陸、管理員登陸、注冊、用戶須知、找回密碼等頁面。這些頁面之間的聯(lián)系并不大，只是它們實現(xiàn)的主 要是注冊登陸的功能，故將其劃分在一個模塊中。其中的管理員登陸和用戶須知比較簡單，此處略。 (1).登陸實現(xiàn)過程 啟動系統(tǒng)后，首先進入登陸頁面： 圖 登陸頁面 用戶根據(jù)自己的用戶名和密碼點擊 進行登錄。將用戶輸入的用戶名和密碼與數(shù)據(jù)庫中相匹配，正確即登入，錯誤即退出。其主要實現(xiàn)代碼如下： If = Or = Then ( ) End If Dim conn As New SqlConnection(Server=(local)。Database=cd_lib。Uid=sa。pwd=chen) Dim m As New SqlCommand(select * from userinfo where username=39。 + + 39。 and upwd=39。 + + 39。) Dim dr As SqlDataReader () = conn = dr = If = False Then ( ) Else Session(username) = dr(username) Session(uid) = dr(uid) () End If () () (2).找回密碼實現(xiàn)過程 已注冊用戶不可避免的會出現(xiàn)忘記密碼的情況，此系統(tǒng)充分考慮到這個情況，在一定信息驗證通過后，將用戶的密碼從數(shù)據(jù)庫中讀出： password = (upwd) 39。取出密碼，準(zhǔn)備發(fā)送到郵箱中 發(fā) 送到用戶的注冊郵箱中，為用戶提供方便： Dim objmail As New MailMessage = = = 返回密碼 —— 來自計算機科學(xué)系資料室 = 尊敬的用戶： BR / 你好！BR / 你索取的密碼為： amp。 password amp。 ，請妥善保管。 = = = 39。設(shè)置發(fā)信服務(wù)器為本機 (objmail) 當(dāng)用戶名、認(rèn)證號碼、注冊郵箱都填寫正確，則彈出 ，可 去查看郵件，取回密碼。 (3).注冊實現(xiàn)過程 本系統(tǒng)的注冊，必須是長江師范學(xué)院計算機科學(xué)系的教師和學(xué)生，擁有指定的認(rèn)證號碼（教師為教師編號、學(xué)生為學(xué)號）。主要是將數(shù)據(jù)庫中已有 ID 的用戶部分信息更新到數(shù)據(jù)庫。 圖 注冊頁面 其主要實現(xiàn)代碼如下： Dim conn As New SqlConnection(Server=(local)。Database=cd_lib。Uid=sa。pwd=chen) Dim str As String Dim m As SqlCommand str = update userinfo set username=39。 + + 39。,upwd=39。 + + 39。,u= 39。 + + 39。 where uid = amp。 Trim() () m = New SqlCommand(str, conn) Dim b As Boolean Try () Catch ( ) b = True Finally () () End Try If Not b Then ( ) End If 此處在讀取數(shù)據(jù)庫的時候可能發(fā)生錯誤，比如輸入的認(rèn)證號碼不存在等等，一致用 “ 數(shù)據(jù)庫錯誤 ” 進行提示。 用戶模塊 用戶登陸后，就進入頁面 ，此頁顯示用戶即將超期的資料和最受歡迎的資料。歸還提示顯示用戶在近三天內(nèi)要歸還的書籍，最受歡迎顯示的是借閱次數(shù)最大的前十項資料，為用戶提供人性化的服務(wù)，效果如圖： 圖 主頁面 歸還提示的數(shù)據(jù)查詢語句： Dim time As String = Dim time1 As String time1 = (time).AddDays(2).ToString 39。必須限定天數(shù)，歸還日期少于 3 的才顯示 Dim backstr As String = select distinct ,beditor,bconcern,borrowtime,returntime from book,borwrecord where = and =39。 amp。 Session(uid) amp。 39。 and returntime between 39。 amp。 time amp。 39。 and 39。 amp。 time1 amp。 39。 order by borrowtime asc 最受歡迎 —— TOP10 的數(shù)據(jù)查詢語句： Dim liststr As String = select distinct top 10 ,bname,beditor,bconcern,bprinttime,borwtimes from book,popular where = order by borwtimes desc 在頁面上方一共有借閱排行、資料查詢、用戶信息、借閱記錄、師資簡介、學(xué)生一覽共 6個頁面，點擊鏈接進入后，可進行相關(guān)操作。點擊資料，可彈出頁面，顯示資料的詳細(xì)信息： 圖 資料詳細(xì)信息頁面 (1).借閱排行實現(xiàn)過程 該頁面 顯示的是所有資料按照借閱次數(shù)的排列次序。數(shù)據(jù)查詢語句是： Dim str As String = select distinct ,bname,beditor,bconcern,bprinttime,bborwstatus,borwtimes from book,popular where = order by borwtimes desc (2).資料查詢實現(xiàn)過程 用戶可以在這里查詢資料，選擇下拉列表中的 “ 索書號、書名、作者、出版社 ” ，并輸入關(guān)鍵字進行查詢。此處使用了模糊查詢（所謂 “ 模糊查詢 ” ，就是利用部分 參數(shù)查找到相關(guān)數(shù)據(jù)的方式），能方便的查出與關(guān)鍵字匹配的記錄。關(guān)鍵技術(shù)是數(shù)據(jù)庫查詢中的字符匹配，使用通配符 “%” 代表任意長度的字符串，從而搜索出相關(guān)記錄。 圖 資料查詢頁面 其主要實現(xiàn)代碼如下： 39。搜索按鈕 Private Sub btnsearch_Click(ByVal sender As , ByVal e As ) Handles Dim str As String = select distinct ,bname,beditor,bconcern,bprinttime,bborwstatu
公司管理相關(guān)推薦
鄂ICP備17016276號-1