超市管理系统样本.docx

超市管理系统样本.docx

《超市管理系统样本.docx》由会员分享，可在线阅读，更多相关《超市管理系统样本.docx（23页珍藏版）》请在冰豆网上搜索。

超市管理系统样本

超市管理系统

姓名：

同组者：

一、设计开发背景

在本学期，我们学习了《数据库原理及应用》（SQLserver）这一课程，基于此课程基础原理，从培养学习和实践综合角度出发，我们设计了一个简单而完善在实际生活中有用“超市管理系统模型”。

虽是一个简答“系统模型”，但我们目标意在学会最基础操作处理，比如：

结合vb实现用户登录、用户添加、用户删除、和修改等。

在这个目标和想法之上，从实际利用角度出发，结合我们专业，我们完成了这个“超市管理”系统。

因为在市场全球化今天，企业经营从资本经营发展到知识经营，从市场经济进入到知识知识经济时代，只有完善、科学、合理、人力资源配置同和之相适应企业经营管理系统，步骤和制度才会令企业在竞争中健康成长，稳步发展，永远立于不败之地。

企业管理组织构架是规范企业人员和岗位，企业人员和职位，企业人员和职责基础指导方针，是企业实施目标管理基础标准，是企业合理有效整合人力资源指导思想。

企业组织构架就是企业管理组织基础结构，它是联络企业经营者和管理者、企业管理者和实施者之间纽带和桥梁。

制订一个完善、科学、系统企业企业管理组织构架是理顺企业经营者和企业管理者之间主导和隶属关系基础条件，是企业管理健康、稳定发展根本确保。

在题材选定以后，我们就选择利用什么开发环境，为了让数据库前台实现和后台管理能够达成完美组合和实现，经过商讨，我们选择vb6.0作为我们开发环境，这关键有一下两点原因：

（1）在能够作为管理数据库软件中，我们只学习了vb6.0，而且相对来说，我们对vb比较熟悉，也能够熟练进行利用。

（2）Vb提供了功效强大数据库管理功效，能够方便灵活地完成数据库应用中包含诸如建立数据库、查询和更新等基础操作。

在vb中，数据库访问接口有3种：

①activex数据对象（ADO），远程数据对象（RDO）,数据访问对象（DAO）。

Vb应用程序能够经过Jet数据库引擎，microsoftODBC驱动程序和第三方ODBC驱动程序访问数据库。

全部这些优势就能够使vb编写前台应用程序负责和用户交互，用此程序能够选择数据库中数据项并把选择数据项按用户要求显示出来。

因为此项工作工作量和项目全部比较大，所以我们采取小组合作方法，四人为一组，而且每个组员全部有自己分工，有以下分工：

组长：

李泽峰

（1）负责系统整体计划和每个组员分工项目。

（2）用户管理模块中管理员登录界面、主界面设计、美化

（3）管理员查询和删除、添加管理员设计

组员：

黄春华

（1）系统整个界面设计和美化、颜色调和。

（2）添加管理员菜单项设计和开发

（3）Toolba控件利用

组员：

迪力沙提·阿不全部

（1）数据库设计和制作

（2）数据库信息查找和编排

（3）Vb界面设计

组员：

买买提图尔逊·卡德尔将

（1）界面设计

（2）Vb界面设计

二．数据库设计

基于我们管理系统各模块功效，在“超市管理”数据库中共设计制作了9个表，具体以下：

先是超市管理员表，在职员管理模块中，设计和制作了thuser表，在此表中，共有姓名、密码邮箱、权限、电话、家庭地址8个字段，设计表以下：

第二，我们设计了tbuser表在此表中包含了编号、日期、经办人商品编号、商品类型编号、仓库编号：

第三，我们还设计了paymoney,getmoney表，其中包含编号、日期、

金额、采购员多个字段：

第四，我们做了产品订单表，产品订单中我们依据超市产品信息，在product表中添加了编号、名称、产地、数量、进价、售价、类型编号、供货商编号、仓库编号，在表中我们列举了四个例子，我们所设计表以下：

第五，我们设计了bookorder表，其中包含编号、日期、经办人、供货商编号、商品编号、商品名称、商品产地、商品数量、商品进价、总计多个字段：

第六，我们设计了商品类型表：

其中字段包含有商品编号和商品名称：

第七，我们设计了supplier表，表中包含了编号、名称、地址、电话

联络人五个字段，在表中列举了三例子,设计表以下：

最终，我们还设计了sale表，表中包含了编号、日期、导购员、商品编号、商品名称、商品售价、商品数量、总计，销售单中类容我们列举了多个例子：

三、功效设计

在此系统中，一共包含五个部分关键技术，分别是登录系统部分；职员管理部分；入库管理部分；销售管理部分；收付款管理部分；基础信息管理部分，功效效果图以下：

然而在每个部分中，我们又设计了多个部分，以下：

第二部分，我们设计表格框架：

在用户登录模块中，假如用户输入成功，系统将会出现“欢迎进入西太华超市管理系统！

”，假如密码输入错误，系统会提醒“输入错误！

”假如输入三次全部错误话，自动退出登录系统界面。

当输入用户名和密码后点击确定：

弹出对话框，显示“欢迎进入西太华管理系统！

按确定后，进入主界面：

在主界面里，我们利用了文字菜单，图标菜单两种菜单形式，图标菜单和文字菜单，利用了一样运行作用，具体以下图：

在职员管理框中，一部分是企业职员基础信息一览表，既能够利用toolbar工具中“职员介绍”来浏览职员信息，也能够利用按钮进行浏览，这么便给使用者提供了一定选择空间，能够按自己喜好选择。

