饭店就餐管理系统大数据库课设

1、摘要随着我国市场经济的快速开展，各行业都呈现出生机勃勃的开展景象， 其中 餐饮业的开展尤为突出。近两年来已呈现出高速开展的态势。 但在快速开展的同 时，餐饮业在日常经营管理中仍普遍采用手工管理方式，整体科技含量低。随着餐饮企业规模和数量的不断增长，手工管理模式无论是在工作效率、人员本钱还 是提供决策信息方面都已难以适应现代化经营管理的要求，因此制约了整个餐饮业的规模化开展和整体服务水平的提升。 有效的管理成为了一个难题，为能有效 的解决这些问题提高企业的经济效益， 在这些中小型饭店中采用工作流技术， 结 合饭店绿色管理内容，实施计算机管理信息系统不视为一条有效的解决途径。本论文主要针对中小型饭

2、店餐饮管理中的一些问题， 将其与计算机信息管理系 统结合起来，实现中小型饭店管理信息计算机化、系统化，将中小型饭店管理中 的工作流转化成比拟科学化、规 X化的业务流程，使管理根底数据更加准确化， 管理人员摆脱了事务性工作，转而从事管理专业工作，为经营决策提供了快捷和 强大的数据支持。把计算机用于餐饮企业管理，可在很大程度上提高管理者分析 和决策的科学性，提高经营管职水平，带来更多的顾客，使企业取得更好的经济 效益。关键词餐饮管理；信息查询；数据库连接目录1系统功能概述 1系统功能分析11.2系统结构总图12数据库设计 22.1 需求分析22.2 E-R 模型22.3表结构设计43各窗体设计 6

3、启动封面窗体与登录对话框的设计 63.2主窗体7注册新用户窗体9分别设计各个信息窗体 11客人就餐管理窗体14各种信息的查询窗体 16总结 .19参考文献 .201系统功能概述本系统属于小型的餐饮管理系统， 可以有效地对中小型餐厅消费进展管理, 本系统应达到以下目标：系统采用人机交互的方式，界面美观友好，信息查询灵活、方便，数据存储安全可靠。实现对餐厅顾客开台、点菜/加菜、账目查询和结账等操作。对用户输入的数据，进展严格的数据检验，尽可能的防止人为错误。实现对消费账目自动结算。实现对消费的历史记录进展查询。系统应最大限度地实现易维护性和易操作性1.2系统结构总图图1.1饭店就餐管理系统的结构总

4、图2数据库设计2.1需求分析本系统运用 VB 6.0与Microsoft Office Access2007实现，拥有1个登录窗体、 1个主窗体、8个子窗体、2个数据环境设计器。登录窗体可以登录到主窗体，点击主窗体的菜单按钮，可以选择具体功能。1. 系统设置管理：包括菜谱管理，餐桌管理，用户管理2. 数据查询：数据查询包括：现态查询3. 查询统计管理：包含销售金额统计和菜肴销售排行以上内容需要四个表分别是：包含以下实体与属性：1. 菜肴信息菜肴编号，分类，菜名，规格，单价，有效日期2. 餐桌信息餐桌编号，餐桌位置，餐桌档次，可容纳人数，是否空闲3. 账单表流水号，餐桌编号，就餐时间，就餐人数，

5、应收金额，实收金额， 折扣，经手人4. 账单明细表流水号，菜肴编号，数量5. 用户表用户名，密码2.2 E-R模型菜谱管理餐桌管理3.密码用户信息用户信息4.登录E-R图登录登录2.3表结构设计下面为各个表的设计字段名称数抿类型文本文余文本文本 货币 日期/时间图2.5菜肴信息表学段容称数据类型餐桌编号文本餐桌位番文*1餐桌栏次文本可容纳人数文本1是否空闲是倚1图2.6餐桌信息表字段名称数据类型用户表文本密码文本图2.7用户信息表二张单表字軽名称数据类型本本本币帀本本 文文文货贷交文餐桌编号 就餐时间 就餐人数 应收金额 实收金额 折扣 经手人图2.8账单表=1紙单明醐表字段名称瀆水号文本菜着

6、编号文*数量文本数据类型图2.9账单明细表3各窗体设计要求：图片背景、欢迎类文字、单击显示“进入系统标题的标签或按钮，将 打开“登录对话框，用户输入用户名和密码，假如正确如此打开下面的主窗体; 否如此提示密码错误，请重新输入。最多允许输入3次。如图3.1 , 3.2所示进入系统窗体进入系统后进入登陆主窗体的编码为:Private Sub man d1_Click()End Sub登录窗体登录编码如下：Private Sub man d1_Click()Dim sqlstr As Stri ngsqlstr = Select * From 用户表 Where 用户名=& Textl & 呐Ado

