基于BS架構(gòu)的在線選課信息管理系統(tǒng)設(shè)計(jì)_第1頁(yè)
基于BS架構(gòu)的在線選課信息管理系統(tǒng)設(shè)計(jì)_第2頁(yè)
基于BS架構(gòu)的在線選課信息管理系統(tǒng)設(shè)計(jì)_第3頁(yè)
基于BS架構(gòu)的在線選課信息管理系統(tǒng)設(shè)計(jì)_第4頁(yè)
基于BS架構(gòu)的在線選課信息管理系統(tǒng)設(shè)計(jì)_第5頁(yè)
已閱讀5頁(yè),還剩25頁(yè)未讀, 繼續(xù)免費(fèi)閱讀

下載本文檔

版權(quán)說(shuō)明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)

文檔簡(jiǎn)介

1、GDGM-QR-03-077-A/0 Guangdong College of Industry ) Exit Sub End If If dbm.checkUser(username, password, limit) = True Then Select Case limit Case 0 Session(sid) = username Response.Redirect(StudentMain.aspx) Case 1 Session(tid) = username Response.Redirect(TeacherMain.aspx) Case 2 Session(aid) = use

2、rname Response.Redirect(Admin.aspx) End Select Else Me.Response.Write(alert(用戶名或密碼不正確!);) Exit Sub End If End Sub 4.2 管理員設(shè)置選課時(shí)間模塊 圖 4-2 設(shè)置選課時(shí)間界面 Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click Dim startTime As Date = txtStartTIme.Text Dim endTim

