實(shí)現(xiàn)學(xué)生選課系統(tǒng)

1、.NET+MYSQL實(shí)現(xiàn)學(xué)生選課系統(tǒng)作者：薛志義 （網(wǎng)絡(luò)系信息安全班）第一章 系統(tǒng)綜述1.1 系統(tǒng)配置 操作系統(tǒng)：Window VISTA； 開(kāi)發(fā)平臺(tái)：Visual Studio 2005；數(shù)據(jù)庫(kù)：MYSQL；1.2 Visual Studio 2005概況Microsoft® Visual Studio® Team System 中綜合了一系列高度集成的軟件開(kāi)發(fā)工具，借助這些工具，軟件開(kāi)發(fā)團(tuán)隊(duì)的協(xié)作方式將得到徹底改變。通過(guò) Visual Studio Team System，組織可以降低軟件開(kāi)發(fā)的復(fù)雜性、輕松實(shí)現(xiàn)所有團(tuán)隊(duì)成員之間的協(xié)作、縮短開(kāi)發(fā)時(shí)間并提高開(kāi)發(fā)過(guò)程的可預(yù)見(jiàn)性

2、和可靠性，同時(shí)能夠自定義和擴(kuò)展 Visual Studio Team System，在其中加入自己的內(nèi)部工具、過(guò)程框架和其他合作伙伴產(chǎn)品。1.3 MYSQL服務(wù)器簡(jiǎn)介MySQL是一個(gè)小型關(guān)系型數(shù)據(jù)庫(kù)管理系統(tǒng)，開(kāi)發(fā)者為瑞典MySQL AB公司。在2008年1月16號(hào)被Sun公司收購(gòu)。而2009年,SUN又被Oracal收購(gòu).對(duì)于Mysql的前途,沒(méi)有任何人抱樂(lè)觀的態(tài)度.目前MySQL被廣泛地應(yīng)用在Internet上的中小型網(wǎng)站中。由于其體積小、速度快、總體擁有成本低，尤其是開(kāi)放源碼這一特點(diǎn)，許多中小型網(wǎng)站為了降低網(wǎng)站總體擁有成本而選擇了MySQL作為網(wǎng)站數(shù)據(jù)庫(kù)。與其他的大型數(shù)據(jù)庫(kù)例如Oracle

3、、DB2、SQL Server等相比，MySQL自有它的不足之處，如規(guī)模小、功能有限（MySQL Cluster的功能和效率都相對(duì)比較差）等，但是這絲毫也沒(méi)有減少它受歡迎的程度。對(duì)于一般的個(gè)人使用者和中小型企業(yè)來(lái)說(shuō)，MySQL提供的功能已經(jīng)綽綽有余，而且由于MySQL是開(kāi)放源碼軟件，因此可以大大降低總體擁有成本。目前Internet上流行的網(wǎng)站構(gòu)架方式是LAMP（Linux+Apache+MySQL+PHP），即使用Linux作為操作系統(tǒng)，Apache作為Web服務(wù)器，MySQL作為數(shù)據(jù)庫(kù)，PHP作為服務(wù)器端腳本解釋器。由于這四個(gè)軟件都是自由或開(kāi)放源碼軟件（FLOSS)，因此使用這種方式不用花

4、一分錢(qián)就可以建立起一個(gè)穩(wěn)定、免費(fèi)的網(wǎng)站系統(tǒng)。l 完成數(shù)據(jù)庫(kù)中數(shù)據(jù)的訪問(wèn)l 控制對(duì)數(shù)據(jù)庫(kù)中數(shù)據(jù)的訪問(wèn)l 控制對(duì)數(shù)據(jù)庫(kù)中數(shù)據(jù)的操作第二章 系統(tǒng)總體設(shè)計(jì)2.1設(shè)計(jì)概況(1) register(用戶(hù)登錄)進(jìn)入系統(tǒng)前，需要進(jìn)行身份驗(yàn)證，通過(guò)此窗 口輸入個(gè)人信息以驗(yàn)證身份。(2) MDIForm（程序主窗體）將系統(tǒng)提供的各種操作集中呈現(xiàn)于此窗 口中。(3) Stu（學(xué)生信息管理窗體）提供對(duì)學(xué)生基本信息的添加、修改、刪除功能。(4) stusel （學(xué)生選課信息窗體）對(duì)學(xué)生選課信息進(jìn)行管理。選擇課程后，自動(dòng)選擇該課程的任課教師。(5) teasel（教師選課信息窗體）對(duì)教師選課信息進(jìn)行管理。教師可以選擇任教