7、dcI.RecordSource = sqlstrIf Adodc1.Recordset.EOF ThenMsgBox 用户名错误，重新输入, vbExclamation, 警告Textl.Text =Else密码)=Text2 The nIf Adodc1.Recordset.Fields(Un load MeElseMsgBox 密码错误，重新输入 , vbExclamation,Text2.Text =End IfEnd IfmiCo unt = miCo unt + 1If miCou nt = 3 The n Un load MeEnd SubPrivate Sub man d2_C

8、lick()Un load MeEnd Sub3.2主窗体要求：设计为MDI窗体，含有主菜单：文件、系统设置管理、客人就餐管理、数据查询和统计文件菜单包含以下子菜单与其功能：注册新用户菜单：打开“注册新用户窗体退出:完毕程序运行系统设置管理包含以下子菜单：菜谱管理菜单：显示菜谱信息窗体餐桌管理菜单：显示餐桌信息窗体用户管理菜单：显示用户信息窗体退出菜单：完毕程序运行客人就餐管理包含以下子菜单：开台菜单：打开“开台窗体，登记客人的餐桌号，并启动“点菜窗体点菜菜单：打开“点菜窗体，修改某餐桌上客人的点菜信息结账菜单：打开“结账窗体，选择要结算的餐桌，进展结算，打印账单。数据查询和统计包含以下子菜单

9、：现态查询:显示当前每个餐桌的占用/空闲情况，占用餐桌的用餐人数销售金额统计:按时间段统计饭店的销售总额，累计用餐人数菜肴消费排行榜:按顺序显示消费次数最多的菜肴名称与其消费次数如图3.3所示:主菜单 其编码如下：Opti on ExplicitPrivate Sub caipu_Click()End SubPrivate Sub caiyao_Click()End SubPrivate Sub can zhuo_Click()End SubPrivate Sub den glu_Click()End SubPrivate Sub Image1_Click()End SubPrivate Su

10、b keren_Click()End SubPrivate Sub tc_Click()Un load MeEnd SubPrivate Sub xia ntai_Click()End SubPrivate Sub xiaoshou_Click()End SubPrivate Sub yon ghu_Click()End SubPrivate Sub zhuce_Click()End Sub用于添加新的用户名和密码。；单击“注册新用户菜单，打开对话框如图2要求：假如新用户名与系统信息表原有用户名一样，如此提示“用户名已存在， 重新输入；判断二次输入密码假如不一致，如此提示用户“输入密码不一致，

11、 重新输入密码；判断假如输入密码为空，如此提示“密码不能为空；假如输 入正确，如此将输入的用户名保存到“系统信息表，并提示“注册用户成功， 关闭本窗体。以下各窗体设为MDI主窗体的子窗体，如图3.4 3.5所示：注册用户窗体其编码为：Private Sub man d1_Click()Dim sqlstr As Stri ngIf Text1 = The nMsgBox 请输入用户名！ , vbExclamation, 确认用户名Exit SubElsesqlstr = Select * from 用户表 where 用户名=”& Textl & ”AdodcI.RecordSource =

12、sqlstrIf Adodc1.Recordset.EOF = False ThenTextl =Exit SubEnd IfEnd If判断二次输入密码是否一致：If Text2 Text3 The n检验密码MsgBox 二次输入的密码不一致，请重新输入 , vbExclamatio n,Text2 = : Text3 =Exit SubElseIf Text2 = The nMsgBox 密码不能为空！ , vbExclamation,检验密码Else(”(”MsgBox 成功注册新用户！End IfEnd Sub用户名)=Trim(Text1) 密码)=Trim(Text2),vbIn

13、formation,添加用户Private Sub man d2_Click()Un load MeEnd Sub功能：浏览和录入各信息。该窗体以文本框显示当前记录，用按钮首记录、 末记录、前一个、后一个，控制记录指针的移动；用一个标签 Label显示： 当前记录号/记录总数；单击表格显示按钮，显示DataGrid控件(Visible=True), 以表格形式显示商品信息表，单击返回按钮，可以关闭本窗体，返回主窗体。 可以对记录进展新增、确认、删除、取消操作。3.8 3.9所示：图3.5菜谱管理窗体图3.6餐桌管理窗体图3.7用户管理窗体其编码为：Opti on ExplicitPrivate

14、 Sub man d1_Click() man d1.E nabled = Falseman d2.E nabled = Falseman d3.E nabled = Trueman d4.E nabled = True End Sub记录指针移到前一条记录Private Sub man d10_Click()man d9.E nabled = True如果记录指针移到首记录之前man d8.E nabled = TrueIf Adodc1.Recordset.BOF The n 1AdodcI.Recordset.MoveFirst man d5.E nabled = False man d

15、10.E nabled = FalseEnd If如此记录指针移到首记录上End SubPrivate Sub man d2_Click()Dim x确认)x = MsgBox(确实要删除当前记录吗？ , vbYesNo + vbQuestion,If x = vbYes The nIf Adodc1.Recordset.EOF ThenEnd IfElseEnd IfEnd SubPrivate Sub man d3_Click() man dl.E nabled = True man d2.E nabled = True man d3.E nabled = False man d4.E n

16、abled = False End SubPrivate Sub man d4_Click() man dl.E nabled = True man d2.E nabled = Trueman d3.E nabled = False man d4.E nabled = FalseEnd Sub记录指针移到首记录显示首记录让首记录按钮无效让前移按钮无效让后移按钮有效让末记录按钮有效Private Sub man d5_Click()AdodcI.Recordset.MoveFirst man d5.E nabled = False man d10.E nabled = False man d9.

17、E nabled = True man d8.E nabled = True End SubPrivate Sub man d7_Click()Dim n As In tegerAdodc1.Recordset.Move nEnd SubPrivate Sub man d8_Click()AdodcI.Recordset.MoveLast 移到末记录man d5.E nabled = Trueman d10.E nabled = Trueman d9.E nabled = Falseman d8.E nabled = FalseEnd SubPrivate Sub man d9_Click()

18、Adodc1.Recordset.MoveNext 记录指针移到下一条记录man d5.E nabled = Trueman d10.E nabled = TrueIf Adodc1.Recordset.EOF The n 如果记录指针移到了末记录之后Adodc1.Recordset.MoveLast 如此记录指针移到末记录上man d9.E nabled = Falseman d7.E nabled = FalseEnd IfEnd Sub如如下图:图3.8开台窗体图3.9点菜窗体图3.10结账窗体其编码为：Private Sub man d1_Click() man d1.E nabled

19、 = False man d2.E nabled = True End SubPrivate Sub man d2_Click() man d1.E nabled = Trueman d2.E nabled = FalseEnd SubPrivate Sub man d1_Click() man d1.E nabled = False man d2.E nabled = True End SubPrivate Sub man d2_Click()man dl.E nabled = True man d2.E nabled = FalseEnd SubPrivate Sub man d1_Cli

20、ck()Uni oad Frmjiezha ngEnd Sub可以按各种条件查找，这些条件放在组合列表框bo中，供用户选择。在文本框中输入要查询的内容，单击查询按钮，查询结果用网格控件显示.。如下列图:图3.11现态查询窗体其编码为：Dim str As Stri ngstr = Select * From餐桌信息str = str& Where餐桌信息.& bol.Text & Like & Textl & %AdodcI.RecordSource = strEnd SubPrivate Sub man d2_Click()Uni oad Frmxia ntaiEnd SubPrivate

21、Sub Form_Load() bol.Addltem 可容纳人数” bol.Addltem 是否空闲 bol.Text = 可容纳人数”Textl.Text =End Sub图2消费金额统计窗体其编码为：Private Sub man d1_Click()Dim str As Stri ngstr = Select * From 账单表str = str& Where 账单表.& bol.Text & Like & Textl & %AdodcI.RecordSource = strEnd SubPrivate Sub man d2_Click() Un load Frmxiaoshout

22、ongjiEnd SubPrivate Sub Form_Load() bol.Addltem 就餐人数 bol.Addltem 实收金额 bol.Text = 就餐人数 Textl.Text =End Sub图3.13菜肴统计窗体其编码为：Opti on ExplicitPrivate Sub man d1_Click()Dim str As Stri ngstr = Select * From 账单明细表str = str& Where 账单明细表.& bol.Text & Like & Textl & %AdodcI.RecordSource = strEnd SubPrivate Su

23、b man d2_Click()Uni oad FrmcaiyaoxiaofeiEnd SubPrivate Sub Form_Load() bol.AddItem 菜肴编号 bol.AddItem 数量 bol.Text = 菜肴编号 Textl.Text =End Sub总结经过了接近一周的时间，我们组成员共同合作做的c#餐饮管理系统课程设计根本接近尾声了，做完这次的餐饮管理系统C#的课程设计，我对餐饮管理系统设计有了整体的感知。能把 C#语言讲清楚.以根底为主，从简单入手，逐渐扩 展开来，了解和学会了很多这方面的知识，掌握了C#的语法以与面向对象程序设计思想和方法，以 windows程序为主，课程设计贴近我们的生活，使用价值 高。读者会对餐饮管理系统的整体设计有一个深入的了解，对整个流程也会有一个清晰的认识。开发餐饮管理系统，要抓住开发的核心局部。餐饮系统大体由登 录、桌台管理、开台、点菜、结账和密码修改等