【文章內(nèi)容簡介】 ame 文本 50 varchar 不 能為空 課程名 SeledCredit 數(shù)據(jù) 4 int 能為空 已選學(xué)分 表 8 系管理員用戶表 Apartadmin 字段名 字段說明 類型 寬度 /類型 備注 描述 AadID 數(shù)據(jù) 10 int 主關(guān)鍵字 管理員 ID Aad_Name 文本 20 char 不 能為空 管理員名 Aad_Pwd 文本 20 varchar 不能為空 密碼 ApartID 文本 10 char 外鍵 系別號 表 9 教務(wù)管理員表 Teachadmin 字段名 字段說明 類型 寬度 /類型 備注 描述 TadID 文本 5 char 主關(guān)鍵字 管理員號 Tad_Name 文本 20 char 不能為空 管理員名 Tad_Pwd 文本 20 varchar 不能為空 密碼 TadLevel 文本 10 char 不能為空 級別 表 10 超級管理員用戶表 Superadmin 字段名 字段說明 類型 寬度 /類型 備注 描述 Sad_ID 數(shù)據(jù) 8 int 主關(guān)鍵字 管理員號 Sad_Name 文本 20 char 不能為空 管理員名 Sad_Pwd 文本 20 varchar 不能為空 密碼 11 表 11 選課系統(tǒng)設(shè)計(jì)表 SysState 字段名 字段說明 類型 寬度 /類型 備注 ID 數(shù)據(jù) int char 主關(guān)鍵字 Startdate 日期 8 datetime 不能為空 Enddate 日期 8 datetime 不能為空 項(xiàng)目特色 本項(xiàng)目采用 visual studio .NET2022 與 SQL Server 2022進(jìn)行開 發(fā)。 visual studio .NET2022是微軟最新推出的強(qiáng)大的可視化集成開發(fā)環(huán)境 . ASP. NET中的一員，它繼承了 ，同時(shí)加入完全面向?qū)ο蟮脑O(shè)計(jì)思想，使應(yīng)用程序的設(shè)計(jì)更加方便、快捷。另外。 本項(xiàng)目在啟動時(shí)需要進(jìn)行登錄驗(yàn)證，由于用戶的信息保存在服務(wù)器的數(shù)據(jù)中，所以在本地應(yīng)當(dāng)連接數(shù)據(jù)庫服務(wù)器的信息 把所得到的信息進(jìn)行驗(yàn)證（服務(wù)器的名稱，登錄數(shù)據(jù)庫的用戶名、密碼等），用戶通過驗(yàn)證后在給與用戶相應(yīng) 的權(quán)限，在進(jìn)入系統(tǒng)進(jìn)行操作。 登錄 頁面設(shè)計(jì)分析 此界面是用戶 登錄 的必通過驗(yàn)證的界面，分為四個(gè)用戶，分別是學(xué)生、系管理員、教務(wù)管理員、超級管理員；各個(gè)用戶的功能不一樣，以及各個(gè)用戶 登錄 的ID 含義也不一樣，在頁面上有提示，請注意閱讀如圖 8。 圖 8 系統(tǒng)登錄圖 12 你可以從用戶類型中選擇你的身份，然后根據(jù)提示輸入用戶名，密碼，單擊登錄 即可。 If = 學(xué)生 Then searchSql = select , from Student,class,major,apartment where Stu_Num=39。 amp。 amp。 39。and Stu_Pwd=39。 amp。 amp。 39。and = and = and = ElseIf = 系管理員 Then searchSql = select Aad_Name,apartid from Apartadmin where AadID=39。 amp。 amp。 39。and Aad_Pwd=39。 amp。 amp。 39。 ElseIf = 教務(wù)管理員 Then searchSql = select tad_Name from Teachadmin where TadID=39。 amp。 amp。 39。and Tad_Pwd=39。 amp。 amp。 39。 ElseIf = 超級管理員 Then searchSql = select sad_Name from Superadmin where Sad_ID=39。 amp。 amp。 39。and Sad_Pwd=39。 amp。 amp。 39。 End If //連接數(shù)據(jù)庫并打開 = New SqlConnection(server=.。database=JXFZ。uid=sa。pwd=123 ) () cmd = New SqlCommand(searchSql, ) dr = () If () Then () islogin = 1 //成功把 islogin 設(shè)置為 1 //選課用戶類型，數(shù)據(jù)用戶密碼正確后轉(zhuǎn)跳下一頁面 If = 學(xué)生 Then () ElseIf = 教務(wù)管理員 Then () 13 ElseIf = 超級管理員 Then () ElseIf = 系管理員 Then () End If Else islogin = 0 //如果不成功設(shè)置為 0 End If 用上面數(shù)據(jù)庫查詢語句，判斷用戶輸入的用戶名和密碼是否正確。如果正確就可以轉(zhuǎn)跳到下一頁面繼續(xù)操作。如果不正確就轉(zhuǎn)向 頁面 . 學(xué)生使用自己的學(xué)號進(jìn)行 登錄 后，如果是在選課的時(shí)間內(nèi)，學(xué)生就可以進(jìn)入選課頁面和查看自己信息和修改密碼，如果學(xué)生現(xiàn)在的時(shí)間不在選時(shí)間，那么學(xué)生就只能看見查詢個(gè)人信息和修改密碼。 //判斷學(xué)生是否正確 登錄 strsql = select startdate,enddate from sysstate where id=1 cmd = New SqlCommand(strsql, conn) dr = If () Then () If () (0) And () (1) Then = True 39。學(xué)生信息 = True 39。選課 Else = True 39。學(xué)生信息 = False 39。選課 End If End If If Not IsPostBack Then = 本次選課從 amp。 (0) amp。 開始到 amp。 (1) amp。 截止 ,注意選課時(shí)間 = End If 以上代碼判斷當(dāng)前日期是否在教務(wù)管理員或者超級管理員選課開放的時(shí)間， 14 如果是則學(xué)生可以選課，如果不是則學(xué)生不能選課。 測試效果圖為 圖 9: 當(dāng)你不在選 課的時(shí)間段的時(shí)候 ,學(xué)生 登錄 后 ,以前選課的連接就不存在 . 圖 9 學(xué)生頁面 如果在選課的時(shí)間段內(nèi) ,學(xué)生 登錄 后就會看見選課連接 ,這時(shí)你就可以進(jìn)入選課頁面進(jìn)行選課 如圖 10. 圖 10 學(xué)生可選課頁面 當(dāng)系管理員成功 登錄 后，系管理員具有修改，刪除，更新學(xué)生、教師、課程、專業(yè)、系別控制選課類型的功能 。當(dāng)管理員進(jìn)入選課控制界面后就會顯示： 15 圖 11 系管理員控制選課頁面 這時(shí) ,你就可以設(shè)置課程是否可供學(xué)生選課 ,以及取消選課和設(shè)為公選課等等功能 .例如 :當(dāng)你把課號為 fdfd 和 fdsfsdfs 設(shè)為公選課時(shí) ,你就會看到以下界面 : 圖 12 系管理員設(shè)置后的顯示頁面 如果取消課號為 fdfd時(shí)你又回看見如下界面 : 圖 13 系管理員取消設(shè)置后顯示頁面 16 當(dāng)教務(wù)管理員成功 登錄 后，教務(wù)管理員可以控制系管理員，查看學(xué)生選課情況，學(xué)生教師的基本信息，系別信息管理以及選課時(shí)間的開放 以選課時(shí)間開放為例進(jìn)行原代碼分析和測試 Dim conn As SqlConnection Conn=new sqlconnection(server=.。database=jxfz。uid=sa。pwd=123) () strsql=insert sysstate(startdate,enddate)values(@startdate,@enddate) cmd = New SqlCommand(strsql, conn) (@startdate, ) (@enddate, ) () () () 以上是教務(wù)管理員設(shè)計(jì)選課時(shí)間的代碼 ,以下就是此頁面測試效果 : 圖 14 教務(wù)管理員操作頁面 超級管理員可以查看、刪除教務(wù)管理員，以及可以做教務(wù)管理員的所有功能。代碼如下： ‘綁定教務(wù)管理員表 Sub binddata() Try conn=New SqlConnection(server=localhost。database=jxfz。uid=sa。pwd=123) () 17 strsql = select * from teachadmin ds = New SqlDataAdapter(strsql, conn) teachadmin = New DataSet (teachadmin, teachadmin) = teachadmin = teachadmin = tadid () () () Catch ex As Exception () End Try End Sub //刪除教務(wù)管理員 Private Sub dgteachadmin_DeleteCommand(ByVal source As Object,ByVal e As ) Handles Try strsql = delete from teachadmin where tadid=@tadid and tad_name=@tad_name cmddel = New SqlCommand(strsql, conn) (@tadid, (0).Text) //附值 (@tad_name, (2).Text) () binddata() End Try //一個(gè)超 連接 添加教務(wù)管理員 ,以下就的超級管理員設(shè)計(jì)的頁面效果 : 18 圖 15 超級管理員操作頁面 SQL server 2022 的連接方式有多種形式，我們一開始使用的是，開發(fā)工具給出的數(shù)據(jù)適配器開發(fā)程序 ，在開發(fā)完 成以后，將其移植到其它機(jī)器上進(jìn)行實(shí)驗(yàn)時(shí)發(fā)現(xiàn)，不能正常的運(yùn)行，最后 發(fā)現(xiàn)是在使用數(shù)據(jù)適配器開發(fā)時(shí)，數(shù)據(jù)連接是數(shù)據(jù)適配器 自動 生成的，在服務(wù)器名字這一項(xiàng)是使用的是開發(fā)時(shí)的服務(wù)器名，所以在移植后不能運(yùn)行。最后我們只有重新編寫所有頁面 的數(shù)據(jù)連接部分的代碼來解決這個(gè)問題。 全局變量 由于一開始沒有使用 session 對象，致使很多功能無法實(shí)現(xiàn)，在學(xué)習(xí)了session的相關(guān)內(nèi)容后才解決了一些具體的問題，包括網(wǎng)頁間的參數(shù)的傳遞，公共信息的保存及提取等。在大量使用 session 后出現(xiàn)了系統(tǒng)資源被大量消耗的情況，在反復(fù)查找后進(jìn)行了及時(shí)的修改。 結(jié) 論 隨著社會科技的 飛速發(fā)展 ，現(xiàn)在各行各業(yè)離不開計(jì)算機(jī)信息處理。 它 不僅能節(jié)約人力 、 物力，同時(shí)也能保證信息不易出錯(cuò) ?，F(xiàn)在大部分高等院校開始實(shí)行的是學(xué)生的自主選課模式，只要學(xué)生在計(jì)算機(jī)前輸入自己的個(gè) 人選課信息即可。 另外 ，通過本系統(tǒng)可以由系上統(tǒng)一安排課程 ， 能大幅度的減少教師的工作量，減少錯(cuò)誤的發(fā)生幾率。 本系統(tǒng)是針對高校實(shí)際情況，根據(jù)管理的基本流程，完成對學(xué)生管理員基本功能的處理。經(jīng)過分析，本系統(tǒng)使用 Microsoft 公司的 Visual 工具，首先建立系統(tǒng)應(yīng)用原型，然后對初始原型系統(tǒng)進(jìn)行需求迭代，不斷修正和改進(jìn)。 19 通過對本系統(tǒng)的測試，表明本系統(tǒng)能基本實(shí)現(xiàn)學(xué)生選課的功能，后臺管理的功能也比較完善。另外，本系統(tǒng)具有操作簡便、界面友好的特點(diǎn)，在大中專院校的管理中，具有一定的實(shí)用性。 參考文獻(xiàn) [1] 方睿，吳四九 .網(wǎng)絡(luò)數(shù)據(jù)庫原理及應(yīng)用 [M].成都：四川大學(xué)出版社 ,2022。 [2] 陳友明 ,江高舉 .ASP從入門到精通 [M].北京 :中國鐵道出版社 ,2022。 [3] 石磊 .Visual [M].北京 :人民郵電出版社 ,2022。 [4] 李師遠(yuǎn)，王珊 .數(shù)據(jù)庫系統(tǒng)概論 [M].北京 :高等教育出版社 ,2022。 [5] 劉廷 ,