軟件工程實驗--戶籍管理系統(tǒng)設(shè)計

1、精選優(yōu)質(zhì)文檔-傾情為你奉上軟件工程實驗報告u 功能需求分析系統(tǒng)包括查詢管理、戶口管理、人員管理三大部分。實現(xiàn)的基本功能有：1. 實現(xiàn)戶籍的查詢，可分為普通用戶查詢和內(nèi)部管理員的查詢，普通用戶只能查詢基本信息，如身份證號、出生日期等。2. 實現(xiàn)戶籍的修改，包括戶口的修改以及個人信息的修改 。3. 實現(xiàn)人員管理，包括人員的新建和遷入遷出。4. 關(guān)于注銷管理，包括人員注銷和戶口注銷，同時需注明注銷原因、證明材料等。功能實現(xiàn)說明A. 登錄模塊在進行系統(tǒng)登陸過程中，登陸模塊將調(diào)用數(shù)據(jù)庫里的用戶數(shù)據(jù)表，并對管理員和密碼進行驗證，只有輸入了正確的管理員名和密碼后，系統(tǒng)登陸才會成功。 在登陸模塊中，對系統(tǒng)的嘗

2、試登陸次數(shù)進行了限制，禁止用戶無終止的進行系統(tǒng)登陸嘗試，在本系統(tǒng)中，當用戶對系統(tǒng)的三次登陸失敗后，系統(tǒng)將自動禁止登陸，退出登陸模塊。并在輸入了錯誤的或者是不存在的管理員名和密碼時，系統(tǒng)會給出出錯信息提示，指明登陸過程中的錯誤輸入或錯誤操作，以便用戶進行正確的登陸。B. 修改密碼有相關(guān)證明的用戶可以由管理員幫助修改密碼，當兩次輸入密碼都一致時，數(shù)據(jù)庫中記錄將更新在戶口表中。注意：本模塊有如下幾點注意，密碼確定后，是否能正確讀取存儲用戶名和密碼的數(shù)據(jù)表；如果管理員名和密碼正確，是否能進入系統(tǒng)主窗體；當輸入管理員名或密碼錯誤時，是否能彈出信息框，給管理員提示。C. 添加新建用戶管理員需要兩次輸入密碼

3、，用來確保輸入密碼的正確，進入主界面，管理員選擇人員模塊中的新建，輸入信息，系統(tǒng)將首先查詢數(shù)據(jù)庫中與用戶相同的記錄，如果有相同記錄將提示用戶重新輸入相關(guān)信息。當確定數(shù)據(jù)庫中沒有相同的記錄，并且兩次輸入密碼一致時將把該條記錄添加到數(shù)據(jù)庫中。同樣，如果從戶口模塊進入，則新建的戶口信息添加到數(shù)據(jù)庫中。注意：本系統(tǒng)的戶口信息與個人用戶信息是分開的，實現(xiàn)時，需要在界面中鏈接相關(guān)的個人信息表加以完整資料，并能相互查閱有關(guān)的信息。D. 修改修改功能只能由管理員進入模塊實現(xiàn)，用戶可以出示有效證明由管理員實施修改，修改后的信息由系統(tǒng)存儲在原表中。E. 遷入由管理員將添加的遷入人員信息及其戶口信息添加到數(shù)據(jù)庫中，

4、如果是將遷入人員添加到本地已有戶口中，則進入添加用戶模塊中即可實現(xiàn)。F. 遷出用戶遷出后需要隱藏該戶或是個人的信息，包括已注銷的信息、注明遷往地及遷出原因。G. 注銷用戶出示證明，由管理員注銷個人或是戶口信息，注銷戶口時，將該戶號上的所有人員都一并注銷，同時，記錄相關(guān)信息并仍存儲在原表中。數(shù)據(jù)流程圖：頂層數(shù)據(jù)流圖：用戶 新建 查詢 權(quán)限查詢 戶籍信息修改 操作員 遷出信息戶籍管理系統(tǒng) 遷出 注銷 注銷信息第一層數(shù)據(jù)流圖1查詢管理用戶5產(chǎn)生戶籍2戶籍管理姓名 可查詢身份證號 信息戶籍信息管理員3流動人員管理遷出信息4注銷管理注銷信息第二層數(shù)據(jù)流圖：11查詢個人人口信息 姓名、身份證管理員13瀏覽

