- 1、本文档共12页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
数据库及其应用Ⅱ课程设计汇报
用户信息管理系统
指导老师:
汇报撰写:
一、设计关键目标
1.经过实践,使学生建立对数据库设计认知;
2.经过对某小型信息系统数据库设计,使学生掌握数据库设计关键步骤和方法,提升学生处理实际问题能力;
3.使学生学会在一个实际RDBMS软件平台上创建数据库;
4.培养学生团体合作精神。
二、关键内容和要求
1.依据所选择题目,进行调查分析
2.在调查分析基础上,进行数据库设计
3.在SQL?Server?上创建数据库,并结合VB6.0实现设计结果
4.撰写数据库设计各个阶段具体设计汇报
5.写出收获和体会,包含以处理和还未处理问题,深入完善设想和提议
三、设计组织安排
设计时间:
设计班级:???????????
设计分组:
设计汇报提交:
四、组员情况
五、数据库分析和设计
需求说明
要实现一个用户信息管理系统,在此系统中只包含到对用户和管理员两个实体管理,此系统要求能够统计用户基础信息和信息查询。经过对用户具体数据管理,这么能够愈加好地实现任何企业及活动单位VIP会员加入并确保其身份真实、安全性。其系统具体要求以下:
1.用户基础信息录入、添加或删去
2.对用户基础信息任意条件查找
3.用户基础信息表打印
4.系统用户设置
5.系统初始化
数据库结构设计
(1)概念结构设计
现在对上述需求做深入分析,产生概念结构设计E—R模型。因为这个系统比较简单,所以就采取自顶向下设计方法,就是首先确定系统关键活动:查询功效。对于管理员和用户之间,便是经过查询发生联络。至此,本系统包含实体有:
用户——用于描述一名用户基础信息,以姓名来标识
管理员——用于描述一名管理员基础信息,以用户名来标识
因为一名管理员能查找多名用户信息,而且一名用户信息能被多个管理员查找。所以,管理员和用户之间联络是多对多。
其基础E—R模型以下图:
(2)逻辑结构设计
依据转换规则,这个E—R模型转换关系模式为:
用户(姓名,性别,生日,年纪,手机号码,职务,所在单位,家庭住址,固定电话,爱好爱好)
管理员(用户名、管理等级)
最终依据关系模式建立对应kh表和oper表
(3)数据库行为设计
安全设置:其管理员含有操作系统全部权限
数据操作功效:包含对数据录入、删除、修改功效
生成报表:kh表(姓名,性别……),oper表(用户名……)
六、设计答辩部分
(1)系统结构步骤图:
(2)设计方法
首先经过登录窗口
关键代码部分:
PrivateSubCommand1_Click()
DimmrcAsAdodb.Recordset
txtsqlselect*fromoperwhere用户名=Trim$(Text1(0).Text)and口令=Trim$(Text1(1).Text)+
Setmrc=exesql(txtsql)
Ifmrc.RecordCount=0Then
n=n+1
Ifn3Then
MsgBox没有这个用户,继续登录,vbOKOnly+vbExclamation,信息提醒
Text1(0).Text=
Text1(1).Text=
Text1(0).Setfocus
Else
MsgBox登录失败三次,退出系统,vbOKOnly+vbExclamation,信息提醒
mrc.Close
UnloadMe
EndIf
Else
userlevel=tram(mrc.Fields(等级))
mrc.Close
UnloadMe
main.ShowvbModal
EndIf
EndSub
其中有不满足登录条件重新登录,失败三次退出系统设计
登录后即进入主菜单
PrivateSubForm_Load()
Ifuserlevel系统管理员Then
Command3.Enabled=False
Command4.Enabled=False
EndIf
EndSub
PrivateSubCommand1_Click()
edkh.ShowvbModal“编辑用户按钮”连接edkh编辑窗体
EndSub
PrivateSubcommand2_click()
qukh.ShowvbModal“查询用户按钮”连接qukh查询窗体
EndSub
PrivateSubCommand3_Click()
s
文档评论(0)