仓库即时查询系统毕业论文.doc

仓库即时查询系统目录目录1一、引言2二、系统分析4三、软件开发平台6四、数据分析6五、软件基本功能7六、数据库设计7七、系统总体功能模块9八、程序设计10九、程序设计思想11十、数据库连接技术12十一、源码文件列表12十二、程序详细说明13十三、软件测试14十四、代码设计15十五、结束语42一、引言、项目开发背景：某大型电脑公司，其主要经营网络产品（交换机、路由器等）；在公司经营的产品中，物品型号和规格不一，且价格不一，公司正常营业过程中，公司需要提前制作好每天的即时价格表和库存情况表，供业务员每天上班前领取，以方便公司每天正常的业务开展；在如今经济高速发展，竞争激烈的状况下，每时每刻都在发生着变化，这对公司及时了解最新价格和公司库存信息提出了更高的要求。随着计算机技术的发展和互联网时代的到来，我们已经进入了信息时代，也有人称为数字化时代，在这数字化的时代里，企业的管理和信息沟通都受到了极大的挑战。Internet技术持续迅猛的发展，也给传统的企业管理提出了新的模式。通过设计和建设网络拓扑架构、网络安全系统、数据库基础结构、信息共享与管理、信息的发布与管理，从而方便管理者、企业内员工直接的信息交流和信息共享。以现代计算技术、网络技术为基础的企业化管理主要是朝着信息化、网络化、现代化的目标迈进。作为新型的企业管理模式，它们具有提高工作效率、减少中间环节的特性，可以为新型企业管理模式的建构提供理想的环境。在此开发的仓库即时查询系统，旨在探索一种以互联网为基础的企业管理模式。通过这种新的模式，为企业运作营造一种新的工作环境，使管理突破沟通不及时、沟通不准确的限制，提高工作效率和公司业绩，使企业管理者、职员可以在任何时候、任何地点通过网络掌握公司最新价格和库存情况。基于这些优点，我设计开发了这套“仓库即时查询系统” 。、项目开发的目的：为了适应信息时代发展，提高企业工作效率和运作水平，实现现代化企业的运行机制和高水平的管理，体现IT业高新技术企业自己的特色，使信息化企业建设成为一流企业建设的重要组成部分。用“企业信息化”的整体概念来统一规划、组织和建设企业的办公自动化系统。在这个概念下，统一设计和建设网络拓扑架构、网络安全系统、数据库基础结构、信息共享与管理、信息的发布与管理等。开发后的信息化仓库即时查询系统包括用户部分、用户权限、产品快速查询、产品即时价格、产品即时库存、修改产品即时价格、修改产品即时库存、修改用户密码、安全退出系统几个部分。、项目开发的目标：(1) 升级、改造企业现有的办公自动化程度，完善企业信息化建设，实现办公自动化结构的网络化，进一步提高企业的办公效率、工作水平，朝着信息化、网络化、现代化目标迈进。(2) 建立企业信息化系统，进一步提高运作效益和现代化运作水平。(3) 建立企业信息化仓库即时查询管理系统，为公司内部职员提供方便、快捷的资料信息获取渠道和手段。(4) 仓库即时查询系统，使企业实现信息化、自动化、网络化，提高企业竞争力。(5) 建立Intranet系统，方便企业内部的信息发布、信息交流和信息共享。二、系统分析、系统设计的思想仓库即时查询信息系统的基本设计思想是把企业业务信息即时供内部员工了解，利用ASPACCESS进行编程。此子系统的系统结构如图所示。仓库即时查询系统用户登录产品价格信息产品库存信息产品快速查询产品价格修改产品库存修改用户密码修改安全退出系统、可行性分析：可行性分析也称为可行性研究，是在系统调查的基础上，针对新系统的开发是否具备必要性和可能性，对新系统的开发从技术、经济、社会的方面进行分析和研究，以避免投资失误，保证新系统的开发成功。可行性研究的目的就是用最小的代价在尽可能短的时间内确定问题是否能够解决。该系统的可行性分析包括以下几个方面的内容。(1) 经济可行性：主要是对项目的经济效益进行评价，本系统开发经费对于本单位在经济上是可以接受的，并且本系统实施后可以显著提高工作效率，有助于学院完全实现信息化管理。所以本系统在经济上是可行的。(2) 技术上的可行性：技术上的可行性分析主要分析技术条件能否顺利完成开发工作，硬、软件能否满足开发者的需要等。该管理系统采用了当前新兴的Browser/Server模式进行开发。三层的Browser/Server体系结构具有许多传统Client/Server体系结构不具备的优点，而且又紧密的结合了Internet/Intranet技术，是技术发展的大势所趋，它把应用系统带入了一个崭新的发展时代。数据库服务器选用MICROSOFT的ACCESS数据库，它能够处理大量数据，同时保持数据的完整性并提供许多高级管理功能。它的灵活性、安全性和易用性为数据库编程提供了良好的条件。因此，系统的软件开发平台已成熟可行。硬件方面，科技飞速发展的今天，硬件更新的速度越来越快，容量越来越大，可靠性越来越高，价格越来越低，其硬件平台完全能满足此系统的需要。(3) 时机可行性：目前，企业内部局域网络早已经假设好，从而满足企业内各职能部门，各直属职员连网需求。企业良好的网络设施为本系统开发企业信息化的系统提供了坚实的基础。(4) 管理上的可行性：主要是管理人员是否支持，现有的管理制度和方法是否科学，规章制度是否齐全，原始数据是否正确等。规章制度和管理方法为系统的建设提供了制度保障。综上所述，此系统开发目标已明确，在技术和经济等方面都可行，并且投入少、见效快。因此系统的开发是完全可行的。三、软件开发平台软件平台：IIS+ASP+ACCESS开发语言：ASP数 据 库：ACCESS服 务 器：WINDOWS 2000 SERVER或更高版本网络结构：公司提供一台服务器并接入公司局域网，用以放置ASP系统代码和ACCESS数据库，专人负责维护，以保证数据的有效性，公司所有业务员每人分发一个用户名和密码，并通过IE浏览器登录查询系统安全保障：用户权限分四个级别，分别为：系统管理员、系统管理员拥有所有权限；业务总监和仓库管理员可以入库和修改库存情况；普通员工可以查询每天的产品价格和库存情况。四、数据分析在仓库即时查询系统中，主要是产品价格、产品库存查询输入的数据信息，并且以适当的方式输出给用户。数据类型决定了处理的方式也就是算法，因此，数据是系统实现分析的起点。在本文中使用数据流图来分析数据的流动和处理。因为对每一种对象的管理都比较类似，在此仅以产品查询为例，来分析一下本系统中的数据流向。首先，对普通职员来说，本系统接受职业的查询请求，经过对查询请求的分析得到用户的需要。然后把该需要转化为结构化查询语言SQL语句，送入数据库系统中。数据库根据SQL语句，查询出结果，送回本系统。系统接收到数据库返回的查询结果集，经过一定的分析处理，转化为ASP页面，返回给客户端浏览器。其次，对管理员用户来说，本系统除了完成普通职员的查询请求之外，还接收管理员用户的数据修改请求。经过对数据修改请求的检查，确定该请求是获得权限的管理员用户发出，即为有效请求之后。对该请求进行分析，得到请求的具体内容。然后转化为结构化查询语言SQL语句，送入数据库系统，更新数据库信息。五、软件基本功能、系统登录、产品价格及库存信息表、产品查询、修改用户登录密码、添加产品、修改产品库存信息及价格、删除产品、退出系统六、数据库设计、数据库的物理结构：表名：ck字段名数据类型备注Id自动编号主键Prod_name文本产品名称Prod_num数字产品数量Prod_price数字产品单价Prod_com文本供货厂家Add_date日期/时间入库日期Update_time日期/时间最后更新日期表名：user_info字段名数据类型备注Id自动编号主键Username文本用户名Password文本密码Department文本部门Job文本岗位Level数字权限级别date日期/时间创建日期七、系统总体功能模块以下是系统功能模块图：仓库即时查询系统用户登录产品价格信息产品库存信息产品快速查询产品价格修改产品库存修改用户密码修改安全退出系统、用户登录模块由于不同的登录用户有不同的权限，所以用户在进行登录操作时，系统会自动根据用户成功登录的用户信息验证该用户的相应权限，并进入相应权限页面，开放相应权限菜单功能项。登录时用的用户名和密码是按管理员的不同权限事先分配好的，登录后即可进行相应操作。、产品价格信息和库存信息用户登录后，均可看到每页十个产品的信息，点击“上一页”和“下一页”可浏览所有产品信息。、产品快速查询当然，有些时候用户想在上千或上万的产品资料中，迅速找到某一产品信息，所以我提供了产品搜索功能，以方便用户快速浏览到自己要查询的产品信息。、产品价格修改和库存信息修改当某产品的价格或库存量发生变化时，公司需要通知各部门的业务员，在实际操作中，需要浪费大量的时间和人力物力，并且还有通知不及时的情况。通过这个功能修改价格和库存信息后，无需一个一个去通知，业务员可在第一时间收到这一信息的改变，大大提高工作效率。、密码修改为了方便系统的安全性，也同样方便用户能够用自己易记的密码登录系统，特设计此功能。、退出系统当用户在公共场所或其它人的电脑上登录过系统后，往往直接关闭浏览器便离开计算机，这样留下了严重的安全隐患；因为用户登录的COOKIES没有清除，这时其它用户可以无需密码登录，即可进入系统，形成非法登录。八、数据库连接技术本系统在数据库连接方面，使用了数据库ADO技术。首先，在程序中建立一个CONN.INC的文件，里面用来放置数据库连接代码，在代码中先定义conn和connstr变量，conn用来创建数据连接对象，connstr用来存放连接字符串，使用ado中connection对象的open方法就可以连接ACCESS数据库了。具体在程序中引用需要以下代码：dim conn,connstrset conn=server.createobject("adodb.connection")'创建连接对象connstr="Provider=Microsoft.jet.oledb.4.0;Data source="&server.mappath("data/db.mdb")conn.open connstr'开始连接这样，在数据库连接的方面，运用数据库ADO连接技术能获取比较大的效率。九、源码文件列表DATA文件夹：用于存放数据库文件IMAGE文件夹：用于存放设计时用到的图片index.asp：用户登录页面Ck_sys.asp：普通用户登录后进入的页面Ck_sys_admin.asp：管理级用户登录后进入的页面Conn.inc：数据库连接代码页，方便代码重复使用Edit_password.asp：用户密码修改页面Search.asp：普通用户查询页面，对查询结果不可编辑Search_admin.asp：管理级用户查询页面，对查询结果可编辑Logout.asp：安全退出页面，清除用户COOKIES信息十、程序详细说明Db.mdb：创建两个表，两个表的相关字段如下：表名：ck字段名数据类型备注Id自动编号主键Prod_name文本产品名称Prod_num数字产品数量Prod_price数字产品单价Prod_com文本供货厂家Add_date日期/时间入库日期Update_time日期/时间最后更新日期表名：user_info字段名数据类型备注Id自动编号主键Username文本用户名Password文本密码Department文本部门Job文本岗位Level数字权限级别date日期/时间创建日期Index.asp：用户登录页面，供用户登录使用；当用户输入正确的用户名和密码后，系统将自动识别其权限级别，并进入到相应的页面。操作说明：在用户名后的文本框中输入您的用户名，在密码后的文本框中输入您正确的密码，然后点击“登录系统”按钮（或输入完后，直接回车）。Conn.inc：为系统创建数据库连接的代码页面，因为系统要频繁地连接数据库，为了方便特写成一个包含文件，供程序调用。操作说明：在需要使用的页面中使用代码：<!-#include file="conn.inc"->Ck_sys.asp：普通用户登录后，可看到的系统页面；该页面提供了公司所有产品的即时价格和库存数量；上方有产品搜索栏，可供用户快速查询到相应的产品信息。操作说明：主要分三个部分，即登录信息、产品搜索、产品信息；产品搜索操作：在“请输入产品关键字”后的文本框中输入您要查询的产品型号，再点击“搜索”按钮即可。Ck_sys_admin.asp：管理用户登录后，可看到的系统页面；该页面提供了除普通用户拥有的功能外，还可供修改即时的产品价格和库存，为普通用户提供即时而准确的信息资料。操作说明：主要分四个部分，即登录信息、库存信息管理、产品搜索、产品信息；添加库存信息：点击“添加库存信息”，页面中会出现供用户“添加库存信息”的表单，输入相应信息后，点击添加按钮。产品搜索操作：在“请输入产品关键字”后的文本框中输入您要查询的产品型号，再点击“搜索”按钮即可；如果是管理级别登录，则可以对搜索结果中的产品进行修改和删除；方法是：在搜索结果中，点击相应产品信息后面的“编辑”图标，则会在页面中出现“编辑库存信息”的表单，更改后，点击“修改”按钮；如果想删除该产品的记录，或某产品在库存中已无存货，则直接点击相应产品后的“删除”图标，即可。Edit_password.asp：供系统中所有用户更改其密码的页面。操作说明：点击“修改登录密码”,将弹出“更改用户密码”页面，在页面对话框中输入两遍一样的密码，再点击“更改密码按钮”，如果修改成功，系统会给出“密码修改成功！”的提示，此时用户如果退出系统，即可用新的密码登录，旧密码将不能登录。Search.asp：普通用户查询页面，对查询结果不可编辑操作说明：查询结果显示页面，仅供查看。Search_admin.asp：管理级用户查询页面，对查询结果可编辑操作说明：查询结果显示页面，仅供查看。（相关其它操作参照Ck_sys_admin.asp中的“产品搜索操作”）Logout.asp：安全退出页面，清除用户COOKIES信息操作说明：点击“退出系统”，即清除当前用户登录时的COOKIES信息。十四、代码设计部分功能函数说明：、验证用户登录代码说明<%sub chk_sub '定义验证过程if trim(request.form("username")="" then'判断是否输入了空的用户名%><p class="button"> <script>alert("请输入用户名！");</script> <%elseif trim(request.form("password")="" then'判断是否输入了空的密码%> <script>alert("请输入密码！");</script> <%elsedim rs,sql'定义记录集对象和SQL语句字符串set rs=server.createobject("adodb.recordset")sql="select * from user_info where username='"&trim(request.form("username")&"' and password='"&request.form("password")&"'"rs.open sql,conn,1,1'打开记录集if rs.eof and rs.bof then%> <script>alert("用户名或密码不正确！");</script> <%elseif not rs.eof and not rs.bof thenif rs("level")="1" or rs("level")="2" or rs("level")="3" then'判断登录用户的级别response.cookies("admin")=trim(request.form("username")'创建用户COOKIES信息response.cookies("userid")=rs("id")response.redirect("ck_sys_admin.asp")'登录成功，转入管理用户页面elseresponse.cookies("user")=trim(request.form("username")'创建用户COOKIES信息response.cookies("userid")=rs("id")response.redirect("ck_sys.asp")'登录成功，转入普通用户页面end ifend ifend ifend sub%>、分页代码说明<%dim rs,sqlset rs=server.createobject("adodb.recordset")'创建记录集对象sql="select * from table"'选取仓库表中的所有记录，按降序排序rs.open sql,conn,1,1'分页代码部分dim total_record,currentpageconst MaxPerpage=10'每页显示最大记录条数total_record=rs.recordcount'将总记录条数赋给变量total_recordcurrentpage=request("page")'获取当前页面的页码if currentpage<1 thencurrentpage=1end ifif currentpage=1 then'如果当前是第一页则显示前面的记录show_content'调用过程，以显示表单show_page total_record,Maxperpage'调用过程，以显示翻页菜单elsers.move (currentpage-1)*Maxperpage'把记录集移动到每页的开始dim bookmarkbookmark=rs.bookmark'获取当前记录读取位置show_contentshow_page total_record,Maxperpage'调用过程，以显示翻页菜单end if%><%sub show_content'定义显示产品信息的表格框过程dim I'定义记数器变量ii=0'初始化记数器do while not rs.eof'如果不是最后一条记录则继续''''''''''''''''''''''要显示的内容i=i+1'记数器和显示记录条数同步if i>=Maxperpage then exit do'如果超出每页最大显示条数则退出SUBrs.movenext'移动到下一条记录loop'循环%><%end sub%><%sub show_page(total_record,Maxperpage)'翻页菜单过程定义 dim file_url'本页文件名 file_url="ck_sys.asp"'方便后面使用 dim total_page'定义总页数变量 if total_record mod Maxperpage=0 then'计算总共的页数 total_page=total_record Maxperpageelsetotal_page=total_record Maxperpage+1end if%><p></p><table width="439" height="36" border="0" align="center" class="12"> <tr> <td width="141"><table width="141" border="0" cellspacing="1" class="12"> <tr> <td class="12"> <%if currentpage<2 then%> 第一页 <%else%> <a href='<%=file_url%>?id=<%=id%>&page=1' class="link"><font color="#FF0000">第一页</font></a> <%end if%> </td> <td> <%if currentpage<2 then%> <span class="12">上一页 <%else%> <a href='<%=file_url%>?id=<%=id%>&page=<%=currentpage-1%>'><font color="#FF0000">上一页</font></a></span></td> <%end if%> </tr> </table></td> <td width="125"><div align="justify"><font color="#FF0000"> <span class="12">共</span></font><span class="12"><%=total_record%><font color="#FF0000">条</font> <font color="#FF0000">共分</font><%=total_page%><font color="#FF0000">页</font></span></div></td> <td width="159"><table width="159" border="0" cellpadding="0" cellspacing="1" class="12"> <tr> <td width="73"> <%if total_page-currentpage<1 then%> <span class="12">下一页 <%else%> <a href='<%=file_url%>?id=<%=id%>&page=<%=currentpage+1%>' class="12"><font color="#FF0000">下一页</font></a> <%end if%> </span></td> <td width="59"> <%if total_page-currentpage<1 then%> <span class="12"> 最后一页 <%else%> <a href='<%=file_url%>?id=<%=id%>&page=<%=total_page%>' class="12"><font color="#FF0000">最后一页</font></a> <%end if%> </span></td> </tr> </table></td> </tr></table><%end sub%>Index.asp源码：<!-#include file="conn.inc"-><%if request("action")="chk" then '判断用户是否提交登录信息call chk_sub '调用验证过程end if%><title>赛格网络即时库存信息！</title><link href="css.css" rel="stylesheet" type="text/css"> <form name="form1" method="post" action="index.asp?action=chk"> <table width="262" height="113" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#333333"> <tr bgcolor="#FFFFFF" class="12"> <td colspan="2"><div align="center"><font color="#006600" size="3"><strong>赛格网络</strong></font></div></td> </tr> <tr bgcolor="#FFFFFF" class="12"> <td width="27%" height="25"><div align="center">用户名：</div></td> <td width="73%" height="25"> <div align="left"> <input name="username" type="text" class="txt" id="username" size="20"> </div></td> </tr> <tr bgcolor="#FFFFFF" class="12"> <td height="25"><div align="center">密码：</div></td> <td height="25"> <div align="left"> <input name="password" type="password" class="txt" id="password" size="20"> </div></td> </tr> <tr bgcolor="#FFFFFF" class="12"> <td height="30" colspan="2"><div align="center"> <input name="Submit" type="submit" class="button" value="登陆系统"> </div></td> </tr> </table></form><%sub chk_sub '定义验证过程if trim(request.form("username")="" then'判断是否输入了空的用户名%><p class="button"> <script>alert("请输入用户名！");</script> <%elseif trim(request.form("password")="" then'判断是否输入了空的密码%> <script>alert("请输入密码！");</script> <%elsedim rs,sql'定义记录集对象和SQL语句字符串set rs=server.createobject("adodb.recordset")sql="select * from user_info where username='"&trim(request.form("username")&"' and password='"&request.form("password")&"'"rs.open sql,conn,1,1'打开记录集if rs.eof and rs.bof then%> <script>alert("用户名或密码不正确！");</script> <%elseif not rs.eof and not rs.bof thenif rs("level")="1" or rs("level")="2" or rs("level")="3" then'判断登录用户的级别response.cookies("admin")=trim(request.form("username")'创建用户COOKIES信息response.cookies("userid")=rs("id")response.redirect("ck_sys_admin.asp")'登录成功，转入管理用户页面elseresponse.cookies("user")=trim(request.form("username")'创建用户COOKIES信息response.cookies("userid")=rs("id")response.redirect("ck_sys.asp")'登录成功，转入普通用户页面end ifend ifend ifend sub%></p>Conn.inc源码：<%dim conn,connstrset conn=server.createobject("adodb.connection")'创建连接对象connstr="Provider=Microsoft.jet.oledb.4.0;Data source="&server.mappath("data/db.mdb")conn.open connstr'开始连接%>Ck_sys.asp源码<!-#include file="conn.inc"-><%if request.cookies("user")="" then'判断是否正常登录，如果没有正常登录则退回登录页面response.redirect("index.asp")'如果非法登录退回到登录页面end ifdim rs1,sql1set rs1=server.createobject("adodb.recordset")'创建记录集对象sql1="select * from user_info where username='"&request.cookies("user")&"'"'查询登录用户信息SQL语句rs1.open sql1,conn,1,1'打开查询%><html><head><title>赛格网络普通用户</title><meta http-equiv="Content-Type" content="text/html; charset=gb2312"><link href="css.css" rel="stylesheet" type="text/css"></head><body><br><table width="760" height="30" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#006600"> <tr> <td bgcolor="#FFFFFF" class="12"> &gt;&gt;&gt;欢迎 <font color="#006600"><%=rs1("username")%></font> 登陆，部门：<font color="#006600"><%=rs1("department")%></font>职务：<font color="#006600"><%=rs1("job")%></font><a href="#" onclick="javascript:window.open('edit_password.asp','','width=450,height=150,top=300,left=300,scrollbars=yes')">修改登陆密码</a><a href="logout.asp">退出系统</a></td> </tr></table><form name="form1" method="post" action="search.asp"> <table width="461" height="30" border="0" align="center" cellpadding