數(shù)據(jù)庫課程設(shè)計-飯卡管理系統(tǒng)

PAGE20-數(shù)據(jù)庫課程設(shè)計題目：飯卡管理系統(tǒng)姓名：學(xué)號：專業(yè)：指導(dǎo)老師：完成時間：信息工程學(xué)院計算機(jī)系目錄第一章概述………………………3需求分析…………………4數(shù)據(jù)庫設(shè)計………………5概念結(jié)構(gòu)設(shè)計………………5邏輯結(jié)構(gòu)設(shè)計………………6物理結(jié)構(gòu)設(shè)計………………6表的創(chuàng)建……………………8關(guān)系圖、觸發(fā)器……………7系統(tǒng)程序?qū)崿F(xiàn)………………9第五章小結(jié)…………19參考文獻(xiàn)………………20第一章概述飯卡管理系統(tǒng)是針對大學(xué)校園食堂交費(fèi)和一般消費(fèi)等方面的信息管理系統(tǒng)，它包括持卡者在校內(nèi)的消費(fèi)的各方面內(nèi)容：刷卡消費(fèi)、查詢、存款和持卡者的信息管理等，方便對飯卡信息進(jìn)行各項操作，定時進(jìn)行數(shù)據(jù)的備份和更新，保持?jǐn)?shù)據(jù)的一致性和準(zhǔn)確性。另外，各方面的內(nèi)容應(yīng)該相互聯(lián)系，最終產(chǎn)生各種查詢統(tǒng)計報表，以供持卡者進(jìn)行檢查。對于此系統(tǒng)的任務(wù)就是把人們從繁瑣的交費(fèi)、找零工作中解放出來，用計算機(jī)實(shí)現(xiàn)存款、消費(fèi)、查詢、修改、刪除以及存儲等功能。同時，用計算機(jī)能夠快速準(zhǔn)確的完成資料的統(tǒng)計和匯總工作，迅速的打印出各種報表資料以供使用。本系統(tǒng)的工作原理如下：先建立數(shù)據(jù)庫和數(shù)據(jù)庫的驅(qū)動程序在使用時，有管理員輸入賬號和密碼。然后通過飯卡管理系統(tǒng)選擇相應(yīng)的管理事務(wù)管理員事務(wù)將根據(jù)提供的信息在數(shù)據(jù)庫中查找相應(yīng)的記錄返回相應(yīng)的記錄給管理員允許管理員在相應(yīng)的權(quán)限下對數(shù)據(jù)進(jìn)行更改通過終端把得到的內(nèi)容顯示到相應(yīng)的界面上管理員登錄管理員登錄界面添加信息刪除信息交費(fèi)查詢信息添加學(xué)生信息添加飯卡信息刪除學(xué)生信息刪除飯卡信息查詢飯卡信息查詢學(xué)生信息第二章需求分析一、本系統(tǒng)需求的軟硬件配置如下：操作系統(tǒng)：windows2000、windowsxp或更高操作系統(tǒng)數(shù)據(jù)庫平臺：SQL2000開發(fā)平臺：VisualBasic6.0CPU：PentiunII266或更高內(nèi)存：64M或以上硬盤：2G以上顯示器：VGA或更高外設(shè)：報表打印機(jī)等二、總體功能需求：1、添加學(xué)生和飯卡信息這需要在數(shù)據(jù)庫中建立兩張表：學(xué)生信息和飯卡信息。學(xué)生信息表中包括以下信息：姓名、性別、出生日期、身份證號、卡號。飯卡信息包括：卡號、余額、辦卡日期。而飯卡信息的卡號是學(xué)生信息表中的外碼。2、管理員登錄信息在數(shù)據(jù)庫中建立一張管理員信息表屬性如下：賬號、密碼。只有當(dāng)賬號和密碼都匹配的情況下，管理員才能登錄成功然后對系統(tǒng)進(jìn)行管理。3、刪除這是對學(xué)生信息和飯卡信息兩張表的操作。分別更具需求刪除相應(yīng)的學(xué)生信息和飯卡信息。當(dāng)刪除飯卡信息時，學(xué)生信息表中對應(yīng)的學(xué)生信息也被刪除。4、充費(fèi)當(dāng)卡中余額不足時持卡者需要對飯卡進(jìn)行充費(fèi)，管理員可是通過充費(fèi)這一功能對飯卡信息表中的余額屬性進(jìn)行更改。5、查詢：管理員通過輸入需要的查詢信息，可以實(shí)現(xiàn)對飯卡信息和學(xué)生信息的查詢。三、性能需求：1、精度要求飯卡管理系統(tǒng)對精度要求較高，飯卡信息表中的余額是浮點(diǎn)型數(shù)據(jù)。學(xué)生信息表中的身份證號屬性必須是十八位的字符型數(shù)據(jù)。2、時間特性要求在軟件方面，響應(yīng)時間、更新處理時間都要求比較快速以滿足要求。3、靈活性當(dāng)用戶需求，如操作方式、運(yùn)行環(huán)境、結(jié)果精度、數(shù)據(jù)結(jié)構(gòu)與其他軟件接口等發(fā)生變化時，設(shè)計的軟件要求能做適當(dāng)?shù)恼{(diào)整。4、規(guī)模使用于小規(guī)模的食堂的飯卡管理工作。數(shù)據(jù)庫設(shè)計3.1概念結(jié)構(gòu)設(shè)計持卡者與飯卡是一對一的綁定關(guān)系。即一張飯卡只能被一個學(xué)生使用，一個學(xué)生也只能同時使用一張飯卡。飯卡信息表屬性：卡號、余額、辦卡日期。學(xué)生表屬性：卡號、身份證號、出生日期、性別、姓名。管理員表屬性：賬號、密碼。其E-R圖如下：飯卡信息E-R圖：飯卡信息卡號飯卡信息卡號余額辦卡日期學(xué)生信息E-R圖：賬號管理員信息密碼學(xué)生卡號姓名賬號管理員信息密碼學(xué)生卡號姓名出生日期性別身份證號管理員信息E-R圖：3.2邏輯結(jié)構(gòu)設(shè)計在學(xué)生表中身份證號是主鍵，卡號作為外碼。在飯卡信息表中卡號是主鍵。管理員信息表中賬號為主鍵。將E-R圖轉(zhuǎn)化為關(guān)系模式如下：學(xué)生（身份證號，姓名，性別，出生日期，卡號）飯卡信息（卡號，余額，辦卡日期）管理員信息（賬號，密碼）屬性一覽表：名子定義描述位置身份證號數(shù)字學(xué)生信息唯一標(biāo)識符學(xué)生表姓名漢字學(xué)生屬性學(xué)生表性別男or女學(xué)生屬性學(xué)生表出生日期日期學(xué)生屬性學(xué)生表卡號數(shù)字飯卡信息唯一標(biāo)識學(xué)生表、飯卡信息表余額浮點(diǎn)型數(shù)據(jù)飯卡屬性飯卡信息表辦卡日期日期飯卡屬性飯卡信息表賬號字符管理員唯一標(biāo)識符管理員信息表密碼字符管理員登錄條件管理員信息表登錄信息賬號+密碼管理員登錄必備條件管理員信息表學(xué)生信息身份證號+出生日期+性別+姓名+卡號辦卡信息和學(xué)生本身信息飯卡信息表+學(xué)生信息表飯卡信息卡號+余額+辦卡日期飯卡相關(guān)信息飯卡信息表3.3物理結(jié)構(gòu)設(shè)計學(xué)生表飯卡信息表管理員信息表3.4表的創(chuàng)建（1）創(chuàng)建學(xué)生表：CREATETABLE學(xué)生( [身份證號][char](20)primarykeyNOTNULL, [姓名][char](10)notNULL, [性別][char](10)check性別=‘男’or性別=‘女’notnull,[出生日期][datetime]（8）null，[卡號][char]（20）foreignkeynull）GO（2）創(chuàng)建飯卡信息表：Createtable飯卡信息（卡號char（20）primarkeynotnull，余額float（8）null，辦卡日期datetime（8）null）Go(3)創(chuàng)建管理員信息表：Createtable管理員信息（）賬號char（20）primarykeynotnull，密碼char（20）notnull）Go3.4關(guān)系圖、觸發(fā)器（1）關(guān)系圖：（2）觸發(fā)器：CREATETRIGGERinsert_strON學(xué)生FORINSERTASbeginifEXISTS(selecta.卡號frominserteda,學(xué)生bwherea.卡號=b.卡號anda.身份證號!=b.身份證號)BEGINprint'該卡已被使用'rollbackENDEnd第四章系統(tǒng)程序?qū)崿F(xiàn)一、登錄界面：DimCNAsNewADODB.ConnectionDimrsAsNewADODB.RecordsetPrivateSubCommand2_Click()UnloadMeEndSubPrivateSubCommand3_Click()IfCN.State=0ThenCN.OpenEndIfstr1="select*from用戶where用戶名='"&Text1.Text&"'"rs.Openstr1,CN,1,3Ifrs.EOFThenMsgBox"用戶名錯誤"ElseIfrs("密碼")=Val(Text2.Text)ThenForm2.ShowUnloadMeElseMsgBox"密碼錯誤"Text1.Text=""Text2.Text=""Text1.SetFocusText2.SetFocusEndIfEndIfEndSubPrivateSubForm_Load()CN.ConnectionString="Provider=SQLOLEDB.1;IntegratedSecurity=SSPI;PersistSecurityInfo=False;InitialCatalog=飯卡管理系統(tǒng);DataSource=stud51"CN.OpenEndSub二、復(fù)選界面：PrivateSubCommand1_Click()Form3.ShowUnloadMeEndSubPrivateSubCommand2_Click()Form4.ShowUnloadMeEndSubPrivateSubCommand3_Click()Form5.ShowUnloadMeEndSubPrivateSubCommand4_Click()Form6.ShowUnloadMeEndSubPrivateSubCommand5_Click()Form1.ShowUnloadMeEndSubPrivateSubCommand6_Click()Form9.ShowUnloadMeEndSub三、添加信息界面：DimCNAsNewADODB.ConnectionDimrsAsNewADODB.RecordsetDimchooseAsNewADODB.RecordsetDimcsAsNewADODB.RecordsetPrivateSubCombo1_Change()EndSubPrivateSubCommand1_Click()str3="select*from學(xué)生where身份證號='"&Text4.Text&"'"rs.Openstr3,CN,1,3Ifrs.EOFThenrs.AddNewrs.Fields("姓名")=Trim(Text1.Text)rs.Fields("性別")=Trim(Text2.Text)rs.Fields("出生日期")=Trim(Text3.Text)rs.Fields("身份證號")=Trim(Text4.Text)rs.Fields("卡號")=Trim(Text5.Text)rs.Updatesql="select*from卡信息"cs.Opensql,CN,1,3cs.Fields("辦卡日期")=Datecs.UpdateMsgBox("添加成功")ElseMsgBox("用戶已存在")Text1.Text=""Text2.Text=""Text3.Text=""Text4.Text=""Text5.Text=""Text1.SetFocusText2.SetFocusText3.SetFocusText4.SetFocusText5.SetFocusEndIfEndSubPrivateSubCommand2_Click()Form2.ShowUnloadMeEndSubPrivateSubForm_Load()IfCN.State=1ThenCN.CloseEndIfCN.ConnectionString="Provider=SQLOLEDB.1;IntegratedSecurity=SSPI;PersistSecurityInfo=False;InitialCatalog=飯卡管理系統(tǒng);DataSource=stud51"CN.OpenEndSub四、刪除信息窗體：DimconAsNewADODB.ConnectionDimrsAsNewADODB.RecordsetPrivateSubCommand1_Click()Form2.Show:Form4.HideEndSubPrivateSubCommand2_Click()Form2.ShowUnloadMeEndSubPrivateSubText2_Change()EndSubPrivateSubCommand3_Click()Form7.Show:Form4.HideEndSubPrivateSubCommand4_Click()Form8.Show:Form4.HideEndSub五、查詢窗口：DimconAsNewADODB.ConnectionDimrs_cardAsNewADODB.RecordsetPrivateSubCommand1_Click()con.ConnectionString="Provider=SQLOLEDB.1;IntegratedSecurity=SSPI;PersistSecurityInfo=False;InitialCatalog=飯卡管理系統(tǒng);DataSource=stud51"Ifcon.State=0Thencon.OpenEndIfsql="select姓名,余額,卡信息.卡號from卡信息,學(xué)生where卡信息.卡號='"&Text1.Text&"'"rs_card.Opensql,con,1,3DataGrid1.AllowAddNew=FalseDataGrid1.AllowDelete=FalseDataGrid1.AllowUpdate=FalseSetDataGrid1.DataSource=rs_cardEndSubPrivateSubCommand2_Click()Form2.Show:Form5.HideEndSub六、充費(fèi)窗口：DimaAsNewADODB.ConnectionDimrsAsNewADODB.RecordsetPrivateSubCommand1_Click()a.ConnectionString="Provider=SQLOLEDB.1;IntegratedSecurity=SSPI;PersistSecurityInfo=False;InitialCatalog=飯卡管理系統(tǒng);DataSource=stud51"Ifa.State=0Thena.OpenEndIfDimsqlAsStringsql="select*from卡信息where卡號='"&Text1.Text&"'"rs.Opensql,a,1,3rs.Fields("余額")=Text2.Textrs.UpdateMsgBox"充值成功！"EndSubPrivateSubCommand2_Click()Form2.Show:Form6.HideEndSub七、刪除學(xué)生信息窗口：DimconAsNewADODB.ConnectionDimabcAsNewADODB.RecordsetPrivateSubCommand1_Click()con.ConnectionString="Provider=SQLOLEDB.1;IntegratedSecurity=SSPI;PersistSecurityInfo=False;InitialCatalog=飯卡管理系統(tǒng);DataSource=stud51"Ifcon.State=0Thencon.OpenEndIfsql="select*from學(xué)生where姓名='"&Text1.Text&"'"abc.Opensql,con,1,3abc.DeleteMsgBox"刪除成功！",vbOKCancel+vbExclamation,""EndSubPrivateSubCommand2_Click()Form7.Hide:Form4.ShowEndSub八、刪除飯卡信息窗口：DimaAsNewADODB.ConnectionDimrsAsNewADODB.RecordsetPrivateSubCommand1_Click()a.ConnectionString="Provider=SQLOLEDB.1;IntegratedSecurity=SSPI;PersistSecurityInfo=False;InitialCatalog=飯卡管理系統(tǒng);DataSource=stud51"Ifa.State=0Thena.OpenEndIfDimanswerAsStringDimsqlAsStringsql="select*from卡信息where卡號='"&Text1.Text&"'"rs.Opensql,a,1,3IfTrim(Text1.Text)=""ThenMsgBox"輸入不能為空"Elseanswer=MsgBox("確定要刪除嗎？",vbYesNo,"")Ifanswer=vbYesThenrs.DeleteElseExitSubEndIfEndIfEndSubPrivateSubCommand2_Click()Form4.Show:Form8.HideEndSub九、添加飯卡信息窗口：DimCAsNewADODB.ConnectionDimRAsNewADODB.RecordsetPrivateSubCommand1_Click()str1="select*from卡信息where卡號='"&Text1.Text&"'"R.Openstr1,C,1,3IfR.EOFThenR.AddNewR.Fields("卡號")=Trim(Text1.Text)R.UpdateMsgBox("添加成功")ElseMsgBox("卡已存在，添加失敗")EndIfEndSubPrivateSubCommand2_Click()Form2.ShowUnloadMeEndSubPrivateSubForm_Load()IfC.State=1ThenC.CloseEndIfC.ConnectionString="Provider=SQLOLEDB.1;IntegratedSecurity=SSPI;PersistSecurityInfo=False;InitialCatalog=飯卡管理系統(tǒng);DataSource=stud51"C.OpenEndSub第五章小結(jié)經(jīng)過這幾天數(shù)據(jù)庫的設(shè)計，基本掌握數(shù)據(jù)庫中觸發(fā)器，視圖，存儲過程的概念。學(xué)會了怎樣去做一