数据库课程设计（论文）-企业销售管理系统设计.doc

《数据库课程设计（论文）-企业销售管理系统设计.doc》由会员分享，可在线阅读，更多相关《数据库课程设计（论文）-企业销售管理系统设计.doc（16页珍藏版）》请在三一文库上搜索。

1、沈阳理工大学课程设计专用纸 Noi 沈阳理工大学 i 摘摘 要要 销售管理是企业管理的一个重要的管理环节,它的特点是信息量大,要求信息反馈迅 速。同时，与库存管理、销售账务管理等关系十分密切。利用计算机管理技术,把科学管 理的技术及管理方式融入到企业销售管理中,可极大的提高工作效率和企业的管理水平, 使企业能够随着市场的动态变化而随时调整销售业务流程。本文采用VB + SQL Server开 发模式,针对某企业产品的特点,开发了基于C/S模式的销售管理系统，在单一数据库下, 实现了该企业不同品种、不同系列产品订、退货的销售过程的管理。实际应用表明,该管 理系统显著提高了企业的销售管理水平,产生

2、明显的经济效果。 关键词关键词: :销售管理；统计查询；VB + SQL Server开发模式；E-R模型 沈阳理工大学课程设计专用纸 Noii 沈阳理工大学 ii 目目 录录 第第 1 章章 系统功能概述系统功能概述 .1 1.1 系统的功能1 1.2 系统结构总图.1 第第 2 章章 数据库设计数据库设计 .2 2.1 销售管理系统 E-R 模型.2 2.2 销售管理系统关系模型.2 2.3 销售管理系统表结构设计.2 第第 3 章章 功能模块的设计功能模块的设计 .5 3.1 配置数据源（ODBC 数据源）： .5 3.2 各窗体的设计5 3.2.1 封面5 3.2.2 登录6 3.2.

3、3 主菜单7 3.2.4 添加信息8 3.2.5 删除信息9 3.2.6 查询11 3.2.7 注册更改12 结论结论 .13 参考文献参考文献 .13 沈阳理工大学课程设计专用纸 No1 沈阳理工大学 1 第第 1 章章 系统功能概述系统功能概述 1.1 系统的功能系统的功能 销售管理的主要任务是用计算机对产品销售过程进行日常管理,如销售订单、销售发货、销售退货 等，迅速准确地完成各种销售信息的统计计算和汇总工作,并快速打印销售报表。针对系统服务对象的 具体要求,设计了销售管理系统。 销售管理系统主要包含以下功能: (1)基本信息管理:对商品、客户的基本信息进行维护和管理。能够完成各种信息的

4、添加、修改和删除, 也可按照一定的条件查询这些信息。 (2)销售过程管理:系统可完成订单、发货等每个模块的添加、修改和删除等操作,并可按照一定的条件 查询订单完成情况、发货状态等信息。 (3)查询统计:可按用户选择的字段和输入的内容进行查询,并在查询过程中显示销售数量和金额。 1.2 系统结构总图系统结构总图 销售管理系统的总体结构如图1.1所示。 销售管理系统 基本信息 销售管理统计查询 客 户 信 息 管 理 产 品 信 息 管 理 销 售 订 单 销 售 退 货 销 售 统 计 查 询 图1.1 销售管理系统的总体结构 沈阳理工大学课程设计专用纸 No2 沈阳理工大学 2 第第 2 章章

5、 数据库设计数据库设计 2.1 销售管理系统销售管理系统 E-R 模型模型 销售管理系统的E-R图如图2.1所示。 客户 订货 销售订单 退货退货单 1 n 1 n 图 2.1 销售管理系统的 E-R 图 2.2 销售管理系统关系模型销售管理系统关系模型 一个实体型转换为一个关系模式。实体的属性就是关系的属性，实体的码就是关系的码。根据 E- R 图向关系模型转换的原则，把图 2.1 中的 E-R 图转换为关系模型。关系的码用下横线标出。 客户（客户编号，客户名称，客户地址，客户联系方式) 销售订单（编号，客户编号，销售日期，销售数量，销售价） 销售退货单（编号，货号，退货数量，退货日期） 2

6、.3 销售管理系统表结构设计销售管理系统表结构设计 数据字典中数据项部分的描述，如表 2.1-2.3 所示；数据库如图 2.2 所示。 表 2.1 “客户”表数据字典 数据项名数据类型长度(byte)取值范围含义说明 客户编号Char510001-10005客户的编号 客户名称Varchar10客户的名称 客户性别Varchar2客户的性别 客户地址Varchar20客户的地址 客户联系方式Char11客户的联系方式 沈阳理工大学课程设计专用纸 No3 沈阳理工大学 3 表 2.2 “销售订单”表数据字典 数据项名数据类型长度(byte)取值范围含义说明 订单编号Char510001-1000

