五个access管理系统实用范例整合

《五个access管理系统实用范例整合》由会员上传分享，免费在线阅读，更多相关内容在应用文档-天天文库。

1、整合了五个access小数据库很适合学习与借鉴自己做出成品81数据库课程设计数据库设计报告——客户资料管理系统姓名：魏智祥学号：21308133指导教师：喻国荣东南大学交通学院测绘工程目　　录一、课题描述81二、制作过程1、系统分析2、环境描述3、创建表4、创建窗体5、集成数据库系统6、总结81客户资料管理系统由于企业的不断发展，客户量也会不断增加，如果仍然在excel电子表格处理客户信息，不仅容易出错，而且管理客户资料也显得比较繁琐，于是基于access的客户资料管理系统数据库应运而生。在该系统中，所有的操作都是基于窗体的，数据直观，操作简便，在

2、一定程度上大大提高了工作效率。本数据库的功能主要有三个：一是管理客户的基本资料，二是对客户资料进行查询，三是将客户资料导出。制作过程：一、对系统的需求分析：对客户资料管理系统数据库的需求分析主要从功能模快、流程图和包含的表三方面进行。1.功能模块的分析“客户资料管理系统”数据库的功能主要包括三大模块：一是管理员登陆模块，该模块的功能是对操作数据库的用户的身份验证，只有具有权限的用户才能操作该数据库系统，这样才能保证数据库系统的安全性；二是客户资料管理模块，该模块的功能是对客户资料进行添加、修改和删除操作；三是客户资料查询模块，该模块的功能是对客户资

3、料进行查看、导出和打印操作。具体的功能模块如图：导出记录查看记录删除记录修改记录添加记录验证用户名和密码客户资料管理客户资料查询管理员登陆客户资料管理系统2.流程图的分析根据对“客户资库系统管理系统”的数据库系统功能模块的分析，可以设计出该数据库系统的流程图：81开始是否导出记录查询记录删除记录修改记录添加记录客户资料查询客户资料管理结束退出系统退出系统客户管理系统用户名和密码是否正确管理员登陆813.表的分析对于“客户资料管理系统”数据库系统而言，其结构比较简单，因此只需要一张“客户资料”表和一张“用户表”表。其中，“客户资料”表的主要功能是保存

4、所有客户的信息，它以“客户ID”为主键；“用户表”表的功能是存储管理员登陆的用户名和密码信息，它以“用户ID”为主键。两表中的字段信息如下“客户资料”表字段字段名称字段类型字段大小允许为空备注客户ID文本10否主键公司名称文本50否公司地址文本50否客户姓名文本20否客户职务文本20否国家文本20否默认为中国地区文本50否城市文本50否邮编文本10否电话文本24是传真文本24是备注文本是“用户表”表字段字段名称字段类型字段大小允许为空备注用户ID文本10否主键用户名文本10否密码文本10否一、创建空白数据库1.启动Access,选择新建命令，在“空

5、白数据库”窗格中单击，输入数据库的名称为“客户资料管理系统”811.单击“创建”即可得到空数据库，如图：一、创建表1、选择“设计视图”命令。在“视图”组中单击，在弹出的下拉菜单中选“视图设计命令”。在打开的另存为对话框将表名称输入为“用户表”812.设计“用户表”。在打开的“用户表”的设计视图中输入上边“用户表”的文字，如图：3．切换视图。保存刚才设计的表，选择“表工具/设计”选项卡中的“视图”组的“视图”将该表切换到表视图，如图：811.在“用户表”中添加一条记录，该记录的“用户ID”为“1001”用户名为“guanliyuan”,密码为“123

6、456”，如图，然后保存：2.单击创建，选择“表设计”按钮，在打开的表1的设计视图中输入前面所设计“客户资料”表的内容，并设置“客户ID”为主键，将表1以“客户资料”为名进行保存，并切换到表示图，如图：81一、创建窗体“客户资料管理系统”主要有三个模块。1.点击“创建”，在窗体组中单击“空白窗体”，将“用户表”的“字段列表”窗体格中的“用户名”和“密码项”字段添加到空白窗体中，如图：2.将窗体以“管理员登陆”为名保存，切换到设计视图，如图：3.在窗体设计工具栏控件组中单击“标题”为窗体添加标题，如图：811.添加命令按钮。在设计控件组中选择“按钮”

7、在窗体的主体区域创建一个“提交”按钮，如图：2.返回窗体视图，设置页眉页脚的背景色，将“密码”文本框的输入掩码为“密码”，如图：811.创建“客户资料窗体”，如图：811.分别添加命令按钮，为“添加记录”“保存记录”，“删除记录”，“将窗体以客户资料管理”保存，最后的结果如图：2.创建客户资料查询窗体，最后的效果如图：811.创建导出数据窗体，是窗体导出到excel格式，word格式，txt格式或者HTML格式，如图：代码如图所示，连接到的是事件过程，PrivateSubCommand1_Click()DoCmd.OutputToacOutputF

8、orm,"导出数据",acFormatRTF,,TrueEndSub81PrivateSubCommand2_Click(