企业进销存管理系统

1、石家庄学院课程设计报告课程名称：_数据库原理与应用_企业进销存管理系统设计题目：计算机系院 系：计算机科学与技术 专 业：班 班 级：设计者:及学号:指导教师:21月1日010小组分工情况:张凯亮：基础信息模块乔学云：采购管理模块往来管理模块刘彩彦：库存管理模块系统设置模块张晶晶：商品销售模块张翠：查询统计模块1系统分析1.1需求分析通过调查，要求系统需要具有以下功能：由于操作人员的计算机知识普遍较差，要求有良好的人机界面。由于该系统的使用对象多，要求有较好的权限管理。方便的数据查询，支持多条件查询。基础信息管理与查询（包括商品信息、客户信息、供应商信息）。通过计算机，能够直接“透视”仓库存储

2、情况。完善的商品采购信息、商品销售信息进行管理。方便、健全的结账功能。图表分析年销售状况。商品销售排行统计。当外界环境（停电、网络病毒）干扰本系统时，系统可以自动保护原始数据的安全 数据计算自动完成，尽量减少人工干预。系统退出。1.2可行性分析通过计算机网络系统对企业进行全面的管理，满足了企业的现代化管理的要求。经济性企业营运过程中信息的系统化管理，权威的数据统计，为企业的经营决策提供了 大量的、权威的科学依据（数据）；强大的账单结功能，简化了员工的日常工作，提 高了工作效率，避免了人工管理过程中数据易错所带来的一系列的连锁反映，提高企业的经济效益。技术性实际情况下，在高系统配置、高网络带宽服

3、务，各个级别管理员很容易通过网站 对其操作范围内的系统内容信息进行操作管理，完全满足日常经营、管理的要求。2总体设计2.1项目规划企业进销存管理系统是一个典型的数据库开发应用程序， 由基础信息模块、采购 管理模块、库存管理模块、商品销售模块、查询统计模块、往来管理模块、系统设置 模块等部分组成，规划系统功能模块如下：基础信息模块该模块主要管理商品信息录入、客户信息录入、供应商信息录入、商品信息查询、 客户信息查询、供应商信息查询。采购管理模块该模块的主要管理商品采购信息录入和商品采购信息查询。库存管理模块该块主要管理商品入库信息、商品入库退货、商品库存查询和库存商品价格调整。商品销售模块该模块

4、主要管理商品销售信息录入和商品销售退货信息录入。查询统计模块该模块主要管理销售信息查询、销售退货查询、商品入库查询、入库退货查询、 商品销售排行和年销售额分析。往来管理模块该模块主要管理商品销售结账、入库退货结账、销售结账查询、商品入库结账、 销售退货结账和入库结账查询。系统设置模块该模块主要管理添加操作员、更改操作员密码、删除操作员。2.2系统功能结构图企业进销存管理系统功能结构如图1所示。图1系统功能结构图3系统设计3.1设计目标本系统是针对中小型企业运营进销存过程所进行设计的，主要实现如下目标：系统采用人机对话方式，界面美观友好、信息查询灵活、方便、快捷、准确、数据存储安全可靠。强大的销

5、售结账功能。全面的账单查询功能。功能强大的年销售额分析图、商品销售排行统计。实现各种查询，如多条件查询、模糊查询等。操作员可以随时修改自己的口令。对用户输入的数据，系统进行严格的数据检验，尽可能排除人为的错误数据保密性强，为每个用户设置权限级别。系统最大限度地实现了易安装性、易维护性和易操作性。系统运行稳定、安全可靠3.2开发及运行环境硬件平台：CPU:P41.8GHZ。内存：256MB以上。软件平台：操作系统：Windows XP/ Windows 2000。数据库：SQL Server 20003.3编码设计编码设计是数据库系统开发的前提条件，是系统不可缺少的重要内容。编码是指与原来名称对