5、某門(mén)課程或去除某門(mén)課程。(6) squ（學(xué)生信息查詢(xún)）對(duì)學(xué)生基本信息進(jìn)行瀏覽，查詢(xún)。并可按照學(xué)生學(xué)號(hào)，姓名等信息進(jìn)行查詢(xún)。(7) 2.2總體功能設(shè)計(jì)學(xué)生選課系統(tǒng)是直接與學(xué)生進(jìn)行選擇教學(xué)實(shí)驗(yàn)課程有關(guān)的信息系統(tǒng)，包括學(xué)生信息管理系統(tǒng)、教師信息管理系統(tǒng)、課程管理系統(tǒng)，學(xué)生選課信息管理系統(tǒng)和教師選課信息管理系統(tǒng)。他涉及到學(xué)校的教師層和學(xué)生層。選課信息管理就是利用校園網(wǎng)的計(jì)算機(jī)來(lái)對(duì)這些信息進(jìn)行規(guī)范化的管理。讓選課綜合信息自動(dòng)，準(zhǔn)確，及時(shí)的流動(dòng)。其目的是加快信息流的速度。讓教師層及時(shí)了解學(xué)生層預(yù)約課程及具體時(shí)間情況。讓學(xué)生層能及時(shí)了解學(xué)員全部實(shí)驗(yàn)課程的設(shè)置等有關(guān)情況，并向教師層提交自己的選課決定，是向教師

6、層預(yù)約課程和具體時(shí)間。系統(tǒng)信息的共享是通過(guò)一個(gè)統(tǒng)一的數(shù)據(jù)庫(kù)的存取來(lái)實(shí)現(xiàn)的。學(xué)生選課信息管理系統(tǒng)的主要功能如下：1. 用戶(hù)等錄模塊這個(gè)系統(tǒng)包括用戶(hù)登錄，用戶(hù)密碼。2. 選課管理系統(tǒng)模塊這個(gè)管理系統(tǒng)包括學(xué)生選課信息管理系統(tǒng)和教師選課信息管理系統(tǒng)兩個(gè)模塊?？梢酝瓿蓪W(xué)生選課信息和教師選課信息的添加、修改、刪除功能。3. 查詢(xún)系統(tǒng)模塊這個(gè)系統(tǒng)包括學(xué)生信息查詢(xún)學(xué)生選課信息查詢(xún)2個(gè)模塊?？梢酝瓿尚畔⒌牟樵?xún)。學(xué)生，教師可以按照多種方式對(duì)整個(gè)選課系統(tǒng)中有關(guān)學(xué)生選課信息，教師選課信息的情況進(jìn)行查詢(xún)。4. 打印模塊對(duì)學(xué)生選課信息和教師選課信息的瀏覽和打印 選課系統(tǒng)用戶(hù)等錄系統(tǒng)信息管理系統(tǒng)選課管理系統(tǒng)查詢(xún)系統(tǒng)打印2.

7、3 數(shù)據(jù)庫(kù)設(shè)計(jì)學(xué)生選課系統(tǒng)的數(shù)據(jù)庫(kù)是MYSQL，建立了Selectclass.sql庫(kù)文件，由6張表組成：1. password（用戶(hù)登錄表）：用戶(hù)名、密碼、權(quán)限2. studentinfo（學(xué)生信息表）：學(xué)號(hào)、姓名、性別、出生日期、電話(huà)、地址、備注3. techerinfo（教師信息表）：教師號(hào)、教師名、職稱(chēng)、電話(huà)、備注4. courseinfo（課程信息表）：課程號(hào)、課程名、學(xué)時(shí)、學(xué)分、備注5. choice（學(xué)生選課表）：學(xué)生選課編號(hào)、學(xué)號(hào)、姓名、課程號(hào)、課程名、教師編號(hào)、教師名、選課時(shí)間、備注6. courseteacher(教師選課表)：教師選課編號(hào) 、教師號(hào)、教師名、課程號(hào)、課程名

