还剩40页未读,继续阅读
本资源只提供10页预览,全部文档请下载后查看!喜欢就下载吧,查找使用更方便
文本内容:
大学毕业设计 By谢红英仓库即时查询系统目录TOC\o1-3\h\z\u目录1
一、引言2
二、系统分析4
三、软件__平台6
四、数据分析6
五、软件基本功能7
六、数据库设计7
七、系统总体功能模块9
八、程序设计10
九、程序设计思想11
十、数据库连接技术12
十一、源码文件列表12
十二、程序详细说明13
十三、软件测试14
十四、代码设计15
十五、结束语42
一、引言a、项目__背景长沙某大型电脑公司,其主要经营网络产品(交换机、路由器等);在公司经营的产品中,物品型号和规格不一,且__不一,公司正常营业过程中,公司需要提前制作好每天的即时__表和库存情况表,供业务员每天上班前__,以方便公司每天正常的业务开展;在如今经济高速发展,竞争激烈的状况下,每时每刻都在发生着变化,这对公司及时了解最新__和公司库存信息提出了更高的要求随着计算机技术的发展和互联网时代的到来,我们已经进入了信息时代,也有人称为数字化时代,在这数字化的时代里,企业的管理和信息沟通都受到了极大的挑战Internet技术持续迅猛的发展,也给传统的企业管理提出了新的模式通过设计和建设网络拓扑架构、网络安全系统、数据库基础结构、信息共享与管理、信息的发布与管理,从而方便管理者、企业内员工直接的信息交流和信息共享以现代计算技术、网络技术为基础的企业化管理主要是朝着信息化、网络化、现代化的目标迈进作为新型的企业管理模式,它们具有提高工作效率、减少中间环节的特性,可以为新型企业管理模式的建构提供理想的环境在此__的仓库即时查询系统,旨在探索一种以互联网为基础的企业管理模式通过这种新的模式,为企业运作营造一种新的工作环境,使管理突破沟通不及时、沟通不准确的限制,提高工作效率和公司业绩,使企业管理者、职员可以在任何时候、任何地点通过网络掌握公司最新__和库存情况基于这些优点,我设计__了这套“仓库即时查询系统”b、项目__的目的为了适应信息时代发展,提高企业工作效率和运作水平,实现现代化企业的运行机制和高水平的管理,体现IT业高新技术企业自己的特色,使信息化企业建设成为一流企业建设的重要组成部分用“企业信息化”的整体概念来统一规划、__和建设企业的办公自动化系统在这个概念下,统一设计和建设网络拓扑架构、网络安全系统、数据库基础结构、信息共享与管理、信息的发布与管理等__后的信息化仓库即时查询系统包括用户部分、用户权限、产品快速查询、产品即时__、产品即时库存、修改产品即时__、修改产品即时库存、修改用户__、安全退出系统几个部分c、项目__的目标1升级、改造企业现有的办公自动化程度,完善企业信息化建设,实现办公自动化结构的网络化,进一步提高企业的办公效率、工作水平,朝着信息化、网络化、现代化目标迈进2建立企业信息化系统,进一步提高运作效益和现代化运作水平3建立企业信息化仓库即时查询管理系统,为公司内部职员提供方便、快捷的资料信息获取渠道和手段4仓库即时查询系统,使企业实现信息化、自动化、网络化,提高企业竞争力5建立Intranet系统,方便企业内部的信息发布、信息交流和信息共享d、项目提出的意义企业信息化指企业在公司运作和管理及对外__工作中运用网络实现企业运作的数字化、信息化、智能化从设计上说,企业信息化能够提高公司业务人员、管理人员和普通职员进行工作、学习和交流的有效性使用“信息化”技术,可以改善各层面的信息传递与相互了解与Internet集成在一起的信息化管理解决方案将会使管理者与职员更紧密联接成一个综合的运作环境,因而可以更好的提高企业竞争力企业信息化管理的应用软件将在解决企业内部管理与工作时,提供一个最佳实践具体化,并促进最佳的管理与运作的实行框架;连接Internet的企业局域网提供的是更广泛的信息来源,使所有相关人员真正体会到企业信息化技术的崭新面貌e、系统的__方法在本系统的__过程中采用的是当今最流行的IIS+ASP模式,在该模式中,结合了微软的IIS和ASP技术,充分利用了IIS和ASP两种技术原有的优点MicrosoftActiveServerPages即我们所称的ASP,其实是一套微软__的服务器端脚本环境,ASP内含于IIS
3.0和
4.0之中通过ASP我们可以结合HTML网页、ASP指令和ActiveX元件建立动态、交互且高效的WEB服务器应用程序ActiveServerPages独具以下特点
1.使用VBScript、JScript等简单易懂的脚本语言,结合HTML代码,即可快速地完成__的应用程序
2.无须compile编译,容易编写,可在服务器端直接执行
3.使用普通的文本编辑器,如Windows的记事本,即可进行编辑设计
4.与浏览器无关BrowserIndependen__用户端只要使用可执行HTML码的浏览器,即可浏览ActiveServerPages所设计的网页内容ActiveServerPages所使用的脚本语言VBScript、Jscript均在WEB服务器端执行,用户端的浏览器不需要能够执行这些脚本语言
5.ActiveServerPages能与任何ActiveXscripting语言相容除了可使用VBScript或JScript语言来设计外,还通过plug-in的方式,使用由第三方所提供的其他脚本语言,譬如REXX、Perl、Tcl等脚本引擎是处理脚本程序的COMComponentO__ectModel物件
6.ActiveServerPages的源程序,不会被传到客户浏览器,因而可以避免所写的源程序被他人剽窃,也提高了程序的安全性
7.可使用服务器端的脚本来产生客户端的脚本
8.物件导向(O__ect-oriented)
9.ActiveXServerComponentsActiveX服务器元件具有无限可扩充性可以使用VisualBasic、J__a、VisualC++、COBOL等编程语言来编写你所需要的ActiveXServerComponent
二、系统分析a、系统设计的思想仓库即时查询信息系统的基本设计思想是把企业业务信息即时供内部员工了解,利用ASP+AC__SS进行编程此子系统的系统结构如图所示b、可行性分析可行性分析也称为可行性研究,是在系统调查的基础上,针对新系统的__是否具备必要性和可能性,对新系统的__从技术、经济、社会的方面进行分析和研究,以避免投资失误,保证新系统的__成功可行性研究的目的就是用最小的代价在尽可能短的时间内确定问题是否能够解决该系统的可行性分析包括以下几个方面的内容1经济可行性主要是对项目的经济效益进行评价,本系统__经费对于本单位在经济上是可以接受的,并且本系统实施后可以显著提高工作效率,有助于学院完全实现信息化管理所以本系统在经济上是可行的2技术上的可行性技术上的可行性分析主要分析技术条件能否顺利完成__工作,硬、软件能否满足__者的需要等该管理系统采用了当前新兴的Browser/Server模式进行__三层的Browser/Server体系结构具有许多传统Client/Server体系结构不具备的优点,而且又紧密的结合了Internet/Intranet技术,是技术发展的大势所趋,它把应用系统带入了一个崭新的发展时代数据库服务器选用MICROSOFT的AC__SS数据库,它能够处理大量数据,同时保持数据的完整性并提供许多高级管理功能它的灵活性、安全性和易用性为数据库编程提供了良好的条件因此,系统的软件__平台已成熟可行硬件方面,科技飞速发展的今天,硬件更新的速度越来越快,容量越来越大,可靠性越来越高,__越来越低,其硬件平__全能满足此系统的需要3时机可行性目前,企业内部局域网络早已经假设好,从而满足企业内各职能部门,各直属职员连网需求企业良好的网络设施为本系统__企业信息化的系统提供了坚实的基础4管理上的可行性主要是管理人员是否支持,现有的管理制度和方法是否科学,规章制度是否齐全,原始数据是否正确等规章制度和管理方法为系统的建设提供了制度保障综上所述,此系统__目标已明确,在技术和经济等方面都可行,并且投入少、见效快因此系统的__是完全可行的c、需求分析在可行性分析阶段已经粗略的研究了该项目的需求,并分析了__平台及软件的可行性,但为了准确的确定目标系统必须做什么,了解用户的明确需求,在企业相关部门进行了详细的调研,进一步明确了实现系统的功能d、系统的主要技术分析本系统采用了当前最流行的B/S结构(即Browser/Server结构),Browser/Server的系统中,用户可以通过浏览器向分布在网络上的许多服务器发出请求Browser/Server结构极大的简化了客户机的工作,客户机上只需__、配置少量的客户端软件即可,服务器将担负更多的工作,对数据库的访问和应用程序的执行将在服务器上完成在Browser/Server三层体系结构下,表示层Presentation、功能层BusinessLogic、数据层DataServi__被分割成三个相对__的单元第一层--表示层Web浏览器在表示层中包含系统的显示逻辑,位于客户端它的任务是由Web浏览器向网络上的某一Web服务器提出服务请求,Web服务器对用户身份进行验证后用HTTP协议把所需的主页传送给客户端,客户机接受传来的主页文件,并把它显示在Web浏览器上第二层--功能层具有应用程序扩展功能的Web服务器在功能层中包含系统的事务处理逻辑,位于Web服务器端它的任务是接受用户的请求,首先需要执行相应的扩展应用程序与数据库进行连接,通过SQL等方式向数据库服务器提出数据处理申请,而后等数据库服务器将数据处理的结果提交给Web服务器,再由Web服务器传送回客户端第三层--数据层数据库服务器在数据层中包含系统的数据处理逻辑,位于数据库服务器端它的任务是接受Web服务器对数据库操纵的请求,实现对数据库查询、修改、更新等功能,把运行结果提交给Web服务器从上面的分析中可以看出,三层的Browser/Server体系结构是把二层Client/Server结构的事务处理逻辑模块从客户机的任务中分离出来,由单独组成的一层来负担其任务,这样客户机的压力大大减轻了,把负荷均衡地分配给了Web服务器,于是由原来的两层的Client/server结构转变成三层的Browser/Server结构
三、软件__平台软件平台IIS+ASP+AC__SS__语言ASP数据库AC__SS服务器WINDOWS2000SERVER或更高版本网络结构公司提供一台服务器并接入公司局域网,用以放置ASP系统代码和AC__SS数据库,专人负责维护,以保证数据的有效性,公司所有业务员每人分发一个用户名和__,并通过IE浏览器登录查询系统安全保障用户权限分四个级别,分别为系统___、业务总监、仓库___、普通员工;系统___拥有所有权限;业务总监和仓库___可以入库和修改库存情况;普通员工可以查询每天的产品__和库存情况
四、数据分析在仓库即时查询系统中,主要是产品__、产品库存查询输入的数据信息,并且以适当的方式输出给用户数据类型决定了处理的方式也就是算法,因此,数据是系统实现分析的起点在本文中使用数据流图来分析数据的流动和处理因为对每一种对象的管理都比较类似,在此仅以产品查询为例,来分析一下本系统中的数据流向首先,对普通职员来说,本系统接受职业的查询请求,经过对查询请求的分析得到用户的需要然后把该需要转化为结构化查询语言SQL语句,送入数据库系统中数据库根据SQL语句,查询出结果,送回本系统系统接收到数据库返回的查询结果集,经过一定的分析处理,转化为ASP页面,返回给客户端浏览器其次,对___用户来说,本系统除了完成普通职员的查询请求之外,还接收___用户的数据修改请求经过对数据修改请求的检查,确定该请求是获得权限的___用户发出,即为有效请求之后对该请求进行分析,得到请求的具体内容然后转化为结构化查询语言SQL语句,送入数据库系统,更新数据库信息
五、软件基本功能1、系统登录2、产品__及库存信息表3、产品查询4、修改用户登录__5、添加产品6、修改产品库存信息及__7、删除产品8、退出系统
六、数据库设计a、数据库的引入数据库技术从60年代中期至今只有不到40年的历史,但其发展速度之快是其它技术所不及的它已由第一代的层次型、网状型数据库,第二代的关系型数据库发展到今天以面向对象为主要模型的数据库,即第三代数据库数据库技术和网络通信技术、面向对象编程技术、并行计算机技术、人工智能技术相互融合、相互渗透,促进了数据库技术的广泛应用数据库Database,是按照数据结构来__、存储和管理数据的仓库,是用于查询的大量数据的存储区域使用数据库可以带来许多好处如减少了数据的冗余度,从而大大地节省了数据的存储空间,实现数据资源的充分共享等等此外,数据库技术还为用户提供了非常简便的使用手段,使用户易于编写有关数据库应用程序特别是近年来推出的计算机关系数据库管理系统,操作直观,使用灵活,编程方便,功能强大,环境适应广泛,数据处理能力极强数据库的设计是指对一个给定的应用环境,构造数据库模式,建立数据库及其应用系统,满足各种用户需求作为信息资源__、管理和服务的一种有效的手段,数据库技术的应用已越来越广泛,从小型的单项事务处理系统到大型的信息系统大都用先进的数据库技术来保持系统数据的安全性、完整性和共享性对一个实际的系统来说,数据库表的设计在遵循数据库理论的同时,必须能用__工具来实现用户在各方面提出的功能要求一个真正的、完整的站点是离不开数据库的,因为少量的数据,如网页访问人数等完全可以存储在文本文件中,但实际应用中,需要保存的数据远不止这一点点,而且这些数据之间往往还有关联,利用数据库来管理这些数据,可以很方便的查询和更新可以说一个动态__的建设是离不开一个设计最优的数据库的我们现在可以使用的数据库有很多种,如Fox数据库.dbf、Ac__ss数据库.mdb、DB
2、Informix、Oracle和SQLServer等等,在本次设计中,选择了MICROSOFT的AC__SS作为后台数据库工具b、数据库的物理结构表名ck字段名数据类型备注Id自动编号主键Prod_name文本产品名称Prod_num数字产品数量Prod_pri__数字产品单价Prod_com文本供货厂家Add_date日期/时间入库日期Update_time日期/时间最后更新日期表名user_info字段名数据类型备注Id自动编号主键Username文本用户名Password文本__Department文本部门Job文本岗位Level数字权限级别date日期/时间创建日期c、数据库的完整性数据库的完整性是指数据的正确性和相容性数据库管理系统(DBMS)用一定的机制来检查数据库中的数据是否满足规定的条件——完整性约束条件,数据的约束条件是语义的体现,将作为模式的一部分存入数据库中本系统中定义了表与表之间的__有助于实现完整性规则,一般在程序中实现具体的完整性控制d、数据库的安全性数据库的安全性是指保护数据库以防止不合法的使用所造成的数据泄漏、更改或破坏在数据库系统中,大量的数据集中存放,而且为许多用户直接共享,是宝贵的信息资源,系统的安全保护措施就显得更为重要,它保护数据库防止恶意的破坏和非法的存取本系统包括数据库的安全和服务器的安全采用___表示和鉴定的方法实现数据库的安全,此安全管理措施并不在前台__工具中实现,而是在后台数据库中实现在登录数据库时,系统让___户表示自己的身份,不同的___权限不同,系统进行核实,鉴别此___是否为合法用户,若是,系统进一步核实用户,通常要求用户输入口令,系统和对用户口令以鉴别用户身份服务器的安全也是通过用户在登录服务器时输入合法的用户名和__来实现的这是一种简单可行的方法,实现起来比较方便没有采用更加复杂的系统安全管理措施是因为本管理系统是应用在企业内部网中,采用安全管理措施主要是为了防止没有修改权限的用户无意间修改了数据,因此采用用户标识和鉴定的安全管理措施就能够保障数据库的安全性
七、系统总体功能模块以下是系统功能模块图a、用户登录模块由于不同的登录用户有不同的权限,所以用户在进行登录操作时,系统会自动根据用户成功登录的用户信息验证该用户的相应权限,并进入相应权限页面,开放相应权限菜单功能项登录时用的用户名和__是按___的不同权限事先分配好的,登录后即可进行相应操作b、产品__信息和库存信息用户登录后,均可看到每页十个产品的信息,__“上一页”和“下一页”可浏览所有产品信息c、产品快速查询当然,有些时候用户想在上千或上万的产品资料中,迅速找到某一产品信息,所以我提供了产品搜索功能,以方便用户快速浏览到自己要查询的产品信息d、产品__修改和库存信息修改当某产品的__或库存量发生变化时,公司需要通知各部门的业务员,在实际操作中,需要浪费大量的时间和人力物力,并且还有通知不及时的情况通过这个功能修改__和库存信息后,无需一个一个去通知,业务员可在第一时间收到这一信息的改变,大大提高工作效率e、__修改为了方便系统的安全性,也同样方便用户能够用自己易记的__登录系统,特设计此功能f、退出系统当用户在公共场所或其它人的电脑上登录过系统后,往往直接关闭浏览器便离开计算机,这样留下了严重的安全隐患;因为用户登录的COOKIES没有清除,这时其它用户可以无需__登录,即可进入系统,形成非法登录
八、程序设计现在将讨论怎样具体的实现系统中每个模块的功能,也就是系统的详细设计过程详细设计的根本目标是确定应该怎样具体的实现所要求的系统,也就是说,经过这个阶段的设计工作,应该得出对目标系统的描述,从而在编码阶段可以把这个描述直接翻译成用某种程序设计语言书写的程序详细设计阶段的任务在于要设计出程序的“蓝图”,因此,详细设计的结果基本上决定了最终的程序代码的质量详细设计的目标不仅仅是逻辑上正确地实现每个模块的功能,更重要的是设计出的处理过程应该尽可能简明易懂结构程序设计技术是实现上述目标的关键技术,因此是详细设计的逻辑基础
九、程序设计思想常见的设计思想有两种结构化和面向对象化,本系统采用的是面向对象的设计思想,下面简单介绍一下两者的不同以及面向对象程序设计的优点传统的结构化__过程包括软件目标的功能分解,以及使用正确的参数和返回值来创建函数首先分析需求,确定功能,然后以函数的形式进行建模在一个Web应用中很可能有上千个函数,这些函数能够不受限制的互相调用,因此在访问某个变量时,很难保证它不是正在被其他的函数访问或者修改用ASP脚本来__Web应用时就是上面所说的情况只使用ASP而不使用任何自定义标记,在Web应用的规模比较小时还不会出现太多的问题,但是在Web应用的规模增大时就肯定会出现问题这些代码也许能够满足功能上的需要,却不能达到非功能性的要求在结构化__方法面临问题的时候,使用面向对象的方法进行分析、设计和__就可以解决一部分问题面向对象的分析和设计方法源于现实生活中的模块化的思想对象是提供一组相关功能的实体,对象之间互相作用从而完成一定的任务面向对象__方法包括对目标的模块化,以及用类的形式对数据和函数进行封装面向对象方法主要有以下四个特征1抽象性抽象是对象建模参数的选择,这是进行分析后得到的结果这意味着是由分析人员来选择一定的参数,以表示对象,这是对象模型化的第一步2封装性由于某些原因,类中的数据和方法不需要对其他的对象公开,我们可以将其隐藏在类的内部,这是对象模块化过程中很重要的一步这个步骤将确保对象的行为以简单的借口出现,而复杂的执行过程都被隐藏了比如,ASP就可以为Web网页__人员提供一个简单的接口3继承性在一个现存对象的基础上创建一个新的对象,这个过程称为继承这样我们可以不必重写所有的代码,只需在新对象中编写需要更新的代码就可以了4模块化为了减少__工作小组之间的依赖性,软件系统中必须使用模块
十、数据库连接技术本系统在数据库连接方面,使用了数据库ADO技术首先,在程序中建立一个CONN.INC的文件,里面用来放置数据库连接代码,在代码中先定义conn和connstr变量,conn用来创建数据连接对象,connstr用来存放连接字符串,使用ado中connection对象的open方法就可以连接AC__SS数据库了具体在程序中引用需要以下代码dimconnconnstrsetconn=server.createo__ectadodb.connection创建连接对象connstr=Provider=Microsoft.jet.oledb.
4.0;Datasour__=server.__ppathdata/db.aspconn.openconnstr开始连接这样,在数据库连接的方面,运用数据库ADO连接技术能获取比较大的效率
十一、源码文件列表DATA文件夹用于存放数据库文件I__GE文件夹用于存放设计时用到的__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_pri__数字产品单价Prod_com文本供货厂家Add_date日期/时间入库日期Update_time日期/时间最后更新日期表名user_info字段名数据类型备注Id自动编号主键Username文本用户名Password文本__Department文本部门Job文本岗位Level数字权限级别date日期/时间创建日期Index.asp用户登录页面,供用户登录使用;当用户输入正确的用户名和__后,系统将自动识别其权限级别,并进入到相应的页面操作说明在用户名后的文本框中输入您的用户名,在__后的文本框中输入您正确的__,然后__“登录系统”按钮(或输入完后,直接回车)Conn.inc为系统创建数据库连接的代码页面,因为系统要频繁地连接数据库,为了方便特写成一个包含文件,供程序调用操作说明在需要使用的页面中使用代码!--#includefile=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信息
十三、软件测试在__大型软件系统的过程中,需要面对错综复杂的问题,因此,在软件生存周期的每个阶段都不可避免地会产生错误我们力求在每个阶段结束之前通过严格的技术审查,尽可能早的发现并纠正错误测试的目的就是在软件投入生产性运行之前,尽可能多地发现软件中的错误目前软件测试仍然是保证软件质量的关键步骤,它是对软件规格说明、设计和编码的最后复审尽管面向对象技术的基本思想保证了软件应该有更高的质量,但无论采用什么样的编程技术,编程人员的错误都是不可避免的,而且由于面向对象技术__的软件代码重用率高,更需要严格测试,避免错误的繁衍因此,软件测试在面向对象编程里更具有它的重要性与__过程类似,测试过程也必须分步骤进行,每个步骤在逻辑上是前一个步骤地继续大型软件系统通常由若干个子系统组成,每个子系统又由许多模块组成因此,大型软件系统的测试的基本层次如图所示状态��1单元测试单元测试的用例从单元详细设计中导出在单元测试中可以采用功能性测试和结构性测试两种2集成测试在这个测试步骤中所发现的往往是概要设计的错误3系统测试在这个测试步骤中所发现的往往是需求规格说明的错误一般来说,系统测试是功能性测试,不是结构性测试
十四、代码设计部分功能函数说明a、验证用户登录代码说明%subchk_sub定义验证过程iftrimrequest.formusername=then判断是否输入了空的用户名%pclass=buttonscriptalert请输入用户名!;/script%elseiftrimrequest.formpassword=then判断是否输入了空的__%scriptalert请输入__!;/script%elsedimrssql定义记录集对象和SQL语句字符串setrs=server.createo__ectadodb.recordsetsql=select*fromuser_infowhereusername=trimrequest.formusernameandpassword=request.formpasswordrs.opensqlconn11打开记录集ifrs.eofandrs.bofthen%scriptalert用户名或__不正确!;/script%elseifnotrs.eofandnotrs.bofthenifrslevel=1orrslevel=2orrslevel=3then判断登录用户的级别response.cookiesadmin=trimrequest.formusername创建用户COOKIES信息response.cookiesuserid=rsidresponse.redirectck_sys_admin.asp登录成功,转入管理用户页面elseresponse.cookiesuser=trimrequest.formusername创建用户COOKIES信息response.cookiesuserid=rsidresponse.redirectck_sys.asp登录成功,转入普通用户页面endifendifendifendsub%b、分页代码说明%dimrssqlsetrs=server.createo__ectadodb.recordset创建记录集对象sql=select*fromtable选取仓库表中的所有记录,按降序排序rs.opensqlconn11分页代码部分dimtotal_recordcurrentpageconst__xPerpage=10每页显示最大记录条数total_record=rs.recordcount将总记录条数赋给变量total_recordcurrentpage=requestpage获取当前页面的页码ifcurrentpage1thencurrentpage=1endififcurrentpage=1then如果当前是第一页 则显示前面的记录show_content调用过程,以显示表单show_pagetotal_record__xperpage调用过程,以显示翻页菜单elsers.movecurrentpage-1*__xperpage把记录集__到每页的开始dimbook__rkbook__rk=rs.book__rk获取当前记录读取位置show_contentshow_pagetotal_record__xperpage调用过程,以显示翻页菜单endif%%subshow_content定义显示产品信息的表格框过程dimI定义记数器变量ii=0初始化记数器dowhilenotrs.eof如果不是最后一条记录 则继续要显示的内容i=i+1记数器和显示记录条数同步ifi=__xperpagethenexitdo如果超出每页最大显示条数 则退出SUBrs.movenext__到下一条记录loop循环%%endsub%%subshow_pagetotal_record__xperpage翻页菜单过程定义dimfile_url本页文件名file_url=ck_sys.asp方便后面使用dimtotal_page定义总页数变量iftotal_recordmod__xperpage=0then计算总共的页数total_page=total_record\__xperpageelsetotal_page=total_record\__xperpage+1endif%p/ptablewidth=439height=36border=0align=__nterclass=12trtdwidth=141tablewidth=141border=0__llspacing=1class=12trtdclass=12%ifcurrentpage2then%第一页%else%ahref=%=file_url%id=%=id%page=1class=linkfontcolor=#FF0000第一页/font/a%endif%/tdtd%ifcurrentpage2then%spanclass=12上一页%else%ahref=%=file_url%id=%=id%page=%=currentpage-1%fontcolor=#FF0000上一页/font/a/span/td%endif%/tr/table/tdtdwidth=125divalign=justifyfontcolor=#FF0000 spanclass=12共/span/fontspanclass=12%=total_record%fontcolor=#FF0000条/fontfontcolor=#FF0000共分/font%=total_page%fontcolor=#FF0000页/font /span/div/tdtdwidth=159tablewidth=159border=0__llpadding=0__llspacing=1class=12trtdwidth=73%iftotal_page-currentpage1then%spanclass=12下一页%else%ahref=%=file_url%id=%=id%page=%=currentpage+1%class=12fontcolor=#FF0000下一页/font/a%endif%/span/tdtdwidth=59%iftotal_page-currentpage1then%spanclass=12最后一页%else%ahref=%=file_url%id=%=id%page=%=total_page%class=12fontcolor=#FF0000最后一页/font/a%endif%/span/td/tr/table/td/tr/table%endsub%Index.asp源码!--#includefile=conn.inc--%ifrequestaction=chkthen判断用户是否提交登录信息callchk_sub调用验证过程endif%title赛格网络--即时库存信息!/titlelinkhref=css.cssrel=stylesheettype=text/cssformname=form1method=postaction=index.aspaction=chktablewidth=262height=113border=0align=__nter__llpadding=0__llspacing=1b__olor=#333333trb__olor=#FFFFFFclass=12tdcolspan=2divalign=__nterfontcolor=#006600size=3strong赛格网络/strong/font/div/td/trtrb__olor=#FFFFFFclass=12tdwidth=27%height=25divalign=__nter用户名/div/tdtdwidth=73%height=25divalign=left inputname=usernametype=textclass=___id=usernamesize=20/div/td/trtrb__olor=#FFFFFFclass=12tdheight=25divalign=__nter密 码/div/tdtdheight=25divalign=left inputname=passwordtype=passwordclass=___id=passwordsize=20/div/td/trtrb__olor=#FFFFFFclass=12tdheight=30colspan=2divalign=__nterinputname=Submittype=submitclass=buttonvalue=登陆系统/div/td/tr/table/form%subchk_sub定义验证过程iftrimrequest.formusername=then判断是否输入了空的用户名%pclass=buttonscriptalert请输入用户名!;/script%elseiftrimrequest.formpassword=then判断是否输入了空的__%scriptalert请输入__!;/script%elsedimrssql定义记录集对象和SQL语句字符串setrs=server.createo__ectadodb.recordsetsql=select*fromuser_infowhereusername=trimrequest.formusernameandpassword=request.formpasswordrs.opensqlconn11打开记录集ifrs.eofandrs.bofthen%scriptalert用户名或__不正确!;/script%elseifnotrs.eofandnotrs.bofthenifrslevel=1orrslevel=2orrslevel=3then判断登录用户的级别response.cookiesadmin=trimrequest.formusername创建用户COOKIES信息response.cookiesuserid=rsidresponse.redirectck_sys_admin.asp登录成功,转入管理用户页面elseresponse.cookiesuser=trimrequest.formusername创建用户COOKIES信息response.cookiesuserid=rsidresponse.redirectck_sys.asp登录成功,转入普通用户页面endifendifendifendsub%/pConn.inc源码%dimconnconnstrsetconn=server.createo__ectadodb.connection创建连接对象connstr=Provider=Microsoft.jet.oledb.
4.0;Datasour__=server.__ppathdata/db.aspconn.openconnstr开始连接%Ck_sys.asp源码!--#includefile=conn.inc--%ifrequest.cookiesuser=then判断是否正常登录,如果没有正常登录则退回登录页面response.redirectindex.asp如果非法登录 退回到登录页面endifdimrs1sql1setrs1=server.createo__ectadodb.recordset创建记录集对象sql1=select*fromuser_infowhereusername=request.cookiesuser查询登录用户信息SQL语句rs
1.opensql1conn11打开查询%htmlheadtitle赛格网络-普通用户/titlemetahttp-equiv=Content-Typecontent=text/html;charset=gb2312linkhref=css.cssrel=stylesheettype=text/css/headbodybrtablewidth=760height=30border=0align=__nter__llpadding=0__llspacing=1b__olor=#006600trtdb__olor=#FFFFFFclass=12 --gt;gt;gt; 欢迎fontcolor=#006600%=rs1username%/font登陆,部门fontcolor=#006600%=rs1department%/font 职务fontcolor=#006600%=rs1job%/font [ahref=#onclick=j__ascript:window.openedit_password.aspwidth=450height=150top=300left=300scrollbars=yes修改登陆__/a] [ahref=logout.asp退出系统/a]/td/tr/tableformname=form1method=postaction=search.asptablewidth=461height=30border=0align=__nter__llpadding=0__llspacing=1b__olor=#333333class=12trtdb__olor=#FFFFFF imgsrc=i__ge/search.gifwidth=15height=15align=bottom 请输入产品关键字inputname=___keytype=textclass=___id=___keysize=25 inputname=Submittype=submitclass=buttonvalue=搜索/td/tr/table/formtablewidth=760border=0align=__ntertrtdclass=12divalign=right[ahref=ck_sys.asp刷新库存信息/a]/div/td/tr/tabletablewidth=760height=54border=0align=__nter__llpadding=0__llspacing=1b__olor=#FF6600class=12tralign=__nterb__olor=#FFFFFFtdwidth=149height=22fontcolor=#FF0000产品名称/font/tdtdwidth=84fontcolor=#FF0000库存数量/font/tdtdwidth=__fontcolor=#FF0000单价/font/tdtdwidth=226fontcolor=#FF0000生产厂家/font/tdtdwidth=69fontcolor=#FF0000入库日期/font/tdtdwidth=136fontcolor=#FF0000最后____/font/td/tr%dimrssqlsetrs=server.createo__ectadodb.recordset创建记录集对象sql=select*fromckorderbyupdate_timedesc选取仓库表中的所有记录,按降序排序rs.opensqlconn11分页代码部分dimtotal_recordcurrentpageconst__xPerpage=10每页显示最大记录条数total_record=rs.recordcount将总记录条数赋给变量total_recordcurrentpage=requestpage获取当前页面的页码ifcurrentpage1thencurrentpage=1endififcurrentpage=1then如果当前是第一页 则显示前面的记录show_content调用过程,以显示表单show_pagetotal_record__xperpage调用过程,以显示翻页菜单elsers.movecurrentpage-1*__xperpage把记录集__到每页的开始dimbook__rkbook__rk=rs.book__rk获取当前记录读取位置show_contentshow_pagetotal_record__xperpage调用过程,以显示翻页菜单endif%%subshow_content定义显示产品信息的表格框过程dimI定义记数器变量ii=0初始化记数器dowhilenotrs.eof如果不是最后一条记录 则继续%trb__olor=#FFFFFFtdheight=29 %=rsprod_name%/tdtdalign=__nter%=rsprod_num%/tdtdalign=__nter¥%=For__tNumberrsprod_pri__2%/tdtd %=rsprod_com%/tdtdalign=__nter%=rsadd_date%/tdtdalign=__nterfontcolor=#006600%=rsupdate_time%/font/td/tr%i=i+1记数器和显示记录条数同步ifi=__xperpagethenexitdo如果超出每页最大显示条数 则退出SUBrs.movenext__到下一条记录loop循环%%endsub%/tablebr%subshow_pagetotal_record__xperpage翻页菜单过程定义dimfile_url本页文件名file_url=ck_sys.asp方便后面使用dimtotal_page定义总页数变量iftotal_recordmod__xperpage=0then计算总共的页数total_page=total_record\__xperpageelsetotal_page=total_record\__xperpage+1endif%p/ptablewidth=439height=36border=0align=__nterclass=12trtdwidth=141tablewidth=141border=0__llspacing=1class=12trtdclass=12%ifcurrentpage2then%第一页%else%ahref=%=file_url%id=%=id%page=1class=linkfontcolor=#FF0000第一页/font/a%endif%/tdtd%ifcurrentpage2then%spanclass=12上一页%else%ahref=%=file_url%id=%=id%page=%=currentpage-1%fontcolor=#FF0000上一页/font/a/span/td%endif%/tr/table/tdtdwidth=125divalign=justifyfontcolor=#FF0000 spanclass=12共/span/fontspanclass=12%=total_record%fontcolor=#FF0000条/fontfontcolor=#FF0000共分/font%=total_page%fontcolor=#FF0000页/font /span/div/tdtdwidth=159tablewidth=159border=0__llpadding=0__llspacing=1class=12trtdwidth=73%iftotal_page-currentpage1then%spanclass=12下一页%else%ahref=%=file_url%id=%=id%page=%=currentpage+1%class=12fontcolor=#FF0000下一页/font/a%endif%/span/tdtdwidth=59%iftotal_page-currentpage1then%spanclass=12最后一页%else%ahref=%=file_url%id=%=id%page=%=total_page%class=12fontcolor=#FF0000最后一页/font/a%endif%/span/td/tr/table/td/tr/table%endsub%/body/htmlscriptfunctionMM_openBrWindowtheURLwinNamefeatures{//用于弹出页面函数window.opentheURLwinNamefeatures;}/scriptCk_sys_admin.asp源码!--#includefile=conn.inc--%ifrequest.cookiesadmin=then判断是否正常登录,如果没有正常登录则退回登录页面response.redirectindex.asp如果非法登录 退回到登录页面endifdimrs1sql1定义记录集和SQL字符串setrs1=server.createo__ectadodb.recordset创建记录集sql1=select*fromuser_infowhereusername=request.cookiesadmin赋予SQL字符串rs
1.opensql1conn11执行SQL语句%htmlheadtitle赛格网络-管理用户/titlemetahttp-equiv=Content-Typecontent=text/html;charset=gb2312linkhref=css.cssrel=stylesheettype=text/css/headbodybrtablewidth=760height=55border=0align=__nter__llpadding=0__llspacing=1b__olor=#006600trtdheight=25b__olor=#FFFFFFclass=12 --gt;gt;gt; 欢迎fontcolor=#006600%=rs1username%/font登陆,部门fontcolor=#006600%=rs1department%/font 职务fontcolor=#006600%=rs1job%/font [ahref=#onclick=j__ascript:window.openedit_password.aspwidth=450height=150top=300left=300scrollbars=yes修改登陆__/a] [ahref=logout.asp退出系统/a]/td/trtrtdb__olor=#FFFFFFclass=12 您可以[ahref=ck_sys_admin.aspaction=add添加库存信息/a]/td/tr/tableformaction=search_admin.aspmethod=postname=search1id=search1tablewidth=461height=30border=0align=__nter__llpadding=0__llspacing=1b__olor=#333333class=12trtdb__olor=#FFFFFF imgsrc=i__ge/search.gifwidth=15height=15align=bottom 请输入产品关键字inputname=___keytype=textclass=___id=___keysize=25 inputname=Submittype=submitclass=buttonvalue=搜索/td/tr/table/formbr%ifrequestaction=editthen判断是否请求编辑calledit_data如果是 则调用编辑过程elseifrequestaction=addthen判断是否请求添加calladd_data如果是 则调用添加过程elseifrequestaction=adds__ethen判断是否请求向数据库新增conn.executeinsertintockprod_nameprod_numprod_pri__prod_comvaluestrimrequest.formprod_namerequest.formprod_numrequest.formprod_pri__request.formprod_com如果是 则向数据库新增elseifrequestaction=edits__ethen判断是否请求向数据库更新conn.executeupdatecksetprod_name=trimrequest.formprod_nameprod_num=request.formprod_numprod_pri__=request.formprod_pri__prod_com=request.formprod_comupdate_time=nowwhereid=requestid如果是 则向数据库更新elseifrequestaction=delthen判断是否请求删除记录conn.executedeletefromckwhereid=requestid%如果是 则删除记录scriptalert已经成功删除!请刷新库存;/script%endif%brtablewidth=760border=0align=__ntertrtdclass=12divalign=right[ahref=ck_sys_admin.asp刷新库存信息/a]/div/td/tr/tabletablewidth=760height=54border=0align=__nter__llpadding=0__llspacing=1b__olor=#FF6600class=12tralign=__nterb__olor=#FFFFFFtdwidth=139height=22fontcolor=#FF0000产品名称/font/tdtdwidth=78fontcolor=#FF0000库存数量/font/tdtdwidth=83fontcolor=#FF0000单价/font/tdtdwidth=199fontcolor=#FF0000生产厂家/font/tdtdwidth=67fontcolor=#FF0000入库日期/font/tdtdwidth=116fontcolor=#FF0000最后____/font/tdtdwidth=35编辑/tdtdwidth=34删除/td/tr%dimrssqlsetrs=server.createo__ectadodb.recordsetsql=select*fromckorderbyupdate_timedescrs.opensqlconn11dimtotal_recordcurrentpageconst__xPerpage=20每页显示最大记录条数total_record=rs.recordcount将总记录条数赋给变量total_recordcurrentpage=requestpage获取当前页面的页码ifcurrentpage1thencurrentpage=1endififcurrentpage=1then如果当前是第一页 则显示前面的记录show_content调用过程,以显示表单show_pagetotal_record__xperpage调用过程,以显示翻页菜单elsers.movecurrentpage-1*__xperpage把记录集__到每页的开始dimbook__rkbook__rk=rs.book__rk获取当前记录读取位置show_content调用过程,以显示表单show_pagetotal_record__xperpage调用过程,以显示翻页菜单endif%%subshow_content定义显示产品信息的表格框过程dimI定义记数器变量ii=0初始化记数器dowhilenotrs.eof如果不是最后一条记录 则继续%trb__olor=#FFFFFFtdheight=29 %=rsprod_name%/tdtdalign=__nter%=rsprod_num%/tdtdalign=__nter¥%=For__tNumberrsprod_pri__2%/tdtd %=rsprod_com%/tdtdalign=__nter%=rsadd_date%/tdtdalign=__nterfontcolor=#006600%=rsupdate_time%/font/tdtdalign=__nterahref=ck_sys_admin.aspaction=editid=%=rsid%imgsrc=i__ge/edit.gifwidth=16height=16border=0/a/tdtdalign=__nterahref=ck_sys_admin.aspaction=delid=%=rsid%imgsrc=i__ge/del.gifwidth=16height=16border=0/a/td/tr%i=i+1记数器和显示记录条数同步ifi=__xperpagethenexitdo如果超出每页最大显示条数 则退出SUBrs.movenext__到下一条记录loop循环rs.close%%endsub%/tablebr%subshow_pagetotal_record__xperpage翻页菜单过程定义dimfile_url文件名file_url=ck_sys_admin.asp方便后面使用dimtotal_page定义总页数变量iftotal_recordmod__xperpage=0then计算总共的页数total_page=total_record\__xperpageelsetotal_page=total_record\__xperpage+1endif%p/ptablewidth=439height=36border=0align=__nterclass=12trtdwidth=141tablewidth=141border=0__llspacing=1class=12trtdclass=12%ifcurrentpage2then%第一页%else%ahref=%=file_url%id=%=id%page=1class=linkfontcolor=#FF0000第一页/font/a%endif%/tdtd%ifcurrentpage2then%spanclass=12上一页%else%ahref=%=file_url%id=%=id%page=%=currentpage-1%fontcolor=#FF0000上一页/font/a/span/td%endif%/tr/table/tdtdwidth=125divalign=justifyfontcolor=#FF0000 spanclass=12共/span/fontspanclass=12%=total_record%fontcolor=#FF0000条/fontfontcolor=#FF0000共分/font%=total_page%fontcolor=#FF0000页/font /span/div/tdtdwidth=159tablewidth=159border=0__llpadding=0__llspacing=1class=12trtdwidth=73%iftotal_page-currentpage1then%spanclass=12下一页%else%ahref=%=file_url%id=%=id%page=%=currentpage+1%class=12fontcolor=#FF0000下一页/font/a%endif%/span/tdtdwidth=59%iftotal_page-currentpage1then%spanclass=12最后一页%else%ahref=%=file_url%id=%=id%page=%=total_page%class=12fontcolor=#FF0000最后一页/font/a%endif%/span/td/tr/table/td/tr/table%endsub%brbr%subedit_data定义编辑过程表单dimrs2sql2定义记录对象和SQL字符串setrs2=server.createo__ectadodb.recordset创建记录对象sql2=select*fromckwhereid=requestidSQL语句赋值rs
2.opensql2conn11打开查询%formname=form2method=postaction=ck_sys_admin.aspaction=edits__eid=%=rs2id%tablewidth=760height=107border=0align=__nter__llpadding=0__llspacing=1b__olor=#FF6600class=12trb__olor=#FFFFFFtdheight=22colspan=4fontcolor=#FF0000 /font∷fontcolor=#FF0000 /font编辑库存信息/td/trtralign=__nterb__olor=#FFFFFFtdwidth=207height=22fontcolor=#006600产品名称/font/tdtdwidth=85fontcolor=#006600库存数量/font/tdtdwidth=97fontcolor=#006600单价/font/tdtdwidth=366fontcolor=#006600生产厂家/font/td/trtrb__olor=#FFFFFFtdheight=29 inputname=prod_nametype=textclass=___id=prod_namevalue=%=rs2prod_name%size=20/tdtdalign=__nterinputname=prod_numtype=textclass=___id=prod_numvalue=%=rs2prod_num%size=7/tdtdalign=__nterinputname=prod_pri__type=textclass=___id=prod_pri__value=%=rs2prod_pri__%size=10/tdtd inputname=prod_comtype=textclass=___id=prod_comvalue=%=rs2prod_com%size=40/td/trtrb__olor=#FFFFFFtdheight=29colspan=4divalign=__nterinputname=Submit2type=submitclass=buttonvalue=修 改/div/td/tr/table/form%rs
2.close关闭查询%%endsub%br%subadd_data定义新增过程表单%formname=form3method=postaction=ck_sys_admin.aspaction=adds__etablewidth=760height=107border=0align=__nter__llpadding=0__llspacing=1b__olor=#FF6600class=12trb__olor=#FFFFFFtdheight=22colspan=4fontcolor=#FF0000 /font∷fontcolor=#FF0000 /font添加库存信息/td/trtralign=__nterb__olor=#FFFFFFtdwidth=207height=22fontcolor=#FF0000产品名称/font/tdtdwidth=85fontcolor=#FF0000入库数量/font/tdtdwidth=97fontcolor=#FF0000单价/font/tdtdwidth=366fontcolor=#FF0000生产厂家/font/td/trtrb__olor=#FFFFFFtdheight=29 inputname=prod_nametype=textclass=___id=prod_namesize=20/tdtdalign=__nterinputname=prod_numtype=textclass=___id=prod_numsize=7/tdtdalign=__nterinputname=prod_pri__type=textclass=___id=prod_pri__size=10/tdtd inputname=prod_comtype=textclass=___id=prod_comsize=40/td/trtrb__olor=#FFFFFFtdheight=29colspan=4divalign=__nterinputname=Submit2type=submitclass=buttonvalue=添 加/div/td/tr/table/form%endsub%/body/htmlscriptfunctionMM_openBrWindowtheURLwinNamefeatures{//v
2.0window.opentheURLwinNamefeatures;}/scriptEdit_password.asp源码!--#includefile=conn.inc--%ifrequestaction=modithen判断是否请求修改__callmodi_password调用修改__过程endif%htmlheadtitle更改用户__/titlemetahttp-equiv=Content-Typecontent=text/html;charset=gb2312linkhref=css.cssrel=stylesheettype=text/css/headbodyformname=form1method=postaction=edit_password.aspaction=moditablewidth=356height=119border=0align=__nter__llpadding=0__llspacing=1b__olor=#000000class=12trb__olor=#FFFFFFtdwidth=147height=37divalign=left __br fontcolor=#FF0000请输入您的新__/font/div/tdtdwidth=206divalign=left inputname=passwordtype=passwordclass=___id=password/div/td/trtrb__olor=#FFFFFFtd __(验证)br fontcolor=#FF0000请再次输入您的新__/font/tdtddivalign=left inputname=repasswordtype=passwordclass=___id=repassword/div/td/trtrb__olor=#FFFFFFtdcolspan=2divalign=__nterinputname=Submittype=submitclass=buttonvalue=更改__/div/td/tr/table/formbr/body/html%submodi_password定义修改__过程ifrequest.formpassword=request.formrepasswordthen首先判断两次输入的__是否一致conn.executeupdateuser_infosetpassword=trimrequest.formpasswordwhereid=request.cookiesuseriddimrssql定义记录集和SQL语句变量setrs=server.createo__ectadodb.recordset创建记录集对象sql=select*fromuser_infowhereid=request.cookiesuseridSQL语句赋值rs.opensqlconn13打开查询rspassword=request.formpassword取得更改的__字符rs.update更新数据库response.write成功修改__!显示成功信息response.end停止后面代码显示else如果两次__输入不一致 则告诉用户%scriptalert您两次输入的__不一致!;/script%endifendsub%logout.asp源码%response.cookiesadmin=清除管理登录COOKIESresponse.cookiesuser=清除普通用户登录COOKIESresponse.redirectindex.asp清除后,退回到登录页面%Search.asp源码!--#includefile=conn.inc--%ifrequest.cookiesuser=then判断是否正常登录,如果没有正常登录则退回登录页面response.redirectindex.asp如果非法登录 退回到登录页面elseifrequest.form___key=then如果没有输入关键词 则提示用户%scriptalert关键词不能为空;/script%endif%%dimrs1sql1定义数据记录集和SQL字符串变量setrs1=server.createo__ectadodb.recordset创建记录集对象sql1=select*fromuser_infowhereusername=request.cookiesuser赋值SQL语句 打开要修改__的用户rs
1.opensql1conn11打开查询%htmlheadtitle搜索结果/titlemetahttp-equiv=Content-Typecontent=text/html;charset=gb2312linkhref=css.cssrel=stylesheettype=text/css/headbodytablewidth=6__height=30border=0align=__nter__llpadding=0__llspacing=1b__olor=#006600trtdb__olor=#FFFFFFclass=12 --gt;gt;gt; 欢迎fontcolor=#006600%=rs1username%/font登陆,部门fontcolor=#006600%=rs1department%/font 职务fontcolor=#006600%=rs1job%/font [ahref=#onclick=j__ascript:window.openedit_password.aspwidth=450height=150top=300left=300scrollbars=yes修改登陆__/a] [ahref=logout.asp退出系统/a]/td/tr/tablebrtablewidth=6__height=54border=0align=__nter__llpadding=0__llspacing=1b__olor=#FF6600class=12tralign=__nterb__olor=#FFFFFFtdwidth=139height=22fontcolor=#FF0000产品名称/font/tdtdwidth=78fontcolor=#FF0000库存数量/font/tdtdwidth=83fontcolor=#FF0000单价/font/tdtdwidth=199fontcolor=#FF0000生产厂家/font/tdtdwidth=67fontcolor=#FF0000入库日期/font/tdtdwidth=116fontcolor=#FF0000最后____/font/td/tr%dimrssql定义数据记录集和SQL字符串变量setrs=server.createo__ectadodb.recordset创建记录集对象sql=select*fromckwhereprod_namelike%request.form___key%赋值SQL字符串 查询与关键词有关的记录rs.opensqlconn11打开查询dimtotal_recordcurrentpageconst__xPerpage=20每页显示最大记录条数total_record=rs.recordcount将总记录条数赋给变量total_recordcurrentpage=requestpage获取当前页面的页码ifcurrentpage1thencurrentpage=1endififcurrentpage=1then如果当前是第一页 则显示前面的记录show_content调用过程,以显示表单show_pagetotal_record__xperpage调用过程,以显示翻页菜单elsers.movecurrentpage-1*__xperpage把记录集__到每页的开始dimbook__rkbook__rk=rs.book__rk获取当前记录读取位置show_content调用过程,以显示翻页菜单show_pagetotal_record__xperpage调用过程,以显示翻页菜单endif%%subshow_content定义显示产品信息的表格框过程dimi定义记数器变量ii=0初始化记数器dowhilenotrs.eof如果不是最后一条记录 则继续%trb__olor=#FFFFFFtdheight=29 %=rsprod_name%/tdtdalign=__nter%=rsprod_num%/tdtdalign=__nter¥%=For__tNumberrsprod_pri__2%/tdtd %=rsprod_com%/tdtdalign=__nter%=rsadd_date%/tdtdalign=__nterfontcolor=#006600%=rsupdate_time%/font/td/tr%i=i+1记数器和显示记录条数同步ifi=__xperpagethenexitdo如果超出每页最大显示条数 则退出SUBrs.movenext__到下一条记录loop循环rs.close关闭记录集s%%endsub%/tablebr%subshow_pagetotal_record__xperpage翻页菜单过程定义dimfile_url文件名file_url=search.asp方便后面使用dimtotal_page定义总页数变量iftotal_recordmod__xperpage=0then计算总共的页数total_page=total_record\__xperpageelsetotal_page=total_record\__xperpage+1endif%p/ptablewidth=439height=36border=0align=__nterclass=12trtdwidth=141tablewidth=141border=0__llspacing=1class=12trtdclass=12%ifcurrentpage2then%第一页%else%ahref=%=file_url%id=%=id%page=1class=linkfontcolor=#FF0000第一页/font/a%endif%/tdtd%ifcurrentpage2then%spanclass=12上一页%else%ahref=%=file_url%id=%=id%page=%=currentpage-1%fontcolor=#FF0000上一页/font/a/span/td%endif%/tr/table/tdtdwidth=125divalign=justifyfontcolor=#FF0000 spanclass=12共/span/fontspanclass=12%=total_record%fontcolor=#FF0000条/fontfontcolor=#FF0000共分/font%=total_page%fontcolor=#FF0000页/font /span/div/tdtdwidth=159tablewidth=159border=0__llpadding=0__llspacing=1class=12trtdwidth=73%iftotal_page-currentpage1then%spanclass=12下一页%else%ahref=%=file_url%id=%=id%page=%=currentpage+1%class=12fontcolor=#FF0000下一页/font/a%endif%/span/tdtdwidth=59%iftotal_page-currentpage1then%spanclass=12最后一页%else%ahref=%=file_url%id=%=id%page=%=total_page%class=12fontcolor=#FF0000最后一页/font/a%endif%/span/td/tr/table/td/tr/table%endsub%brbr/body/htmlSearch_admin.asp源码!--#includefile=conn.inc--%ifrequest.cookiesadmin=then判断是否正常登录,如果没有正常登录则退回登录页面response.redirectindex.asp如果非法登录 退回到登录页面elseifrequest.form___key=then%scriptalert关键词不能为空;/script%endif%%dimrs1sql1setrs1=server.createo__ectadodb.recordset创建记录集对象sql1=select*fromuser_infowhereusername=request.cookiesadmin选取登录用户信息rs
1.opensql1conn11%htmlheadtitle搜索结果/titlemetahttp-equiv=Content-Typecontent=text/html;charset=gb2312linkhref=css.cssrel=stylesheettype=text/css/headbodytablewidth=760height=55border=0align=__nter__llpadding=0__llspacing=1b__olor=#006600trtdheight=25b__olor=#FFFFFFclass=12 --gt;gt;gt; 欢迎fontcolor=#006600%=rs1username%/font登陆,部门fontcolor=#006600%=rs1department%/font 职务fontcolor=#006600%=rs1job%/font [ahref=#onclick=j__ascript:window.openedit_password.aspwidth=450height=150top=300left=300scrollbars=yes修改登陆__/a] [ahref=logout.asp退出系统/a]/td/trtrtdb__olor=#FFFFFFclass=12 您可以[ahref=ck_sys_admin.aspaction=add添加库存信息/a]/td/tr/tablebrbrtablewidth=760height=54border=0align=__nter__llpadding=0__llspacing=1b__olor=#FF6600class=12tralign=__nterb__olor=#FFFFFFtdwidth=139height=22fontcolor=#FF0000产品名称/font/tdtdwidth=78fontcolor=#FF0000库存数量/font/tdtdwidth=83fontcolor=#FF0000单价/font/tdtdwidth=199fontcolor=#FF0000生产厂家/font/tdtdwidth=67fontcolor=#FF0000入库日期/font/tdtdwidth=116fontcolor=#FF0000最后____/font/tdtdwidth=35编辑/tdtdwidth=34删除/td/tr%dimrssqlsetrs=server.createo__ectadodb.recordsetsql=select*fromckwhereprod_namelike%request.form___key%rs.opensqlconn11dimtotal_recordcurrentpageconst__xPerpage=20每页显示最大记录条数total_record=rs.recordcount将总记录条数赋给变量total_recordcurrentpage=requestpage获取当前页面的页码ifcurrentpage1thencurrentpage=1endififcurrentpage=1then如果当前是第一页 则显示前面的记录show_content调用过程,以显示表单show_pagetotal_record__xperpage调用过程,以显示翻页菜单elsers.movecurrentpage-1*__xperpage把记录集__到每页的开始dimbook__rkbook__rk=rs.book__rk获取当前记录读取位置show_content调用过程,以显示翻页菜单show_pagetotal_record__xperpage调用过程,以显示翻页菜单endif%%subshow_content定义显示产品信息的表格框过程dimI定义记数器变量ii=0初始化记数器dowhilenotrs.eof如果不是最后一条记录 则继续%trb__olor=#FFFFFFtdheight=29 %=rsprod_name%/tdtdalign=__nter%=rsprod_num%/tdtdalign=__nter¥%=For__tNumberrsprod_pri__2%/tdtd %=rsprod_com%/tdtdalign=__nter%=rsadd_date%/tdtdalign=__nterfontcolor=#006600%=rsupdate_time%/font/tdtdalign=__nterahref=ck_sys_admin.aspaction=editid=%=rsid%imgsrc=i__ge/edit.gifwidth=16height=16border=0/a/tdtdalign=__nterahref=ck_sys_admin.aspaction=delid=%=rsid%imgsrc=i__ge/del.gifwidth=16height=16border=0/a/td/tr%i=i+1记数器和显示记录条数同步ifi=__xperpagethenexitdo如果超出每页最大显示条数 则退出SUBrs.movenext__到下一条记录loop循环rs.close关闭记录集%%endsub%/tablebr%subshow_pagetotal_record__xperpage翻页菜单过程定义dimfile_url文件名file_url=search_admin.asp方便后面使用dimtotal_page定义总页数变量iftotal_recordmod__xperpage=0then计算总共的页数total_page=total_record\__xperpageelsetotal_page=total_record\__xperpage+1endif%p/ptablewidth=439height=36border=0align=__nterclass=12trtdwidth=141tablewidth=141border=0__llspacing=1class=12trtdclass=12%ifcurrentpage2then%第一页%else%ahref=%=file_url%id=%=id%page=1class=linkfontcolor=#FF0000第一页/font/a%endif%/tdtd%ifcurrentpage2then%spanclass=12上一页%else%ahref=%=file_url%id=%=id%page=%=currentpage-1%fontcolor=#FF0000上一页/font/a/span/td%endif%/tr/table/tdtdwidth=125divalign=justifyfontcolor=#FF0000 spanclass=12共/span/fontspanclass=12%=total_record%fontcolor=#FF0000条/fontfontcolor=#FF0000共分/font%=total_page%fontcolor=#FF0000页/font /span/div/tdtdwidth=159tablewidth=159border=0__llpadding=0__llspacing=1class=12trtdwidth=73%iftotal_page-currentpage1then%spanclass=12下一页%else%ahref=%=file_url%id=%=id%page=%=currentpage+1%class=12fontcolor=#FF0000下一页/font/a%endif%/span/tdtdwidth=59%iftotal_page-currentpage1then%spanclass=12最后一页%else%ahref=%=file_url%id=%=id%page=%=total_page%class=12fontcolor=#FF0000最后一页/font/a%endif%/span/td/tr/table/td/tr/table%endsub%brbr/body/html
十五、结束语从本系统开始设计到现在,共用时间一个月到目前为止基本功能已经实现仓库即时查询系统之企业化校园体验子系统是在对相关人员进行详细调研后,确定了系统涉及的领域,包括数据库设计、界面设计、Web应用层设计等,是一个具有实际应用意义的典型管理系统本系统具有如下特点1采用Browser/Server三层体系结构,使系统具有很好的可维护性和可重用性2在本系统的__过程中采用的是IIS+ASP+AC__SS模式,此模式将明显的把显示和逻辑分离,使代码容易管理,适合于大型项目的__3中间层使用数据库连接池技术加快与数据库服务器之间的数据处理速度,也加快对客户机层的响应速度4Web服务器采用的是微软公司的IIS应用服务器,它是一个比较完善的、开放的Web应用服务器它严格地遵循普遍流行的开放标准,在大型__过程中较为适用5后台数据库采用的AC__SS,它功能比较强大,支持在线分析处理、多媒体支持和各种并行处理能力但因为本人在项目开始的时候,对ASP和Web应用程序设计方面不太熟悉,再加上毕业设计的时间仓促,许多方面在下一步的工作中还需要进一步改进和完善主要针对以下几方面1尽量采用满足MVC模式框架__,分离表示层和事物层,使系统具有高的可重用性和适应性以及良好的可维护性2系统的某些设计的可扩展性并不十分理想,在以后的系统维护过程中,使用重构方法对系统进行重构,使系统的设计日益趋于更强的可扩展性3本人感觉遗憾之处就是希望能够在该系统中加入仓库___开入库单功能,业务员开出库单功能,业务总监审核销售出库单,并且在月底出每个业务员的销售报表和公司盈利报表,使其实现进销存的基本功能附____《ASP动态网页设计应用教程》出版社电子工业出版社__唐红亮2005年06月18日仓库即时查询系统用户登录产品__信息产品库存信息产品快速查询产品__修改产品库存修改用户__修改安全退出系统仓库即时查询系统用户登录产品__信息产品库存信息产品快速查询产品__修改产品库存修改用户__修改安全退出系统第3页。