7、5订单的编号 客户编号Char500001-00003客户的编号 销售日期Char8销售的日期 销售数量Varchar10销售的数量 销售价格Varchar5销售价格 发货地址Varchar20货物发往地址 表 2.3 “销售退货单”表数据字典 数据项名数据类型长度(byte)取值范围含义说明 编号Char510001-10005订单的编号 货号Char5所退货物的编号 退货数量Varchar10退货的数量 退货日期Char5退货的日期 退货原因Varchar20退货的原因 表 2.4 “密码表”表数据字典 数据项名数据类型长度(byte)取值范围含义说明 用户名Char1010001-100

8、05登陆时的用户名 密码Char6登陆时的用密码 图 2.2 销售管理系统数据库 沈阳理工大学课程设计专用纸 No4 沈阳理工大学 4 图 2.2 销售管理系统数据库 沈阳理工大学课程设计专用纸 No5 沈阳理工大学 5 第第 3 章章 功能模块的设计功能模块的设计 3.1 配置数据源（配置数据源（ODBC 数据源）：数据源）： 按如下步骤，根据向导配置系统数据源。 开始设置 控制面板 管理工具 数据源（ODBC） 系统 DSN 驱动程序选为 SQL Server 给出该数据源的名称、描述、服务器 更改默认数据库为（自己所建的数 据库） 测试 成功 确定 确定。 3.2 各窗体的设计各窗体的设

9、计 3.2.1 封面封面 封面，如图 31，标题为“欢迎进入销售管理系统” ，为此标题添加一个 Timer，编辑 代码使其可以定时变色。点击“点击进入”就可以关闭本窗体并打开登录窗体。 封面代码如下： Private Sub Command1_Click() Form2.Show Unload Me End Sub 图 3.1 欢迎界面 添加 完成 沈阳理工大学课程设计专用纸 No6 沈阳理工大学 6 3.2.2 登录登录 将打开“登录”对话框，用户输入用户名和密码，如图 3.2.2，若正确则打开下面的 主窗体，如图 3.2。 登录代码如下： Private Sub CmdLand_Click

10、(Index As Integer) Dim sqlstr As String Dim miCount As Integer 用于记录输入密码次数 sqlstr = “Select * From 密码表 Where 用户名= “ & Text1(1) & “ “ Adodc1.RecordSource = sqlstr Adodc1.Refresh If Adodc1.Recordset.BOF Then 若没找到符合 Where 条件的记录 MsgBox “用户名错误，重新输入“, vbExclamation, “警告“ Text1(1).Text = “ “ Text1(1).SetFoc

11、us Text1 获得焦点 Else 判断密码是否正确 If Adodc1.Recordset.Fields(“密码“) = Text2(0) Then MDIForm1.Show Unload Me Else MsgBox “密码错误，重新输入 “, vbExclamation, “警告“ Text2(0).Text = “ “ Text2(0).SetFocus End If End If miCount = miCount + 1 If miCount = 3 Then Unload Me 图 3.2 登陆界面 沈阳理工大学课程设计专用纸 No7 沈阳理工大学 7 3.2.3 主菜单主菜

12、单 主窗体，如图 3.3，设计为 MDI 窗体，含有主菜单：数据操作、数据查询、注册 更改。 数据操作菜单包含添加菜单，删除菜单，退出。用于添加删除各种信息。 数据查询包含客户信息菜单，订单信息菜单，退货信息菜单。用于查询各种信息。 注册更改用于密码个更改。 主菜单代码如下： Private Sub dingdanxinxi_Click() Form8.Show End Sub Private Sub kehuxinxi_Click() Form7.Show End Sub Private Sub mimashezhi_Click() Form12.Show End Sub Private S

13、ub shanchudingdan_Click() For10.Show End Sub Private Sub shanchukehu_Click() Form9.Show End Sub Private Sub shanchutuihuo_Click() Form6.Show End Sub Private Sub tuichu_Click() Unload Me End Sub Private Sub tuihuo_Click() Form5.Show End Sub Private Sub tuihuoxinxi_Click() Form11.Show 沈阳理工大学课程设计专用纸 No

14、8 沈阳理工大学 8 End Sub Private Sub yonghu_Click() Form3.Show End Sub 图 3.3 主窗体 3.2.4 添加信息添加信息 添加功能主要用于实现客户信息、订单信息、退货信息的添加。单击“数据操作 添 加（通过对于客户、订单退货的不同选择，实现对不同信息的添加）” 若输入正确，则将输入的信息保存到相对应的表中，并提示“添加成功！” （图 3.4） 。 a）客户添加 代码 Private Sub Command1_Click(Index As Integer) Adodc1.Recordset.Update Adodc1.Recordset.

