软件工程实验户籍管理系统设计Word文档下载推荐.docx
- 文档编号:19427278
- 上传时间:2023-01-06
- 格式:DOCX
- 页数:21
- 大小:205.29KB
软件工程实验户籍管理系统设计Word文档下载推荐.docx
《软件工程实验户籍管理系统设计Word文档下载推荐.docx》由会员分享,可在线阅读,更多相关《软件工程实验户籍管理系统设计Word文档下载推荐.docx(21页珍藏版)》请在冰豆网上搜索。
E.迁入
由管理员将添加的迁入人员信息及其户口信息添加到数据库中,如果是将迁入人员添加到本地已有户口中,则进入添加用户模块中即可实现。
F.迁出
用户迁出后需要隐藏该户或是个人的信息,包括已注销的信息、注明迁往地及迁出原因。
G.注销
用户出示证明,由管理员注销个人或是户口信息,注销户口时,将该户号上的所有人员都一并注销,同时,记录相关信息并仍存储在原表中。
数据流程图:
顶层数据流图:
用户
新建
查询权限查询户籍信息
修改
操作员
迁出信息
户籍管理系统
迁出
注销注销信息
第一层数据流图
1
查询管理
5
产生户籍
2
户籍管理
XX可查询
XX号信息
户籍信息
管理员
3
流动人员管理
4
注销管理
注销信息
第二层数据流图:
1.1
查询个人
人口信息
XX、XX
1.3
浏览
户号查询结果
1.2
查询户口
户口信息
◆数据模型分析与设计
1)户口信息——
4)人口信息:
数据库设计:
户籍系统包含信息主要有6类:
户口信息、人口信息、户迁出信息、人迁出信息、户注销信息和人注销信息。
1.户口信息表Hinfor
字段名
意义
字段类型
字段大小
可否为空
关键字
Hno
户号
Char
20
Notnull
是
Hname
户主XX
Varchar
Adr
住址
50
Null
regdata
登记日期
datetime
indata
迁入日期
wherein
何地迁入
varchar
orout
是否迁出
disa
注销情况
2.人口信息表perinfor
Name
XX
Sex
性别
relation
与户主关系
Nation
民族
province
籍贯
Bir
出生日期
Datetime
Place
出生地
wenhua
文化程度
10
Marry
婚姻状况
ID
XX号
Job
职业
Wadr
工作单位
char
3.户迁出表Hout
Number
outdata
迁出日期
whereout
迁往何地
4.人迁出信息perout
humname
5.户注销信息Hdis
是否为空
Numname
disadata
注销日期
reason
注销原因
prove
证明材料
6.人注销信息perdis
7.操作员信息operation
name
code
编号
int
password
密码
12
◆模块分析与设计:
户籍管理层次结构图:
系统用户管理模块
系统用户模块主要实现:
用户登陆;
添加用户;
修改用户密码。
功能:
本模块的主要功能是对用户身份进行验证,只有系统的合法用户才能进入系统,并进行用户管理,包括添加用户和修改用户密码。
系统登录流程图
1、登陆系统实现代码:
OptionExplicit
PrivateSubmcancel_Click()
End
EndSub
PrivateSubmok_Click()
DimusernameAsString
DimpasswordAsString
Dimlocal_dbAsString
DimnAsNewADODB.Connection
DimrstAsNewADODB.Recordset
IfText1.Text="
"
Then
MsgBox"
请输入用户名"
,"
警告"
Text1.SetFocus
Else
IfText2.Text="
请输入密码"
Text2.SetFocus
EndIf
IfText1.Text<
>
"
AndText2.Text<
Setn=NewADODB.Connection
Setrst=NewADODB.Recordset
n.Open"
Provider=Microsoft.Jet.OLEDB.4.0;
DataSource="
+App.Path&
\data\db.mdb"
+"
;
PersistSecurityInfo=False;
'
连接数据库
username=Trim(Text1.Text)
password=Text2.Text
local_db="
select用户名from用户表"
+_
where用户表.用户名="
'
username+"
rst.Openlocal_db,n
IfNot(rst.BOFAndrst.EOF)Then
rst.Close
select密码from用户表"
username+"
and"
用户表.密码="
+password+"
userid=Text1.Text
Unloadfrmdl
Ifusername="
admin"
mainfrm.xitong.Enabled=True
mainfrm.bdb.Enabled=True
mainfrm.xitong.Enabled=False
mainfrm.bdb.Enabled=False
mainfrm.Show
您输入的密码不正确,请重新输入!
Text2.Text="
系统中无此用户"
Text1.Text="
2、添加用户实现代码:
管理员需要两次输入密码,用来确保输入密码的正确,用户密码输入信息完毕,单击“确定”,系统将首先查询数据库中与该用户名相同的记录,如果有相同记录将提示用户重新输入用户名。
单击“取消”按钮将取消添加用户的操作。
frmzj.Hide
Text3.Text="
mainfrm.guanli.Enabled=True
mainfrm.chaxun.Enabled=True
mainfrm.tongji.Enabled=True
Ifuserid="
GetStatus"
<
就绪>
DimretAsNewADODB.Recordset
用户名不能为空"
密码不能为空"
IfText3.Text="
请确认密码"
Text3.SetFocus
IfText2.Text=Text3.TextThen
AndText3.Text<
Setret=NewADODB.Recordset
+username+"
ret.Openlocal_db,n
IfNot(ret.EOFAndret.BOF)Then
ret.Close
对不起,此用户已存在"
insertinto用户表(用户名,密码)"
values("
"
)"
n.Executelocal_db
新用户添加成功!
提示"
IfText2.Text<
密码不一致,请重新输入"
3、查询修改实现代码:
查询户号;
查询修改用户信息;
查询修改人员信息;
列表查询;
单击“查询修改”下拉菜单中的“查询户号”选项即出现“查询户号”对话框,操作员只需输入所要查询户口的户主XX号即可获得该户的户号信息
单击“查询修改”下拉菜单中的“查询修改户信息”选项,屏幕中会出现“查询修改户口信息”对话框,操作员在该窗口中输入户号后单击查询按钮,即可出现“查询修改户信息”对话框,在此对话框中会显示关于该住户的信息,并可对该住户的户别及家庭住址等信息进行修改,所作修改可及时记入相应的数据库系统中。
PrivateSubmand1_Click()
Unloadfrmuserlist
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 软件工程 实验 户籍管理 系统 设计