6、应的编号、符号或记号。它是进行信息交换、处理、传输和实现信息资 源共享的关键。编码也用于指定数据的处理方法、区别数据类型，并指定计算机处理 的内容等。本系统内部信息编码采用了统一的编码方式情况。（1）采购编号为字母“eg”入库单据编号为字母“RK”、系统当前日期和3位数字编号的组合。例如,（3）入库退货单据编号为字母“RT”、系统当前日期和3位数字编号的组合。例 如，0（4）销售单据编号为字母“XS”、系统当前日期和3位数字编号的组合。例如，。3.4逻辑结构设计本系统数据库采用SQL Server 2000数据库，系统数据库名称为sell。数据库sell中包含24张表。1数据表概要说明为了对本

7、系统后台的数据库中数据表有一个更清晰的认识，下面设计了一个数据表树型结构图（如图2所示），该数据表树型结构图包含系统所有数据表。图2数据表树型结构图2数据表的结构关于数据库中的数据表请参见附录B4网站总体架构1模块功能介绍网站首页主要包括以下功能模块：基础信息：实现对客户、商品、供应商基础信息的管理及信息检索功能。主要包括客户信息管理、商品信息管理、供应商信息管理、客户信息查询、商品信息查询和供应商信息查询6部分。采购管理：实现对商品采购信息进行管理及采购信息检索功能。主要包括商品米购和米购查询两部分。库存管理：实现对商品入库、退货、库存查询及价格调整等信息的综合管理。主要包括商品入库、商品入

8、库退货、库存查询和价格调整4部分。商品销售：实现对商品销售信息及退货信息进行管理的功能。主要包括商品销售和商品销售退货两部分。查询统计：实现对进、销商品信息的查询汇总，并实现按销售商品进行排行和对年销售额进行分析等功能。 主要包括销售信息查询、销售退货查询、商品入库查询、入库退货查询、商品销售排行和年销售额分析6部分。往来管理：实现在线的个人与企业、企业与企业之间的进、销商品往来结账的综合管理。主要包括商品销售结账、入库退货结账、销售结账查询、商品入库结账、销售退货结账和入库结账查询6部分。系统设置：实现对操作员信息进行维护。主要包括添加操作员、更改操作员密码和删除操作员3部分。2首页运行结果

9、企业进销存管理系统网站首页的运行结果如图3所示。图3网站首页的运行结果表1首页解析区域名称说明对应文件1网站主导航区主要用于显示网站的旗帜广告条及为用户提供网站的功能导航Top.asp2网站子导航区主要用于管理功能导航Top.asp3功能操作区主要用于完成各种管理功能Main .asp4退出登录主要用于退出企业进销存管理系统Main .asp5用户登录模块设计用户登录页面比较简单，为防止用户的错误操作，应设置错误处理页面。在登录操作中，一般发生的错误有：用户输入了错误的用户名或密码；或用户直接单击了【登录】按钮。对上述情况的判断，我们就要通过ASP文件来实现。用户登录页面的设计效果如图4所示。

10、表1首页解析图4用户登录页面的设计效果用户登录页面中涉及的HTML表单元素如表2所示表2用户登录页面中涉及的HTML表单元素名称类型含义重要属性myformform表单action=checklogi n. asp method=postuser nametext用户名id=user name2PWDpassword密码style=fon t-family:Wi ngd in gs;width:129;on copy=retur n false on cut=retur n false onpaste=retur n falseSubmit3butt on【确定】按钮on Click=chec

11、k(myform)reset1reset【取消】按钮class=btn_grey value=取消利用JavaScript编写检测用户输入信息是否合法的函数，并通过单击【确定】按钮调用该函数，判断用户名或密码是否为空，如果为空，系统将给予提示。当用户输 入合法信息后，提交该表单，完整代码如下：vscript la nguage=javascriptfun ctio n check(myform)/判断用户名是否为空，并弹出提示对话框alert(请输入用户名)/判断密码是否为空，并弹出提示对话框myform.submit();在登录页面时，当用户提交了登录资料后，就由表单action属性指定的A