15、AddNew MsgBox “添加成功！“ End Sub 沈阳理工大学课程设计专用纸 No9 沈阳理工大学 9 Private Sub Command2_Click(Index As Integer) Unload Me b）订单添加（同客户添加） c）退货添加（同客户添加） 图 3.4 添加 3.2.5 删除信息删除信息 删除功能主要用于实现客户信息、订单信息、退货信息的删除。单击“数据操作删 除（通过对于客户、订单退货的不同选择，实现对不同信息的删除）” 选择要删除的条目，点击删除，提示“确定删除当前记录吗？”点击确定，则删除该条 记录（图 3.5） 。 a）客户删除 Private S

16、ub Command1_Click(Index As Integer) x = MsgBox(“确实要删除当前记录吗？“, vbYesNo + vbQuestion, “确认“) If x = vbYes Then Adodc1.Recordset.Delete Adodc1.Recordset.MoveNext If Adodc1.Recordset.EOF Then 沈阳理工大学课程设计专用纸 No10 沈阳理工大学 10 Adodc1.Recordset.MoveLast End If Else Adodc1.Refresh End If End Sub Private Sub Comm

17、and2_Click(Index As Integer) Unload Me End Sub b）订单删除（同客户删除） c）退货删除（同客户删除） 图 3.5 删除 沈阳理工大学课程设计专用纸 No11 沈阳理工大学 11 3.2.6 查询查询 单击“数据库查询”按钮，通过对于客户、订单退货的不同选择，实现对不同信息的查找， ，正确则打开下面的主窗体，如图 3.6。 查找代码如下： Private Sub Command2_Click() Unload Me End Sub Private Sub Command3_Click() Dim str1 As String If Combo1.L

18、ist(1) = Combo1.Text Then str1 = “select * from 客户信息“ str1 = str1 & “ Where 客户信息.客户名称 Like “ & Trim(Text1.Text) & “%“ Adodc1.RecordSource = str1 Adodc1.Refresh ElseIf Combo1.List(0) = Combo1.Text Then str1 = “select * from 客户信息 where 客户编号=“ & Trim(Text1.Text) & “ Adodc1.RecordSource = str1 Adodc1.Re

19、fresh ElseIf Combo1.List(2) = Combo1.Text Then str1 = “select * from 客户信息 where 客户性别=“ & Trim(Text1.Text) & “ Adodc1.RecordSource = str1 Adodc1.Refresh ElseIf Combo1.List(3) = Combo1.Text Then str1 = “select * from 客户信息 where 客户地址=“ & Trim(Text1.Text) & “ Adodc1.RecordSource = str1 Adodc1.Refresh El

20、seIf Combo1.List(4) = Combo1.Text Then str1 = “select * from 客户信息 where 联系方式=“ & Trim(Text1.Text) & “ Adodc1.RecordSource = str1 Adodc1.Refresh End If End Sub (由于订单查询，退货查询原理与客户查询相同，所以不意义列出) 沈阳理工大学课程设计专用纸 No12 沈阳理工大学 12 图 3.6 查询 沈阳理工大学课程设计专用纸 No13 沈阳理工大学 13 3.2.7 注册更改注册更改 将打开“注册更改”对话框，用户设置用户名和密码，如图 3

21、.6，输入完成后点击确 定则设置完成，如图 3.7。 注册更改代码如下： Private Sub Command1_Click() Adodc1.Recordset.Update Adodc1.Recordset.AddNew End Sub 图 3.6 注册更改 沈阳理工大学课程设计专用纸 No14 沈阳理工大学 14 结论结论 本销售管理系统集信息的显示、查询处理为一体，信息维护起来较为方便。一个公司的产品信息 众多，销售情况复杂，对这些数据还要进行管理保存，而且还需要了解公司的生产销售状况，工作量 可想而知。实现系统的自动化将在很大程度上缓解这一状况，对数据的管理、保存变得十分简单。利

22、用次系统，用户可以方便地浏览信息，找到需要的信息。 本系统特点； (1) 采用单一数据库,实现系统运行的可靠性和准确性。 (2) 系统实现了销售过程中的订单、退货、管理。 (3) 系统界面友好、操作性强,满足了客户的需求, 对提高企业的生产经营效率有较大的帮助。 本系统缺点： 结构较为简单，无法实现比较复杂的销售管理（如库存及资金往来账管理等） 参考文献参考文献 1赛奎春，Visual Basic 信息系统开发实例精选，北京：机械工程出版社，2002 年 8 月。 2徐世河，管理信息系统设计教程，北京：电子工业出版社，2003年6月。 3高春艳、李俊民、刘彬彬，Visual Basic 应用开发完全手册，北京：人民邮电出版社， 2006 年 12 月。 4刘韬、骆娟、何旭洪，Visual BASIC数据库系统开发实例导航，北京：人民邮电出版社， 2000年5月。 5武新华、魏平俊、魏经娟，Visual BASIC 管理信息系统开发案例，西安：西安电子科技 大学出版社，2005 年 4 月。 6刘炳文，Visual Basic程序设计教程，北京：清华大学出版社，2005年7月。 7徐国智、汪孝宜等，SQL Server 数据库开发实例精选，北京：电子工业出版社，2006 年 1 月。