课程设计(数据库论文).doc

辽 宁 工 业 大 学 数据库原理与应用 课程设计（论文）题目： 药店管理系统 院 （系）： 专业班级： 学 号： 学生姓名： 指导教师： 教师职称： 起止时间： 课程设计（论文）任务及评语院（系）：软件学院 教研室：软件教研室学 号学生姓名专业班级课程设计（论文）题目 药店管理系统课程设计（论文）任务课程设计任务及要求：（1）掌握设计数据库表及其间的关系的基础知识（2）掌握设计相关的查询、窗体、报表、数据访问页和宏（3）有和具体业务相关的处理功能（不少于5个）（4）用切换面板、主窗体、菜单栏和工具栏三种方式设计用户界面。（5）用SQL设计带统计函数的查询（如MAX，MIN，COUNT，AVG，SUM）(6) 用编写VBA代码实现部分功能课程设计过程中，要严格遵守实践环节的时间安排，听从指导教师的指导。正确地完成上述内容，记录实习日记，规范完整地撰写出课程设计论文。指导教师评语及成绩成绩： 指导教师签字： 2011 年 12 月 6 日辽 宁 工 业 大 学 课 程 设 计 说 明 书（论 文）目 录第1章 课程设计目的与要求11.1 课程设计目的11.2 课程设计的实验环境11.3 课程设计的预备知识11.4 课程设计要求1第2章 课程设计内容22.1 系统功能分析22.2 数据库模型32.3 设计窗体和报表72.4 窗体和报表模块主要代码9第3章 课程设计总结12参考文献13第1章 课程设计目的与要求1.1 课程设计目的本课程的课程设计实际是电子商务和计算机信息管理专业学生学习完数据库原理及应用（ACCESS 2003）课程后，进行的一次全面的综合训练，其目的在于加深对数据库基础理论和基本知识的理解，掌握运用数据库应用系统开发软件的基本方法。1.2 课程设计的实验环境硬件要求能运行Windows 9.X操作系统的微机系统。数据库应用系统开发软件可以选用Microsoft Access，或其他数据库管理系统。1.3 课程设计的预备知识熟悉数据库的基本知识及一种以上数据库系统开发软件。1.4 课程设计要求按课程设计指导书提供的课题，应根据下一节给出的基本需求独立完成八个方面的设计，标有“可选”的部分可根据设计时间的安排及工作量的大小适当选择。选用其他课题或不同的数据库管理系统，可以组成设计小组，分模块进行,共同协作完成一个应用系统的开发任务。要求书写详细的设计说明书，对复杂的代码段和程序段，应画出程序流程图。在界面设计中，画出每个窗口的布局，有多个窗口时，按模块调用的方式画出窗口调用图，用手工画好报表和标签样式，严禁相互抄袭。第2章 课程设计内容2.1系统功能分析2.1.1 系统功能分析药店管理系统实现以下几项功能：货源的信息查询员工的管理销售信息管理会员顾客管理药店的输入、查询和修改药店管理系统方便店主对药店的管理，从药品进入药店，到卖到顾客都有一个详细的记录，便于对数据的管理，查询，和维护。可以对以往进货的厂家的货物销量进行了解，分辨那一家更好增加进货量，对从哪一家进得货，谁办理的同样有明确的记录，对销量的信息也有规范的记录，及员工的信息工资等资料，会员管理可以及时对会员的积分进行处理，给顾客带来最大的方便。2.1.2 系统功能模块设计药品信息管理系统分为四大模块分别是：货物的信息查询、员工管理、销售信息管理和会员顾客管理。货物信息管理可以进行时间、数量、产地的、供货商等信息的查找员工管理对员工的工资，电话等信息进行存储销售信息管理对药品的卖出情况，时间，价格进行管理会员管理系统中，查找会员的积分等信息 如图2.1系统功能模块图图2.1系统功能模块图 药店管理系统货物信息管理模块员工信息管理模块销售信息管理模块会员信息管理模块货物来源进货数量进货金额进货时间工资查询电话查询编号查询销售数量销售价格销售时间姓名查找积分查询办卡时间查询图2.1系统功能模块图2.2数据库模型2.2.1 数据库需求分析数据项和数据结构如下进货表：进货单编号、采购时间、药品数量、购货总金额、员工编号、生产地、供应商编号员工表：员工编号、姓名、性别、工资、电话会员表：会员编号、用户名、办卡时间、积分药品表：药品编号、药品名称、药品种类、药品批号、剩余数量供应商：供应商编号、供应商名、负责人、电话销售表：销售编号、药品编号、药品名称、单价、数量、日期 2.2.2 数据库概念结构设计 员工员工编号姓名性别工资电话管理产品编号采购时间产品数量总金额员工编号生产地供应商编号 产品供应购买 供应商 会员 供应商编号供应商名负责人电话会员编号用户名办卡时间积分nmnmnm图2.2 E-R图员工（员工编号、姓名、性别、工资、电话）产品（产品编号、员工编号、供应商编号、采购时间、产品数量、总金额、生产地）供应商（供应商编号、供应商名、电话、负责人）会员（会员编号、用户名、办卡时间、积分）管理（员工编号、产品编号）供应（产品编号、供应商编号）购买（产品编号、会员编号）会员表：会员编号、用户名、办卡时间、积分等，见表2.1 表2.1 会员表字段名称数据类型 字段大小是否主键会员编号 数字 50 是 用户名 文本 50否办卡时间 日期/时间 50 否积分 数字 50 否 供应商表：供应商编号、供应商名、负责人、电话等，见表2.2 表2.2 供应商表字段名称数据类型 字段大小是否主键供应商编号 数字 50 是 供应商名 文本 50否负责人 文本 50 否电话数字 50 否员工表：员工编号、姓名、性别、工资、电话号等，见表2.3 表2.3 员工表字段名称数据类型 字段大小是否主键员工编号 数值 50 是 姓名 文本 50否性别 文本 50 否工资 货币 否电话 数值 50 否 2.2.3 数据库逻辑结构设计销售表主要包括:销售编号、会员编号、药品编号、药品名称、单价、数量、日期等字段。通过该表可以查询到什么药急需，及每天药房的销售情况 图2.3 销售表会员表主要包括：会员编号、用户名、性别、办卡时间、积分等字段。通过该表可以快速的查找会员积分。图2.4 会员表进货表主要包括：进货单编号、采购时间、药品数量、购货金额、购货员工编号、供应商编号等字段。清晰了解采购时间及采购人员等信息。图2.5 进货表2.2.4 数据库连接说明图2.6关系模型2.3 设计窗体和报表 通过此切换面板可以查到药店、货物、员工、顾客的一些相关信息，信息可以用报表、窗体、宏等形式显示出来。 图2.7切换面板该报表显示的是会员表表格式报表，通过报表可以直观的看到同学的信息，但是报表只能进行浏览或打印，而不能在其中进行数据的输入和编辑。 图2.8会员表 操纵员工表数据窗体，该窗体不仅能够在其中浏览数据，还可以进行数据的新增、修改和删除操作。图 2.9员工表该表是自动创建的表格式窗体，通过该窗体可以清晰的看到联系人的信息。 图2.10 自动创建表格式会员表2.4 设计窗体和报表模块主要代码窗体代码Private Sub 保存记录_Click()/ 保存记录On Error GoTo Err_保存记录_Click DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70Exit_保存记录_Click: Exit SubErr_保存记录_Click: MsgBox Err.Description Resume Exit_保存记录_ClickEnd SubPrivate Sub 删除记录_Click()/ 删除记录On Error GoTo Err_删除记录_Click DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70Exit_删除记录_Click: Exit SubErr_删除记录_Click: MsgBox Err.Description Resume Exit_删除记录_ClickEnd SubPrivate Sub 复制记录_Click()/ 复制记录On Error GoTo Err_复制记录_Click DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 DoCmd.DoMenuItem acFormBar, acEditMenu, 2, , acMenuVer70 DoCmd.DoMenuItem acFormBar, acEditMenu, 5, , acMenuVer70 Paste AppendExit_复制记录_Click: Exit SubErr_复制记录_Click: MsgBox Err.Description Resume Exit_复制记录_ClickEnd SubPrivate Sub 打印记录_Click()/ 打印记录On Error GoTo Err_打印记录_Click DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 DoCmd.PrintOut acSelectionExit_打印记录_Click: Exit SubErr_打印记录_Click: MsgBox Err.Description Resume Exit_打印记录_Click End SubPrivate Sub 撤销记录_Click()/ 撤销记录On Error GoTo Err_撤销记录_Click DoCmd.DoMenuItem acFormBar, acEditMenu, acUndo, , acMenuVer70Exit_撤销记录_Click: Exit SubErr_撤销记录_Click: MsgBox Err.Description Resume Exit_撤销记录_ClickEnd SubPrivate Sub Command14_Click()/ 结束记录On Error GoTo Err_Command14_Click DoCmd.GoToRecord , , acFirstExit_Command14_Click: Exit SubErr_Command14_Click: MsgBox Err.Description Resume Exit_Command14_Click End SubPrivate Sub Command15_Click()On Error GoTo Err_Command15_Click DoCmd.GoToRecord , , acLastExit_Command15_Click: Exit SubErr_Command15_Click: MsgBox Err.Description Resume Exit_Command15_Click End Sub模块代码：Private Sub command2_Click()/ 欢迎窗体Me.txt .SetFocusMe.txt .Text = 你好！欢迎使用药店管理系统End SubPrivate Sub Command3_Click()Me.txt .SetFocusMe.txt .Text = End SubPrivate Sub 主体_Click()Me.Caption = 欢迎 !End SubOption Compare Database /显示会员积分Dim db, str1 As StringSub myselect3()Dim db As New ADODB.ConnectionDim str1 As ADODB.RecordsetSet db = CurrentProject.ConnectionSet str1 = New ADODB.Recordsetstr1.Open select * from 会员号 , db, adOpenKeyset, adLockBatchOptimisticDo Until str1.EOFDebug.Print Strl(积分)Strl.MoveNext报表代码Option Compare Database/创建新对象Private Sub command0_click()On Error GoTo Err_Command0_ClickDim stdocname As StringDim stlinkcriteria As Stringstdocname = ChrW(1332) & ChrW(2344) & ChrW(2343)DoCmd.OpenForm stdocname, , , , stlinkcriteriaexit_command0_click:Exit Suberr_command0 -Click:End Sub 第3章 课程设计总结我所做的课程设计是药店管理系统，药店管理系统对药店管理有着很大的帮助，便于查询药品信息，以及管理员工和顾客的信息是不可缺少的一部分。通过本次课程设计，使我对数据库有了更加深入了解，平时上课按照书操作以为自己什么都会做，但是通过这次自己独立完成课程设计发现自己有很多的不足，有很多不会的地方，就连平时很简单的一个查询离开书