5、 戶號 查詢結(jié)果12查詢戶口戶口信息 管理員2.2修改戶口2.1新建戶口2.3新建人口2.4修改人口3.1戶口遷出3.2人口遷出戶口信息人注銷信息人遷出信息戶注銷信息戶遷出信息人口信息4.1人口注銷4.2戶口注銷5.2生成個人戶口5.1生成戶主戶口u 數(shù)據(jù)模型分析與設(shè)計1）戶口信息戶口信息何地遷入遷入日期登記日期住址戶號戶主姓名 名戶別注銷情況是否已遷出2）戶遷出信息遷出日期戶遷出信息遷往何地戶主姓名戶號人遷出信息身份證號遷出日期戶號姓名遷往何地3）人遷出信息4）人口信息：人口信息出生日期遷出時間出生地與戶主關(guān)系性別文化程度民族籍貫婚姻狀況工作單位職業(yè)戶號遷入日期是否遷出姓名身份證號數(shù)據(jù)庫設(shè)計

6、：戶籍系統(tǒng)包含信息主要有6類：戶口信息、人口信息、戶遷出信息、人遷出信息、戶注銷信息和人注銷信息。1. 戶口信息表Hinfor字段名意義字段類型字段大小可否為空關(guān)鍵字Hno戶號Char20Not null是Hname戶主姓名Varchar20Not nullAdr住址Varchar50Nullregdata登記日期datetimeNullindata遷入日期datetimeNullwherein何地遷入varchar50Nullorout是否遷出Char2Nulldisa注銷情況Char2Null2. 人口信息表perinfor字段名意義字段類型字段大小可否為空關(guān)鍵字Name姓名Varchar

7、20Not nullSex性別Char2Not nullrelation與戶主關(guān)系 Varchar20Not nullNation民族Varchar20Not nullprovince籍貫Char2Not nullBir出生日期DatetimeNullPlace出生地Varchar50Nullwenhua文化程度varchar10NullMarry婚姻狀況Char4Not nullID身份證號Varchar50Null是Job職業(yè)Varchar20NullWadr工作單位Varchar50Nullindata遷入日期DatetimeNullwherein何地遷入Varchar50Nulloro

8、ut是否遷出char2Null3. 戶遷出表Hout字段名意義字段類型字段大小可否為空關(guān)鍵字Number戶號Varchar20Not null是Hname戶主姓名Varchar20Not nulloutdata遷出日期DatetimeNot nullwhereout遷往何地varchar50Not null4. 人遷出信息perout字段名意義字段類型字段大小可否為空關(guān)鍵字humname姓名Varchar20Not nullNumber戶號Varchar20Not null是ID身份證號Varchar50Not null是outdata遷出日期DatetimeNot nullwhereout遷

9、往何地varchar50Not null5. 戶注銷信息Hdis字段名意義字段類型字段大小是否為空關(guān)鍵字Number戶號Varchar20Not null是Numname戶主姓名varchar10Not nulldisadata注銷日期datetimeNot nullreason注銷原因Varchar50Not nullprove證明材料Varchar50Not null6. 人注銷信息perdis字段名意義字段類型字段大小是否為空關(guān)鍵字Name姓名Varchar20Not nullNumber戶號varchar10Not null是ID身份證號Varchar50是disadata注銷日期Da

10、tetimereason注銷原因varchar50prove證明材料Varchar50Not null7. 操作員信息operation字段名意義字段類型字段大小是否為空關(guān)鍵字name姓名varchar20Not nullcode編號int4Not null是password密碼char12Not nullu 模塊分析與設(shè)計：戶籍管理層次結(jié)構(gòu)圖：界面查詢管理戶口管理人員管理遷入管理遷入管理修改戶口用戶查詢操作員查詢戶口遷出戶口注銷個人遷出人員注銷遷入新建遷入新建修改戶口系統(tǒng)用戶管理模塊系統(tǒng)用戶模塊主要實現(xiàn)：用戶登陸；添加用戶；修改用戶密碼。功能：本模塊的主要功能是對用戶身份進行驗證，只有系統(tǒng)的

11、合法用戶才能進入系統(tǒng)，并進行用戶管理，包括添加用戶和修改用戶密碼。系統(tǒng)登錄流程圖1、登陸系統(tǒng)實現(xiàn)代碼：Option ExplicitPrivate Sub Commcancel_Click()EndEnd SubPrivate Sub Commok_Click()Dim username As StringDim password As StringDim local_db As StringDim Cnn As New ADODB.ConnectionDim rst As New ADODB.RecordsetIf Text1.Text = "" ThenMsgBox &

12、quot;請輸入用戶名", , "警告"Text1.SetFocusElseIf Text2.Text = "" ThenMsgBox "請輸入密碼", , "警告"Text2.SetFocusEnd IfIf Text1.Text <> "" And Text2.Text <> "" ThenSet Cnn = New ADODB.ConnectionSet rst = New ADODB.RecordsetCnn.Open "P