12、SP文件 在服务器端对这些资料进行验证。它的工作主要是判断用户的登录的用户名和密码是 否正确。完成这些工作，就必须从连接储存用户数据库中取出相关的信息记录。如果 记录验证无误，就通过ASP的Response寸象的redirect方法，将用户登录的页面传到 客户端的浏览器上；如果用户输入了错误的用户名或密码，就通过ASP的Response对象的Write方法弹出错误提示。在开始编写程序之前，首先使用Session来存储用户的相关信息，并与客户端保持联系。本页使用session(ulogin以存储在数据库中的标识符作为信息记载，并以判 断这个值是否为空来判断用户是否登录。表单提交到处理页后会验证用

13、户登录的身份，完整代码如下:在理解了Session的基础上，我们知道上述代码首先是把存储用户信息并与客户 端保持关联的Session(ulogin初始化，赋予空值。在接收数据库后，打开数据库，取 出标识符，把它赋给Session(ulogin)如果不存在该用户，则弹出错误提示，并跳回 到登录页面。用户登录页面的运行结果如图5所示。图5用户登录页面的运行结果6网站首页设计网站首页采用框架技术将菜单导航区和主体控制区分装在两个框架里，以便在同一个页面中管理多个页。菜单导航区顾名思义，主要用于实现网站首页管理功能的导 航；主体控制区主要用于显示每个管理模块的内容。网站首页主要包括以下功能模块:菜单主

14、导航区：主要用于显示网站的旗帜广告条及为用户提供网站的功能导航。菜单子导航区：主要用于管理功能导航。主体操作区：主要用于完成各种管理功能。退出登录：主要用于退出企业进销存管理系统。菜单主导航区的完整代码如下：企业进销存管理系统vmeta http-equiv=C onten t-Type con te nt=text/html; charset=gb2312vframeset rows=99,* cols=* framespaci ng=0 frameborder=no border=0vframe src=Top.asp frameborder=no scrolli ng=novframe

15、src=ma in. asp n ame=ma inF scrolli ng=autov/framesetv/body 菜单子导航区的关键代码如下：yes the n重新定向页面resp on se.E nd()end if%基础信息|采购管理|库存管理|商品销售|查询统计|往来管理|系统设置vscript Ian guage=JavaScript var today=new Date();var mon th=today.getM on th()+1if (today.getDay()=1)判断是否登录document.write(” +today.getYear()+年+

16、month+月+today.getDate()+日星期一);if (today.getDay()=2)document.write(” +today.getYear()+年+month+月+today.getDate()+日星期二);if (today.getDay()=3)document.write(” +today.getYear()+年+month+月+today.getDate()+日星期三);if (today.getDay()=4)document.write(” +today.getYear()+年+month+月+toda

17、y.getDate()+日星期四);if (today.getDay()=5)document.write(” +today.getYear()+年+month+月+today.getDate()+日星期五);if (today.getDay()=6)document.write(” +today.getYear()+年+month+月+today.getDate()+日星期六);if (today.getDay()=0)document.write(” +today.getYear()+年+month+月+today.getDate()+

18、日星期日);fun ctio n Fsubme nu( value)switch (value)case基础:subme nu.i nn erHTML=客户信息管理|商品信息管理|K应商信息管理|客户信息查询|商品信息 查询|供应商信息查询;break;case采购:/类型为米购时，进入相应的处理页面subme nu.i nn erHTML= 品采购|采购查询;break;case库存:/类型为库存时，进入相应的处理页面subme nu.i nn erHTML=商品入库|商品入库退货|库存查询|价格调整;break;case销售：/类型为销售时，进入相应的处理页面subme nu.i nn e

19、rHTML=a href=spxs/spxs.asp target=mai nF商品销售|商品销售退货|;break;case查询:/类型为查询时，进入相应的处理页面subme nu.i nn erHTML=销售信 息查询|销售退货查询|商品入库查询|入库退货查询|商品销售排 行|年销售额分析;case往来:/类型为往来时，进入相应的处理页面break;subme nu.i nn erHTML=商品销售结账|入库退货结账|ahref=wlgl/ysgl/xsjzindex.asp target=mainF%肖售结账查询|商品入库结账|销售退货结账|入库 结账查询;break;case系统:/类

20、型为系统时，进入相应的处理页面submenu.innerHTML=a href=xtsz/addczy.asp target=mainF：#加操作员|更改操作员密码|删除操作员;break;退出导航区的完整代码如下:7基础信息主要功能模块详细设计7.1商品信息管理设计用户可以通过单击菜单主导航“基础信息”/“商品信息管理”超链接，进入商品信息管理页面。该页面主要完成商品信息的添加。商品信息管理页面设计效果如图6所示。图6商品信息管理页面设计效果商品信息管理页面中涉及的HTML表单元素如表3所示。表3商品信息管理页面中涉及的HTML表单元素名称类型含义重要属性formlform表单action=

21、checksp in fo.asp method=postselselect供应商全称opti onvalue=memotext备注on keyup=if (eve nt.keyCode=13)se nd()subbbutt on【保存信息】按钮on click=se nd()Resreset【清除重写】按钮on click=res()利用JavaScrip编写检测用户输入信息是否合法的函数，并通过单击【保存信息】 按钮调用该函数，当用户输入合法信息后，提交该表单。关键代码如下：商品信息添加时的数据处理页主要是将用户提交的表单信息保存到数据库中, 据处理页的程序代码如下：alert(商品信息添

22、加成功！);/弹出对话框wi ndow .lo cati on .href=spi nfo.asp;v/script商品信息管理页面的运行结果如图7所示。图7商品信息管理页面的运行结果/重新定向指定页面7.2商品信息查询设计用户可以通过单击菜单主导航“基础信息”/“商品信息查询”超链接，进入商品信息查询页面。该页面主要完成商品信息的检索。商品信息查询页面设计效果如图8所示。图8商品信息查询页面设计效果商品信息查询页面中涉及的HTML表单元素如表4所示。表4商品信息查询页面中涉及的HTML表单元素名称类型含义重要属性myform form表单action=checksp in dex.aspme

23、thod=posttarget=ma inFselselect选择查询字段W品名称规格tselselect选择条件运算符等于LIKEqn ametext输入查询关键字id=qn ame on keyup=ti()Submitbutt on【查询】按钮on click=se nd()butbutt on【显示全部数据】按钮id=but on click=list()用户可以在商品信息查询页面中的查询部分， 输入一定的条件进行商品信息的查询。利用JavaScript编写检测用户输入信息是否为空的函数，并通过单击【查询】按钮调用该函数，当用户输入合法信息后，提交该表单。关键代码如下：function

24、 sen d()myform.submit()v/script应用JavaScript态向select中添加一个新的选项“all”，并将该选项设置为被选 择的项，通过单击【显示全部数据】按钮调用该函数。关键代码如下：fun ctio n list()myform.submit()商品信息展示页面检索数据库的程序代码如下：%path=request.servervariables(pathn fo)set conn=server.createobject(adodb.c onnection)set rs=server.createobject(adodb.recordset) conn, ope

25、 napplicati on (ds n)打开数据库if request(tptsel) thentj=request(tptsel)ln ame=request(q name)jn ame=request(sel)sessi on (tj)=tjsessio n(l name)=l namesessio n(jn ame)=j nameend if查询if sessio n(tj)=二the n精确查询sql=select * from tab_sp info where创建数据库对象创建记录集对象&session(jname)&=&session(lname)&am

26、p;page=c ln g(request(page)获取当前页码end ifif sessio n( tj)=like the n模糊查询sql=select * from tab_sp info where &sessio n(jn ame)& like %&sessio n(lname)&%”end ifif session(tj)=all then查询全部 .sql=select * from tab_sp infoend ifrs.ope n sql,c onn ,1,3%分页显示查询结果的代码如下：%分页rs.pagesize=5每页显示的记录数if

27、 pagers.pageco unt the n page=rs.pageco untshow rs,page分页子程序开始sub show(rs,page)rs.absolutepage=page将记录指针定位至U指定页for i=1 to rs.pagesizers.move nextif rs.eof then exit for如果到记录尾结束循环n extend sub%使用如下代码来为其他页面添加超链接：vform acti on=checksp in dex.asp method=postvdiv alig n=ce nter% if page1 the n%vfont size=

28、2 ?page=1第一页v/font?page=v%=(page-1)% 上一页%e nd ifif pagers.pageco unt the n%a href=?page=下一页a href=?page=最后一页vfont color=#336699输入页次页次v/font/ 返回 商品信息查询页面的运行结果如图9、图10所示图9商品信息查询条件页面运行结果图10商品信息查询结果页面运行结果8采购管理主要功能模块详细设计采购管理可以有效管理整个企业的采购业务，用以提高采购经营事务的效率，提高企业的经济效益，确保采购工作质量高效率、低成本执行，使企业具有最佳的供货状态。主要包括商品采购和采购

29、查询两部分。8.1商品采购管理设计用户可以通过单击菜单主导航“采购管理”/“商品采购”超链接，进入商品采购管理页面。该页面主要完成商品采购信息的添加功能。商品采购管理页面设计效果如图11所示。图11商品米购页面设计效果商品采购页面中涉及的HTML表单重要元素如表5所示表5商品采购页面中涉及的HTML表单重要元素名称类型含义重要属性form1form表单acti on=checkspcg.asp method=postidhidde n采购单号value=v%=sessio n(auto)%cgdatetext采购日期value=v%=date()%butt onbutt on【提交】按钮on

30、click=se nd()Submitreset【重填】按钮class=btn_grey value=重填生成采购单号的相关代码如下:采购信息添加时的数据处理页主要是将用户提交的表单信息保存到数据库中,据处理页的程序代码如下：thencgid=request(id)spn ame=request(sp name)cs=request(cs)gg=request(gg)bz=request(bz)dw=request(dw)dj=request(dj)sl=request(sl)je=request(je)cgdate=request(cgdate)memo=request(memo)dj=cs

31、tr(dj)&元sl=cstr(sl )&dwje=cstr(je)&元 if spn ame= or cs= or gg= or bz= or dw= or dj=0 or sl=0or je=0 the n判断表单元素是否为空%alert(您必须全部填写)/弹出提示对话框history.back(l)/返回上一级页面alert（采购信息保存成功！）;弹出提示对话框重新定向页面商品采购页面的运行结果如图12所示。图12商品采购页面的运行结果8.2采购查询设计采购查询是为采购员提供的对采购信息进行查询的功能，行情况，为企业的采购决策提供依据。以便跟踪采购信息的执用户可以

32、通过单击菜单主导航“采购管理”/“采购查询”超链接，进入采购查询页面。该页面主要完成米购信息的检索采购查询页面设计效果如图13所示。图13采购查询页面设计效果采购查询页面中涉及的HTML表单元素如表6所示表6采购查询页面中涉及的HTML表单元素名称类型含义重要属性myformfrom表单acti on=checkcg in dex.asp method=postflagcheckbox复选框class=no border id=flag value=1 checkedoption value=spname selected品名称seiselect选择查询字段厂商tjselect选择条件运算符等

33、于LIKEqn ametext输入查询关键字id=qn amesubbbutt on【查询】按钮on Click=se nd()flagcheckbox复选框class=n oborder id=flag value=2sdatetext起始日期value=v%=year(date)&-01-01%edatetext截止日期value=v%=date()%butbutt on【显示全部数据】按钮用户可以在采购查询页面中的查询部分，输入一定的查询条件，单击【查询】按 钮后，用户添加查询条件将被提交给本页， 本页则将根据用户提交的表单对数据库进 行检索，并将查询结果集通过信息展示部分输出到

34、浏览器中，数据处理页的程序代码 如下：% set rs=server.createobject(adodb.recordset) if request.QueryString(type)=all the n sql=select * from tab_cgda nelseflag=request.Form(flag)i=0为变量赋初始值if flag thenif in str(flag,1)0 the n理sel=request.Form(sel)tj=request.Form(tj) qname=request.Form(q name)i=1显示全部内容当有一个条件时进行相应的处flag_deal=i nIFend ifsdate=request.Form(sdate)edate=request.Form(edate)i=i+1flag deal=inDate end if if i1thenend ifsessi on (flag)=flag_deal sessi on(se l )=sel sessi on (tj)=tj sessi on(” qn ame)=qn amesessi on (sdate)=sdatese