3、e As Date = txtEndTime.Text If dbm.setChooseTime(startTime, endTime) = True Then Response.Write(alert(設(shè)置時(shí)間成功) Else Response.Write(alert(設(shè)置時(shí)間失敗) End If End Sub 4.3 教室管理模塊 圖 4-3 教室設(shè)置界面 Dim str As String = dbm.str_Trim(txtRNum.Text.ToString() + , + dbm.str_Trim(txtRName.Text.ToString() + , + dbm.str_Tr

4、im(txtRpn.Text.ToString() If dbm.addRoom(str) = True Then Response.Write(alert(添加成功) Else Response.Write(alert(添加失敗,請(qǐng)檢查教室編號(hào)時(shí)候已經(jīng)存在) End If End Sub 4.4 教師與學(xué)生信息管理模塊 圖 4-4 教師與學(xué)生信息管理界面 If dbm.addTeacher(Str) = True Then Response.Write(alert(添加成功) Else Response.Write(alert(添加失敗,請(qǐng)檢查教師編號(hào)時(shí)候已經(jīng)存在) End If End S

5、ub If dbm.addStudent(str) = True Then Response.Write(alert(添加成功) Else Response.Write(alert(添加失敗,請(qǐng)檢查學(xué)生編號(hào)時(shí)候已經(jīng)存在) End If End Sub 4.5 查看教師所任課程模塊 圖 4-5 教師個(gè)人所開課程界面 4.6 教師管理個(gè)人信息模塊 圖 4-6 教師個(gè)人信息管理界面 Protected Sub Button3_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button3.Click Dim str

6、 As String = dbm.str_Trim(lbSID.Text.ToString() + , + dbm.str_Trim(txtName.Text.ToString() + , + dbm.str_Trim(ddlSex.Text.ToString() + _ dbm.str_Trim(txtBirthday.Text.ToString() dbm.updateStudentInfo(str) Response.Write(alert(保存成功) End Sub Protected Sub Button4_Click(ByVal sender As Object, ByVal e

7、As System.EventArgs) Handles Button4.Click If txtOldPsd.Text = txtNewPsd.Text Then Dim s_id As String = Session(sid).ToString() dbm.change_password(s_id, Student, txtOldPsd.Text.ToString() Response.Write(alert(修改成功) Else Response.Write(alert(兩次密碼不一致) End If End Sub 4.7 教師評(píng)定成績(jī)模塊 圖 4-7 教師評(píng)定成績(jī)界面 4.8 教師

8、課程安排管理模塊 圖 4-8 課程安排管理界面 Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click Dim sw, ew As String If dbm.hasCoures(ddlCName.SelectedValue.ToString() Then Response.Write(alert(該課程已經(jīng)設(shè)置了開課時(shí)間) Else Dim str As String = ddlCName.SelectedValue.ToString() +

9、, + sw + , + ew + , + txtTime.Text.ToString() + , + ddlRName.SelectedValue.ToString() dbm.addCourseTime(str) Response.Write(alert(添加成功) Response.Redirect(/CourseTime.aspx) End If End Sub 4.9 教師開設(shè)新課程模塊 圖 4-9 開設(shè)新課程界面 If txtCname.Text.ToString() = Or txtCscore.Text.ToString() = Or dbm.str_Trim(txtMaxNu

10、m.Text.ToString() = Then Response.Write(alert(請(qǐng)?zhí)钊胪暾畔? Exit Sub Else dbm.addCourse(str) Response.Write(alert(開設(shè)成功) End If End Sub Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load If Session(tid) = Or Session(tid) = Nothing Then Response.Redirect(/login.asp

11、x) Exit Sub End If End Sub 4.10 學(xué)生個(gè)人信息模塊 圖 4-10 學(xué)生個(gè)人信息界面 4.11 學(xué)生個(gè)人信息管理模塊 圖 4-11 學(xué)生個(gè)人信息管理界面 Protected Sub Button3_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button3.Click Dim str As String = dbm.str_Trim(lbSID.Text.ToString() + , + dbm.str_Trim(txtName.Text.ToString() + , + db

12、m.str_Trim(ddlSex.Text.ToString() + _ dbm.str_Trim(txtBirthday.Text.ToString() dbm.updateStudentInfo(str) Response.Write(alert(保存成功) End Sub Protected Sub Button4_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button4.Click If txtOldPsd.Text = txtNewPsd.Text Then Dim s_id As Stri

13、ng = Session(sid).ToString() dbm.change_password(s_id, Student, txtOldPsd.Text.ToString() Response.Write(alert(修改成功) Else Response.Write(alert(兩次密碼不一致) End If End Sub 4.12 學(xué)生選擇課程模塊 圖 4-12 學(xué)生選擇課程管理界面 If Not IsPostBack Then If dbm.isChooseTime = False Then Dim startTime As String = dbm.getChooseTime()

14、.Split(,)(0) Dim endTime As String = dbm.getChooseTime().Split(,)(1) Response.Write(alert(選課時(shí)間為: + startTime + 到 + endTime + 現(xiàn)在不是選課時(shí)間) End If lbselect.Text += dbm.getchoose(sid) End If End Sub 第五章調(diào)試與測(cè)試 5.1 測(cè)試環(huán)境 該系統(tǒng)需要在網(wǎng)絡(luò)環(huán)境下運(yùn)行,對(duì)整個(gè)系統(tǒng)的性能要求較高,測(cè)試環(huán)境如下:瀏覽器 采用 IE6.0,數(shù)據(jù)庫(kù)采用穩(wěn)定性好的 SQL Server 2005, 操作系統(tǒng)為 WINDOS X

15、P;本系統(tǒng)采 用 ASP.NET 平臺(tái)。 5.2 測(cè)試的項(xiàng)目 該系統(tǒng)分為管理員、教師、學(xué)生三種用戶,因此該測(cè)試項(xiàng)目的內(nèi)容主要是三種用戶實(shí) 現(xiàn)的功能,主要如下: 管理員:學(xué)生信息、教師信息以及課室信息的添加、刪除;選課時(shí)間的設(shè)置。 教師:已任課程的查看;開設(shè)新課程;評(píng)定選課學(xué)生成績(jī);個(gè)人信息以及密碼的修改。 學(xué)生:查看已選課程;查看所有課程信息;查看能選的課程信息;課程的退選;課程 信息的查看;個(gè)人信息及密碼的修改。 5.3 系統(tǒng)測(cè)試 (1)測(cè)試目標(biāo) 用戶通過(guò) Internet 可以訪問到登錄窗口,并可以在用戶名,密碼框內(nèi)輸入用戶 ID 和 密碼,如果數(shù)據(jù)庫(kù)中存在該用戶 ID 和密碼就可以進(jìn)入不

16、同權(quán)限的主頁(yè)內(nèi),否則就會(huì)提示 輸入錯(cuò)誤的用戶名或密碼,要求重新輸入。 (2)測(cè)試步驟 首先,用戶在出現(xiàn)登錄界面時(shí),要求輸入用戶名和密碼。其次,在用戶名處輸入用戶 本人的用戶 ID,在密碼處輸入正確的密碼,然后選擇操作權(quán)限,最后點(diǎn)擊“登錄”按鈕。 (3)測(cè)試結(jié)果 在正確輸入用戶名和密碼時(shí),可以順利進(jìn)入到不同權(quán)限的主頁(yè),但如果輸入錯(cuò)誤的用 戶名或密碼信息就會(huì)彈出一個(gè)提示框“用戶名或密碼不正確!”。此時(shí)就要重新輸入正確 的用戶名和密碼。 5.4 測(cè)試結(jié)果的分析與總結(jié) 經(jīng)過(guò)測(cè)試,本系統(tǒng)達(dá)到了預(yù)期效果,實(shí)現(xiàn)了選課、退課、查詢、課程信息瀏覽等功能。 由于本身能力的局限性,編寫的代碼,即使經(jīng)過(guò)反復(fù)檢查也難免

17、出錯(cuò),所以在本階段力求 使用有限的時(shí)間找出盡可能多的錯(cuò)誤,力求系統(tǒng)盡量正確。 本系統(tǒng)所涉及的數(shù)據(jù)庫(kù)設(shè)計(jì)的重要步驟加載測(cè)試。加載測(cè)試工作貫穿于程序測(cè)試工作 的全過(guò)程,整個(gè)錄入、修改、查詢、處理工作均可視為對(duì)數(shù)據(jù)庫(kù)的加載測(cè)試工作。要設(shè)計(jì) 出一個(gè)好的學(xué)生在線選課系統(tǒng)數(shù)據(jù)庫(kù),除滿足系統(tǒng)所要求的功能外,所有基本表的設(shè)計(jì)還 應(yīng)盡量符合第三范式。數(shù)據(jù)庫(kù)的設(shè)計(jì)中,如何處理多對(duì)多的關(guān)系和如何設(shè)置主鍵,是兩個(gè) 有著較大難度、需要重點(diǎn)考慮的問題。 結(jié)束語(yǔ) 經(jīng)過(guò)近兩個(gè)月的努力,通過(guò)網(wǎng)上查詢資料,本人對(duì)學(xué)生選課系統(tǒng)有了較深刻的認(rèn)識(shí), 也具備了一定的實(shí)際開發(fā)經(jīng)驗(yàn)。認(rèn)識(shí)到開發(fā)系統(tǒng)首先要明確用戶的需求,然后進(jìn)行系統(tǒng)分 析,其

18、次構(gòu)建系統(tǒng)模型、建立完善的數(shù)據(jù)庫(kù),接著編寫代碼,最后測(cè)試系統(tǒng)。 在明確用戶需求階段,網(wǎng)上查閱了相關(guān)資料,并瀏覽了部分網(wǎng)上選課系統(tǒng),分析總結(jié) 后將系統(tǒng)分為學(xué)生信息管理、教師信息管理、課程信息管理和權(quán)限的判斷四個(gè)模塊。 在系統(tǒng)分析階段,查閱了大量基于不同技術(shù)的網(wǎng)站開發(fā)的文章,具備了一定的理論基 礎(chǔ),比較分析后采用了 ASP.NET 編程技術(shù)和 SQL Server 2005 數(shù)據(jù)庫(kù),在 Windows XP 操 作系統(tǒng)環(huán)境下,運(yùn)用 Dreamweaver 8 開發(fā)工具,開發(fā)了這個(gè)基于 B/S 結(jié)構(gòu)的學(xué)生在線選課 系統(tǒng)的實(shí)現(xiàn)。本系統(tǒng)不但有良好的系統(tǒng)運(yùn)行穩(wěn)定性、可靠性和實(shí)用性,而且操作簡(jiǎn)單,維 護(hù)方便,具有一定的實(shí)用價(jià)值。 系統(tǒng)進(jìn)入編程階段后,遇到了很多的困難,主要是數(shù)據(jù)的存取。但經(jīng)過(guò)自己的努力及 老師的指導(dǎo),最終解決了這些問題,開發(fā)出一個(gè)學(xué)生選課系統(tǒng),并達(dá)到了預(yù)期的設(shè)想。 雖然系統(tǒng)還有很多不足之處,如:程序中錯(cuò)誤處理和輸入控制不夠全面,可能導(dǎo)致輸 入無(wú)效引發(fā)錯(cuò)誤。但在整個(gè)開發(fā)過(guò)程中我學(xué)到了很多的知識(shí),增強(qiáng)了動(dòng)手能力,積累了解 決各種難題的經(jīng)驗(yàn)。同時(shí)也讓我發(fā)現(xiàn)了自己的許多不足之處,有待在將來(lái)的工作中進(jìn)一步 的學(xué)習(xí)和完善,掌握和運(yùn)用更多的知識(shí)。 參

溫馨提示

  • 1. 本站所有資源如無(wú)特殊說(shuō)明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請(qǐng)下載最新的WinRAR軟件解壓。
  • 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請(qǐng)聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
  • 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁(yè)內(nèi)容里面會(huì)有圖紙預(yù)覽,若沒有圖紙預(yù)覽就沒有圖紙。
  • 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
  • 5. 人人文庫(kù)網(wǎng)僅提供信息存儲(chǔ)空間,僅對(duì)用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對(duì)用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對(duì)任何下載內(nèi)容負(fù)責(zé)。
  • 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請(qǐng)與我們聯(lián)系,我們立即糾正。
  • 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶因使用這些下載資源對(duì)自己和他人造成任何形式的傷害或損失。

評(píng)論

0/150

提交評(píng)論