8、、備注 . 數(shù)據(jù)庫(kù)的E-R圖 2.4 系統(tǒng)界面設(shè)計(jì)1. 用戶(hù)登錄界面: 進(jìn)入系統(tǒng)前，需要進(jìn)行身份驗(yàn)證，通過(guò)此窗口輸入個(gè)人信息以驗(yàn)證身份。如圖：2.主界面：將系統(tǒng)提供的各種操作集中呈現(xiàn)于此窗口中。如圖：主界面的菜單項(xiàng)：系統(tǒng)功能模塊的調(diào)用是通過(guò)主界面上的菜單實(shí)現(xiàn)的標(biāo)題名稱(chēng)功能系統(tǒng)sys用戶(hù)管理usermanage調(diào)用用戶(hù)管理模塊退出Exit退出信息管理message學(xué)生信息管理student調(diào)用學(xué)生信息模塊教師信息管理Teacher調(diào)用教師信息模塊課程信息管理Course調(diào)用課程信息模塊選課信息管理Sel學(xué)生選課信息管理Ssel調(diào)用學(xué)生選課信息模塊教師選課信息管理Tsel調(diào)用教師選課信息模塊查詢(xún)Q

9、uery學(xué)生信息查詢(xún)Smesquery調(diào)用學(xué)生信息查詢(xún)模塊教師信息查詢(xún)Tmesquery調(diào)用教師信息查詢(xún)模塊學(xué)生選課信息查詢(xún)squery調(diào)用學(xué)生選課查詢(xún)模塊教師選課信息查詢(xún)Tquery調(diào)用教師選課查詢(xún)模塊打印Print學(xué)生選課信息打印Printstu調(diào)用學(xué)生選課打印模塊教師選課信息打印printtea調(diào)用教師選課打印模塊3.學(xué)生基本信息界面：提供對(duì)學(xué)生基本信息的添加、修改、刪除功能。如圖：4學(xué)生選課信息界面：對(duì)學(xué)生選課信息進(jìn)行管理。選擇課程后，自動(dòng)選擇該課程的任課教師。如圖：5.學(xué)生基本信息查詢(xún)界面：對(duì)學(xué)生基本信息進(jìn)行瀏覽，查詢(xún)。并可按照學(xué)生學(xué)號(hào)，姓名，出生日期，地址等信息進(jìn)行查詢(xún)。如圖：2.

10、5關(guān)鍵技術(shù)使用ADO連接數(shù)據(jù)庫(kù)數(shù)據(jù)庫(kù)的動(dòng)態(tài)連接可以通過(guò)對(duì)象連接也可以通過(guò)控件連接。1、使用ADO對(duì)象訪問(wèn)SQLSever數(shù)據(jù)庫(kù)，要在程序中直接聲明或新建ADO對(duì)象，然后調(diào)用ADO對(duì)象的屬性和方法即可。（1）引入ADO對(duì)象 選擇菜單【工程】【引用】命令，進(jìn)入界面選擇“MicrosoftActiveX Data Object2.7Library” （2）聲明并創(chuàng)建ADO對(duì)象Private myconn as new adodb.connection Private myrecord as new adodb.recordsetSet myconn = New ADODB.Connection My

11、conn.connection="Provider=SQLOLEDB.1;PersistSecurity;Info=False;UserID=sa;Initial Catalog=selectclass;Data Source=LX24_013" myconn.Open myconn.connection Set myrecord = New ADODB.Recordset2、使用ADO控件訪問(wèn)數(shù)據(jù)庫(kù)主要設(shè)置Connectionstring屬性，在連接資源中選擇數(shù)據(jù)資源名稱(chēng)，然后選擇相應(yīng)數(shù)據(jù)源名即可訪問(wèn)SQLServer數(shù)據(jù)庫(kù)。（1）單擊【工程】【部件】選項(xiàng)，在彈出的列表中

12、選中（Microsoft ADO Data Control）添加Adodc控件到工具箱中。（2）設(shè)置Adodc控件的Connectionstring屬性連接到相應(yīng)的數(shù)據(jù)庫(kù)資源中。使用綁定控件錄入、修改、刪除記錄（） 錄入recordset.addnew fildlist,valuesfildlist:可選。新記錄中字段的單個(gè)或一組字段名稱(chēng)或序列位置values:可選。新記錄中字段的單個(gè)或一組值。myrecord.AddNewmyrecord.Fields("學(xué)號(hào)") = Text1.Textmyrecord.Fields("姓名") = Text2.Te

13、xtmyrecord.Fields("性別") = Combo1.Textmyrecord.Fields("電話(huà)") = Text3.Textmyrecord.Fields("出生日期") = Text6.Textmyrecord.Fields("地址") = Text4.Textmyrecord.Fields("備注") = Text5.Textmyrecord.Updatemyrecord.Close （）修改recordset.update fildlist,valuesql = &quo

14、t;update studentinfo set 姓名='" & Text2.Text & " ',性別='" & Combo1.Text & "',出生日期='" & Text6.Text & " ',電話(huà)='" & Text3.Text & " ',地址='" & Text4.Text & " ',備注='" &am