13、rovider=Microsoft.Jet.OLEDB.4.0;Data Source=" + App.Path & "datadb.mdb" + "Persist Security Info=False;" '連接數(shù)據(jù)庫username = Trim(Text1.Text)password = Text2.Textlocal_db = "select 用戶名 from 用戶表" + _" where 用戶表.用戶名=" + "'" + _username +

14、"'"rst.Open local_db, CnnIf Not (rst.BOF And rst.EOF) Thenrst.Closelocal_db = "select 密碼 from 用戶表" + _" where 用戶表.用戶名=" + "'" + _ username + "'and" + _" 用戶表.密碼=" + "'" + password + "'"rst.Open local_d

15、b, CnnIf Not (rst.BOF And rst.EOF) Thenuserid = Text1.TextUnload frmdlIf username = "admin" Thenmainfrm.xitong.Enabled = Truemainfrm.bdb.Enabled = TrueElsemainfrm.xitong.Enabled = Falsemainfrm.bdb.Enabled = FalseEnd Ifmainfrm.ShowElseMsgBox "您輸入的密碼不正確，請重新輸入！", , "警告"Tex

16、t2.Text = ""Text2.SetFocusEnd IfElseMsgBox "系統(tǒng)中無此用戶", , "警告"Text1.Text = ""Text1.SetFocusEnd IfEnd IfEnd IfEnd Sub2、添加用戶實現(xiàn)代碼：管理員需要兩次輸入密碼，用來確保輸入密碼的正確，用戶密碼輸入信息完畢，單擊“確定”，系統(tǒng)將首先查詢數(shù)據(jù)庫中與該用戶名相同的記錄，如果有相同記錄將提示用戶重新輸入用戶名。當確定數(shù)據(jù)庫中沒有相同的記錄，并且兩次輸入密碼一致時將把該條記錄添加到數(shù)據(jù)庫中。單擊“取消”按鈕將取消

17、添加用戶的操作。Private Sub Commcancel_Click()frmzj.HideText1.Text = ""Text2.Text = ""Text3.Text = ""mainfrm.guanli.Enabled = Truemainfrm.chaxun.Enabled = Truemainfrm.#Enabled = TrueIf userid = "admin" Thenmainfrm.xitong.Enabled = Truemainfrm.bdb.Enabled = TrueE

18、lsemainfrm.xitong.Enabled = Falsemainfrm.bdb.Enabled = FalseEnd IfGetStatus "<就緒>"End SubPrivate Sub Commok_Click()Dim Cnn As New ADODB.ConnectionDim ret As New ADODB.RecordsetDim local_db As StringDim username As StringDim password As StringIf Text1.Text = "" ThenMsgBox &q

19、uot;用戶名不能為空", , "警告"Text1.SetFocusElseIf Text2.Text = "" ThenMsgBox "密碼不能為空", , "警告"Text2.SetFocusElseIf Text3.Text = "" ThenMsgBox "請確認密碼", , "警告"Text3.SetFocusEnd IfEnd IfEnd IfIf Text2.Text = Text3.Text ThenIf Text1.Text &

20、lt;> "" And Text2.Text <> "" And Text3.Text <> "" Thenusername = Trim(Text1.Text)password = Text2.TextSet Cnn = New ADODB.ConnectionSet ret = New ADODB.RecordsetCnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + App.Path & "data

21、db.mdb" + "Persist Security Info=False;" '連接數(shù)據(jù)庫local_db = "select 用戶名 from 用戶表" + _" where 用戶表.用戶名=" + "'" + username + "'"ret.Open local_db, CnnIf Not (ret.EOF And ret.BOF) Thenret.CloseMsgBox "對不起，此用戶已存在", , "警告"

22、;Text1.SetFocusElseret.Closelocal_db = "insert into 用戶表(用戶名,密碼)" + _" values(" + "'" + username + "'," + "'" + password + "')"Cnn.Execute local_dbMsgBox "新用戶添加成功！", , "提示"frmzj.HideText1.Text = "&quo

23、t;Text2.Text = ""Text3.Text = ""mainfrm.guanli.Enabled = Truemainfrm.chaxun.Enabled = Truemainfrm.#Enabled = TrueIf userid = "admin" Thenmainfrm.xitong.Enabled = Truemainfrm.bdb.Enabled = TrueElsemainfrm.xitong.Enabled = Falsemainfrm.bdb.Enabled = FalseEnd IfEnd IfEnd If