点击后将进入职员介绍界面，界面上附有管理员照片，在照片下有管理员职位，当点击按钮后将进入管理员个人介绍界面，情况以下：

点击总经理后，进入总经理介绍：

退出后我们回到主界面，第二个菜单项是查询界面，查询界面里有全部查询、按姓名查询、还有一个模糊查询，下面是不一样查询情况：

第二个菜单项是，添加管理员，在添加管理员中，我们把管理员密码添加也设计进去，当添加后，管理员信息自动存入数据库，我们能够再管理员查询表中找到我们所添加管理员信息：

确实定后：

当添加后，信息入了数据库。

删除管理员

此功效对离开企业职员信息进行删除，首先，还得经过查询调出要删除职员信息，以后点击删除，系统会提醒“确定要删除该职员基础信息吗？

”，点击确定即可删除，点击取消就可取消删除。

职员密码修改：

退出点击后，退回主界面，进行下一个菜单选择。

第二个菜单项中，关键是订货单登陆，添加，查询和删除三项

和数据库中bookorder连接，具体情况以下：

四、界面设计

一个完美管理系统，不仅要有强大管理功效作支持，而且一个优美舒适界面设计也起到了相当关键作用。

所以，在设计本系统时，我们也努力争取使界面达成最优。

总来说，此系统大致包含登录界面、系统主界面、职员信息管理界面等等，

登录界面：

登录是初始界面，是一个用户最先看到相关本企业界面，就像是第一印象一样，所以，一定要在此界面设计优美舒适界面，先给用户留下一个好印象。

其次，第一个界面应该传达出此系统是相关做什么信息，所以，在优美基础上，应该经过图片、文本等通知用户正在登录是什么系统。

鉴于这两点标准，本系统首先做了一个意境深远背景，达成优美舒适效果，还有提醒两个文本框，用来输入用户名和密码。

其次就是经过失位两行“西太华超市管理系统”给用户传达这是相关什么系统问题，整个登录界面总来说达成优美舒适实用效果了。

系统主界面：

系统主界面是整个系统管理关键位置，起到纽带和桥梁作用，从系统主界面能够进入到任意一个管理模块，从一个管理模块到另一个管理模块还得必需退回到主界面。

在此界面中关键是经过菜单来进入和管理某个具体管理模块，一共有管理员管理，采购管理、入库管理、销售管理、收付款查询、基础信息管理，每个菜单又有子菜单，有还有下一级子菜单，有对应菜单又有管理员添加和密码修改选项；采购管理中，我们有登记订单，修改订单，查询和删除订单。

信息浏览界面：

本界面中又设计了toolbar工具使用，从而使整个界面达成美观实用效果。

信息管理界面：

此界面是管理中心部分，也是技术含量最高部位，用文本框来管理对应信息，但全部文本框全部被一个frame控件框起来，看起来紧凑美观，同时也使用了toolbar工具已达成更美观效果。

查询界面：

此界面一再提供查询所想要信息，这个界面使用了checkbook控件用来选择不一样条件，而且这两个checkbook全部放在frame控件上，看起来比较美观，实用性也很强。

五、系统特色说明

尽管本系统只是一个实际应用中管理系统“小模型”，但在此系统中也有很多亮点和特色：

在整个界面设计过程中我们努力争取美观，我们以绿色为主色调，努力争取多用控件，保持色彩和文字颜色同一，给人眼前一亮感觉，

我们引入了，企业职员介绍界面，在界面上我们利用了图片和按钮来展现出我们企业管理员，当点击照片下按钮后，将进入到管理员基础信息介绍界面。

在整个设计过程中，我们利用了控件和代码二者组合，一部分视图和代码以下：

PublicsqlStrAsString

PublicmsgTextAsString

PrivateSubadminlogin（）

DimrsAsADODB.Recordset

DimjAsInteger

IfText1.Text=""OrText2.Text=""Then

MsgBox"请输入用户名"

EndIf

sqlStr="select姓名,密码fromthuserWhere姓名='"&Text1.Text&"'and密码='"&Text2.Text&"'"

Setrs=ExecuteSQL（sqlStr,msgText）

Ifrs.EOFAndrs.BOFThen

j=j+1

rs.Close

Setrs=Nothing

MsgBox"密码错误"

Ifj>2Then

MsgBox"连续错误3次！

程序将退出"

End

EndIf

Else

rs.Close

Setrs=Nothing

MsgBox"欢迎进入西太华超市管理系统！

"

主界面.Show

UnloadMe

EndIf

EndSub

PrivateSubadminlogin1（）

DimrsAsADODB.Recordset

DimjAsInteger

sqlStr="selectstaname,staidfromstaffWherestaname='"&Text1.Text&"'andstaid='"&Text2.Text&"'"

Setrs=ExecuteSQL（sqlStr,msgText）

Ifrs.EOFAndrs.BOFThen

j=j+1

rs.Close

Setrs=Nothing

MsgBox"密码错误"

Ifj>2Then

MsgBox"连续错误3次！

程序将退出"

End

EndIf

Else

rs.Close

Setrs=Nothing

MsgBox"登录成功！

"

主界面.Show

UnloadMe

EndIf

EndSub

PrivateSubadminlogin2（）

DimrsAsADODB.Recordset

DimjAsInteger

sqlStr="selectsname,snofromadminWheresname='"&Text1.Text&"'andsno='"&Text2.Text&"'"

Setrs=ExecuteSQL（sqlStr,msgText）

Ifrs.EOFAndrs.BOFThen