15、p; Text4.Text & " ' where 學(xué)號(hào)='" & Text1.Text & " '"myconn.Execute sql( 3 ) 刪除通過(guò)SQL語(yǔ)言中的Delete語(yǔ)句刪除數(shù)據(jù)庫(kù)中的記錄 eg： del = "delete from studentinfo where 學(xué)號(hào)='" & Text1.Text & " '"myconn.Execute del 使用Datagrid控件SQL查詢(xún)語(yǔ)句瀏覽和查詢(xún)數(shù)據(jù)庫(kù)使用AD

16、O提供數(shù)據(jù)綁定的功能,使用Datagrid提供數(shù)據(jù)瀏覽的功能.對(duì)象屬性值A(chǔ)dodc1ConnectionStringMyconn.connection="Provider=SQLOLEDB.1; User ID=sa;PersistSecurity Info=False; Initial Catalog=selectclass;Data Source=LX24_013"RecordsourceSelect * from tablenameDatagrid1DatasourceAdodc1數(shù)據(jù)的選擇錄入在信息錄入過(guò)程中可以借助綁定控件提高數(shù)據(jù)錄入的效率。DataCombo和D

17、ataList這兩個(gè)控件可以被這些控件所綁定的數(shù)據(jù)庫(kù)字段自動(dòng)填充，也可以有選擇地將一個(gè)選定字段傳遞給第二個(gè)數(shù)據(jù)控件，所以在關(guān)系數(shù)據(jù)庫(kù)中，使用一個(gè)表的數(shù)據(jù)來(lái)提供要輸入給第二個(gè)相關(guān)表值。例如學(xué)生選課信息管理模塊中選擇課程后自動(dòng)顯示該課程的任課教師。Set DataList3.DataSource = Adodc3Adodc3.RecordSource = "select 教師名 from courseteacher where 課程名='" & DataCombo1.Text & "' "Adodc3.Refresh數(shù)據(jù)庫(kù)的組

18、合查詢(xún)查詢(xún)時(shí)，若要通過(guò)多個(gè)條件找出與之相適應(yīng)的記錄可通過(guò)SQL查詢(xún)語(yǔ)句實(shí)現(xiàn)組合查詢(xún)，設(shè)通過(guò)學(xué)號(hào)，姓名兩個(gè)條件實(shí)現(xiàn)組合查詢(xún)。If Check.Value = vbChecked Then If DataCombo.Text = "" Then MsgBox "請(qǐng)輸入要查詢(xún)的記錄", vbInformation Exit Subelsesql = "select * from studentinfo where 學(xué)號(hào)= '" & DataCombo1.Text & "'"End IfIf

19、 Check2.Value = vbChecked Then If DataCombo2.Text = "" Then MsgBox "請(qǐng)輸入要查詢(xún)的記錄", vbInformation Exit Sub End If If sql = "" Thensql = "select * from studentinfo where 姓名='" & DataCombo2.Text & "'" Else sql = sql & "select * fro

20、m studentinfo where 姓名='" & DataCombo2.Text & "'" End If使用recordset對(duì)象檢索記錄成功的數(shù)據(jù)庫(kù)應(yīng)用都使用connection對(duì)象建立連接并使用recordset對(duì)象處理返回的數(shù)據(jù)，通過(guò)“協(xié)調(diào)”兩個(gè)對(duì)象的特定功能可以開(kāi)發(fā)出幾乎可以執(zhí)行任何數(shù)據(jù)處理任務(wù)的數(shù)據(jù)庫(kù)應(yīng)用程序。例如執(zhí)行數(shù)據(jù)庫(kù)的查詢(xún)操作dim rs1 as new adodb. recordsetset rs1=new adodb.recordsettxtSql = "SELECT * FROM passw

21、ord WHERE 用戶(hù)名='" & Text1.Text & "'rs1.Open txtSql, myconn, adOpenDynamic, adLockOptimistic, adCmdText 依據(jù)不同身份權(quán)限登錄主界面通過(guò)訪問(wèn)數(shù)據(jù)庫(kù)表來(lái)核對(duì)檢查用戶(hù)的身份，有選擇的授予他們不同的權(quán)限限制用戶(hù)對(duì)系統(tǒng)的特定操作，提高數(shù)據(jù)庫(kù)數(shù)據(jù)的安全性。 If Text2.Text = rs1.Fields("密碼") Then username = Text1.Text password = Text2.Text rs1.Close myconn.Close