毕业论文——企业公告及资料发布系统的设计与实现

企业公告及资料发布系统的设计与实现摘 要近年来，随着网络技术的迅猛发展，越来越多的部门、企事业单位都在通过Internet对外宣传自己，同时为信息需求方提供方便快捷的服务，实现企业资源共享、提高办公效率、节减不必要的开支。因此，改变传统的独立、零散的信息发布方式是网络信息发展的必然趋势。本文完整地分析了企业公告及资料发布系统的业务需求，并介绍了系统的详细设计与实现。在此基础上本系统将ASP技术作为WEB应用程序的重要开发工具实现了其中的基本功能，包括：文件管理，部门管理，公告管理，管理员管理和留言簿管理等功能。同时，系统对用户进行了分级管理，提高了系统的安全性。该系统前台界面的设计主要采用Microsoft ASP作为开发工具，后台数据库采用SQL_SERVER 2000数据库设计，应用服务器端使用IIS，并利用ADO数据库的各管理操作，实现了基于B/S模式开发的企业公告及资料发布系统的基本功能及管理功能。关键词：B/S模式；ADO；WEB；发布The Design and Realization of the Enterprise Bulletin and Datum Issue SystemAbstractIn recent years, with the rapid development of the computer network, more and more departments and corporations propagandize themselves through Internet. At the same time, they supply convenient and immediate service to those who has information requirements to realize resource sharing and improve their working efficiency and save their cost. So, it is an inevitable trend for the development of the Network Information to change the traditional scattered method of issuing information.How to design and realize the system to issue the bulletin and the datum, and the status of the business requirement for the system are introduced in this paper. The system takes ASP technology as an important development web tool, and realizes the basic function, such as: file management, branch management, bulletin management, administrator management and message board management etc. At the same time, in order to enhance security, the system takes hierarchical management architecture.This system mainly uses Microsoft ASP as the development tool, the SQL_SERVER 2000 to design the database on the backstage, IIS as the application server, which connects with the database by the ADO technique. It was realized with the B/S architecture.Key words: B/S pattern; ADO; WEB; issue目 录 论文总页数：28页1引言11.1选题背景及意义11.2系统特点22ASP技术和SQL Server数据库访问方法22.1ASP技术22.1.1ASP 概述22.1.2ASP 的运行环境32.1.3ASP 的内建对象32.2SQL Server数据库32.2.1SQL Server2000简介32.2.2ADO组件说明43系统分析和设计53.1需求分析53.1.1数据流图53.1.2数据字典63.1.3功能需求63.1.4业务流程73.2总体设计73.2.1软件的运行环境设计73.2.2系统模块设计83.2.3系统的流程分析93.3概念结构设计93.4数据库逻辑结构设计114系统详细设计和实现134.1详细设计134.1.1用户、管理员登陆模块134.1.2公告发布模块134.1.3提交工作报告模块144.1.4修改个人信息154.1.5系统管理模块154.2系统实现164.2.1系统主界面的实现164.2.2ASP访问数据库实现174.2.3登录模块实现174.2.4用户管理模块的实现184.2.5公告管理模块204.2.6文件管理模块214.2.7部门管理模块234.2.8管理员管理模块245设计难题及解决方法245.1上传资料的实现24结 论26参考文献26致 谢27声 明281 引言在科学技术飞速发展的今天，计算机技术作为现代科学技术的基础和核心，已经而且将继续对人类文明社会的进步与发展产生深刻影响。当前越来越多的商业、企事业单位已经将计算机技术应用于日常的信息管理工作。科学的运用计算机技术进行信息管理不仅可以使管理工作规范化、系统化、自动化而且可以节省相当的人力、物力。它能够使用户的管理工作走上良性运转轨道，从而为其快速发展奠定基础。因此各企事业单位对与本行业相关管理软件的需求也十分迫切，公告发布及资料上传系统的建立，为各级信息管理决策提供了信息支持，从根本上改善了管理人员的劳动条件和工作性质，是信息管理手段现代化的重要标志。网络发布公告及上传资料是现在也是将来部门、企事业单位提高办公效率和机构精简改革趋势的一个必然需要。它不仅可以实现企业内部资源共享、提高办公效率、节减不必要的开支，而且能使企业向外部发布产品、人才供求信息，以取得更多的商机和更多的优秀人才；向内部发布重要通知或公告,实现内、外网有机结合。同时实现远程信息交流，解决异地办公的局限性问题。1.1 选题背景及意义在科学技术飞速发展的今天，计算机技术作为现代科学技术的基础和核心，已经而且将继续对人类文明社会的进步与发展产生深刻影响。当前越来越多的商业、企事业单位已经将计算机技术应用于日常的信息管理工作。科学的运用计算机技术进行信息管理不仅可以使管理工作规范化、系统化、自动化而且可以节省相当的人力、物力。它能够使用户的管理工作走上良性运转轨道，从而为其快速发展奠定基础。因此各企事业单位对与本行业相关管理软件的需求也十分迫切，公告发布及资料上传系统的建立，为各级信息管理决策提供了信息支持，从根本上改善了管理人员的劳动条件和工作性质，是信息管理手段现代化的重要标志。网络发布公告及上传资料是现在也是将来部门、企事业单位提高办公效率和机构精简改革趋势的一个必然需要。Internet逐渐进入到人们的生活当中，人们可以在闲暇时尽情地遨游在网络中，而Internet又是以网站的形式体现出来的。通过网站的访问，人们可以进行电子邮件的发送、文件传输、远程登陆、网上查询和网上交流等，足不出户便可知道外面的新闻动态。当然企事业单位更离不开信息网络传播的方式。因为企业也已不再满足传统、独立、零散的信息发布方式了，企业要的是协同工作、综合、集成化的解决方案。而网络是解决由于物理距离造成的信息交流不畅、协商沟通不便的办公瓶颈问题的最佳方式。网络信息时代将人从繁琐、无序、低端的工作中解放出来从事核心事务，整体提高了单位办事效率和对信息的可控性，降低办公成本，提高执行力，使信息交流更加畅通。同时实现远程信息交流，解决异地办公的局限性问题。1.2 系统特点蓬勃发展的网络也顺理成章地将ASP作为WEB应用程序的重要开发工具。采用WEB技术实现B/S（浏览器/服务器）结构的管理系统是信息网络传播的发展趋势。网络信息时代将人从繁琐、无序、低端的工作解放出来从事核心事务，整体提高了单位办事效率和对信息的可控性，降低办公成本，提高执行力，操作简单、易于维护的需求使信息交流更加畅通。同时实现远程信息交流，解决异地办公的局限性问题。其具体特点如下：(1) 通用性：基于先进的系统模型，使得系统能够适用于不同行业、不有规模的用户。(2) 易用性：B/S结构使用户端不必安装任何软件，只要有浏览器并连接到Internet即可使用，免除了非专业人员维护系统的困难。(3) 实时性:所有数据均实时处理，也可实时查询。(4) 将企业内联网和互联网有机结合，提供企业内部信息化的网络平台。(5) 为企业异地办公提供全面可靠的安全解决方案。2 ASP技术和SQL Server数据库访问方法2.1 ASP技术2.1.1 ASP 概述ASP（ACTIVE SERVER PAGES）是一套微软开发的服务器端脚本环境，它内含于IIS5.0和6.0之中，通过ASP我们可以结合html网页、ASP指令和ACTIVEX元件建立动态、交互且高效的WEB服务器应用程序。有了ASP你就不必担心客户的浏览器是否能运行ASP所编写的代码，因为所有的程序都将在服务器端执行，包括所有嵌在普通中的脚本程序。当程序执行完毕后，服务器仅将执行的结果返回给客户浏览器，这样也就减轻了客户端浏览器的负担，大大提高了交互的速度。以下是ASP所独具的一些特点： 以下是 ASP 独具的一些特点：(1) 使用 VBScript、JScript 等简单易懂的脚本语言，同时结合 HTML代码，即可快速地完成网站的应用程序。(2) 使用普通的文本编辑器，如 Windows 的记事本，即可进行编辑设计，还可运用 Dreamweaver 所见即所得的网页编辑软件快捷方便地进行编辑，易学易用。(3) 与浏览器无关，用户端只要使用可执行HTML代码的浏览器，即可浏览 ASP 所设计的网页内容。ASP所使用的脚本语言（VBScript、JScript）均在 Web 服务器端执行，用户端的浏览器不需要能够执行这些脚本语言。(4) ASP 能与任何 ActiveX Scripting 语言相容。ActiveXServer Components（ActiveX 服务器元件）具有无限可扩充性。可以使用 Visual Basic、Delphi、Java、Visual C+等编程语言来编写你所需要的 ActiveX Server Components。(5) Active Server Pages 的源程序，不会被传到客户端浏览器，因而可以避免所写的源程序被他人窃取或随意篡改，也提高了程序的安全性。ASP 优于其它编程语言的是，ASP 是一种“无须编程”的软件开发工具，即是说简单易用，用简单的几个语句，即可对数据库进行操作。2.1.2 ASP 的运行环境目前 ASP 可运行在三种环境下：(1) WINDOWS NT server 4.0 运行 IIS 3.0(Internet Information Server)以上。(2) WINDOWS NT workstation 4.0 运行 Peer Web Server 3.0 以上。(3) WINDOWS 95/98 运行 PWS(Personal Web Server)。其中以 NT server 上的 IIS 功能最强，提供了对 ASP 的全面支持，是创建高速、稳定的 ASP 主页的最佳选择。2.1.3 ASP 的内建对象ASP 提供了六个内建对象，供用户直接调用：(1) Application对象：负责管理所有会话信息，可用来在指定的应用程序的所有用户之间共享信息。(2) Session 对象：存贮特定用户的会话信息，只被该用户访问，当用户在不同 WEB 页面跳转时，Session 中的变量在用户整个会话过程中一直保存。Session对象需 cookie 支持。(3) Request 对象：从用户端取得信息传递给服务器，是 ASP 读取用户输入的主要方法。(4) Response 对象：服务器将输出内容发送到用户端。(5) Server 对象：提供对服务器有关方法和属性的访问。(6) Object Context 对象：IIS 4.0 新增的对象，用来进行事务处理。此项功能需得到 MTS(Microsoft Transcation Server)管理的支持。2.2 SQL Server数据库2.2.1 SQL Server2000简介SQL Server2000是Microsoft公司推出的关系型网络数据为管理系统，一般工作于Microsoft公司的操作系统平台上，如Microsoft Windows2000/2003/XP.Microsoft SQL Server2000是具有分布式数据库和数据仓库功能，支持客户机/服务器结构，并能够进行分布式事务处理和联机分析处理，它提供了丰富的管理工具以支持数据的安全性管理、完整性管理和作业管理。其功能主要有以下四类：（1） 数据库管理功能：是SQL Server为数据库存服务器、数据库、数据库文件及作业提供的创建和维护功能，以及保证数据的安全性和完整性功能。（2） 网络连接功能：提供客户机与服务器的连接工具、数据通信工具和邮件系统的结构及Web页面功能。（3） 应用程序开发工具：提供Transact-SQL、应用程序接口及应用程序的设计和优化功能。（4） 用户信息存取工具：提供给非专业人员信息存取工具，使非专业人员通过可视化操作即可实现查询等处理。2.2.2 ADO组件说明ADO技术是ASP访问数据库的一个关键技术。ADO的全称即activex data object(activex数据对象),是微软公司开发的一组优化的访问数据库的专用对象集，它提供了编程语言和统一数据访问方式OLE DB的一个中间层。允许开发人员编写访问数据的代码而不用关心数据库是如何实现的，而只用关心到数据库的连接。通过在 Web 服务器上设置 ODBC 和 OLEDB 可连接多种数据库：如 ORACLE、SQL SERVER、ACCESS 等，是对目前微软所支持的数据库进行操作的最有效和最简单直接的方法。访问数据库的时候，关于SQL的知识不是必要的，但是特定数据库支持的SQL命令仍可以通过ADO中的命令对象来执行。它为ASP提供了完整的站点数据库解决方案，它作用在服务器端，提供含有数据库信息的主页内容，通过执行sql命令，让用户在浏览器画面中输入，更新和删除站点数据库的信息。ADO主要包括connection，recordset和command等七个对象和四个集合, 它们的主要功能如下 ：ADO 组件主要提供了以下七个对象和四个集合来访问数据库。(1) Connection对象：建立与后台数据库的连接；该对象提供了一种高效方便安全的数据库连接方案。(2) Command 对象：对象对数据库下达行动查询指令，以及执行SQL server的存储过程，访问数据库；(3) Parameters 对象和 Parameters 集合：为 Command 对象提供数据和参数；(4) RecordSet 对象：存放访问数据库后的数据信息，是最常用的对象；(5) Field 对象和 Field 集合：提供对 RecordSet 中当前记录的各个字段进行访问的功能；(6) Property对象和 Properties 集合：提供有关信息，供 Connection、Command、RecordSet、Field 对象使用；(7) Error 对象和 Errors 集合：提供访问数据库时的错误信息。3 系统分析和设计3.1 需求分析由于企业均以文件发布、收集，工作报告，信息档案等为主要信息传递方式。通过对现代企业信息传递的调查，发现有相当一部分中、小型企业仍以传统的通过纸张为媒介的方式来传递信息。尽管各个企业单位部门的业务和职能各不相同，管理方法不同，且企业内部的具体需求也存在差异，但经与各管理人员交流后，他们都认识到应该具备，且必须具备与企业发展相适应的网络信息传递方法的必要性。比如，提交工作报告，它能使企业各个部门实现信息资料互通,在不同的地方把自己的工作计划，工作总结等资料同时通过网络提交给管理人员，避免了以纸张交流信息的繁琐过程。这样才能提高工作效率，协调各项工作，促进建立和谐人际关际，使企业内部信息更加快捷流通。我们就提出一种新的信息传递方法，既能满足当前企业需要，操作简单，易于维护，且为二次开发提供了可扩充性。如何实现利用现代网络技术传递信息，成为解决问题的关键。企业网络信息传递一般流程为信息输入信息管理信息分类别管理信息输出。3.1.1 数据流图根据的数据流向，即可画出系统数据流图。如图3-1所示：系统管理员分 配 系 统账号和权限系统账号权限登录用户信息管理公告信息管理数据信息表管理员公告信息表信息输出留言信息管理留言信息表部门信息表部门信息管理文件 管理工作报告信息表用户修改信息用户信息表图3-1系统数据流图3.1.2 数据字典根据系统数据流图可以给出相关处理信息的数据字典，以便查询数据流图中的数据项。下面指出了查看用户信息的数据字典如表3-1。表3-1查看用户信息的数据字典数 据 项系统名：企业公告及资料发布系统 编号：I001 名称：查看用户信息 别名：数据项值： 类型：文本型 长度：100个字节 取值范围：简述： 如果是本企业内部，管理员登陆可添加、删除、修改。修改记录：编写日期审核日期3.1.3 功能需求一般情况下，企业内的信息涉及到企业的机密，在企业信息利用网络传递信息过程中，首先应确保整个交流过程的安全性，即需要一个专门的验证用户的合法性，防止非法用户侵入，实行权限控制、存储和传输加密以及电子签名，这样来保证的安全性。安全性控制这个先决性条件解决后，企业对内、对外的信息传递才能更好地实现。比如：公告发布和提交工作报告。对于公告发布企业管理人员能及时向外部发布产品、人才供求信息，以取得更多的商机和更多的优秀人才，实现网络信息服务的远程交流，并在企业内部对各级部门职工发布管理信息及近期部门的工作安排，重大会议及活动。对于提交工作报告即文件资料上传，文件资料上传是企业信息化中一个非常重要的功能之一,它能使企业各个部门实现信息资料互通,在不同的地方把企业需要的通知、公告、文件、档案等资料同时上传到一个服务器上，每个部门不需要人为的到别的部门提取资料，而在网上就能通过对方上传的文件进行下载，对企业内远程工作来说，只要把处理好的文档资料，通过WEB服务器实现及时上传，也同样可以共享信息资料，了解企业内部当前的工作进度与状况。而不是传统意义上的先在客户或办事点整理好文档后再回到公司交绐相关部门，最后再与客户进行联系，这样既增加了企业成本开销和负但，也大大提高了工作效率。3.1.4 业务流程通过以上的数据流图的数据流向分析和简单的功能需求分析，我们可以得到实现该系统的业务流程。本系统采用基于数据库的动态信息发布技术，可以实现企业发布最新消息，个人提交工作报告，实现管理员及用户分级化的管理，以确保企业信息的安全性。企业公告及资料发布贯穿于企业信息传递的整个过程，在这个过程中，各项业务都有自己的操作流程。企业的用户主要有管理员、企业员工、访客，他们以不同的身份登录系统，会分配到不同的权限。以管理员身份登录系统之后，可以发布企业新闻，维护员工的基本信息，维护企业运转基本信息，维护业务的安排，维护企业待解决问题提议方案，对企业的用户进行管理，创建企业员工的登录账号，修改用户密码；对企业的部门、用户提交的工作报告、公告信息、管理员、留言薄进行管理。只有管理员赋于了企业员工的登录账号和基本信息、任职安排之后，员工才能正常登录系统，进行用户权限的操作。在管理员创建了员工的登录账号之后，员工可以根据管理员设定的账号、密码登录，成功登录后可以对自己的个人信息进行修改，可以查看企业通知，同时查看自己任职的信息，工作安排，提交个人工作报告等，并可以通过留言板提出对企业的意见和建议，以促进企业以人为本的和谐发展。3.2 总体设计3.2.1 软件的运行环境设计为了保证系统运行的效率和可靠性，服务器端应具有较高软硬件配置，客户端的要求不需要很高。此应用程序可广泛运行于Internet，也适用于内部的局域网。运行配置要求如表3-2：表3-2运行配置要求最低配置建议配置CPU:Pentium 3 600CPU:Pentium 4 2.0 G以上内存128MB内存:512 MB或更多56KB拨号网络宽带网络显示分辨率: 800 X 600显示分辨率:1024 X 768IE 5.0以上IE 6.0、7.0或更高Windows98Windows2000、XP或以上3.2.2 系统模块设计根据功能需求分析和业务流程分析，对系统各功能进行集中、分块，按照结构化程序设计的要求，本系统的系统功能模块图如图3-2所示：企业公告及资料上传系统登录修改个人信息用户管理提交工作报告查看公告留 言管理员管理公告信息管理管理员信息管理部门管理提交报告管理用户信息管理修改初始密码修改个人其它信息留言薄管理添加首页公告修改、删除公告下载、删除报告报告分级管理添加、删除用户查询用户添加、修改部门添加、删除管理员添加、删除留言回复留言图3-2 企业公告及资料发布系统功能模块示意图3.2.3 系统的流程分析整个系统流程设计是根据系统从初始录入数据阶段到对其它功能模块进行操作时的流程，如图3-3系统流程图：否是用户管理员N身份判断？登录处理职工信息处理管理员信息处理公告信息处理报告信息管理员信息管理提交报告管理公告信息管理职工 信息管理改是否继续结束修改个人信息下载资料提交工作报告查看公告否是其它信息修改初始密码修改是否继续结束部门信息管理管理员信息管理Y处理部门信息图3-3 系统流程图3.3 概念结构设计针对以上对系统的需求分析，为了更好地对系统的总体要求及各权限用户的有更加明确的方向，现将系统ER图表述如图34：用户留言簿管理添加修改用户信息反馈管理员N1111部门公告信息留言簿NNNN图3-4系统ER图系统ER图的各实体的属性如下：用户信息(如图3-5)：编号，姓名，密码，所在部门，电话，电子邮件， 地址文件信息(如图3-6)：文件号，文件名，文件内容，发送时间，文件类型，所属部门，主题，路径公告信息(如图3-7)：编号，公告标题，内容，发送时间管理员信息(如图3-8)：编号，密码，姓名留言薄信息(如图3-9)：编号，标题，留言者姓名，内容，留言时间部门信息(如图3-10)：部门名，负责人，联系方式根据各实体的属性，得到各实体的数据表关系图如下：用户信息表关系图： 用户姓名编号密码性别所在部门电话电子邮件地址图3-5用户信息文件信息表关系图：文件信息文件号文件名文件类型文件内容发送时间图3-6文件信息公告信息表关系图：公告信息文件类型发送时间文件内容公告名图3-7公告信息管理员信息关系图：管理员信息编号密码姓名图3-8管理员信息留言薄信息关系图：留言薄信息编号留言者姓名内容留言时间标题图3-9留言薄信息部门信息表关系图：部门信息部门名负责人联系方式图3-10部门信息3.4 数据库逻辑结构设计通过需求分析和E-R图的关系模型结构分析以后，需要将数据库概念结构转化为SQL Server 2000数据库系统所支持的实际数据模型，也就是数据库的逻辑结构。在实体以及实体之间关系的基础上，形成数据库中的表格以及各个表格之间的关系。企业公告及资料上传系统数据库中共有六张表：用户信息表如表3-3、管理员信息表如表3-4、上传文件信息表如表3-5、公告发布信息表如表3-6、留言薄如表3-7、部门信息表如表3-8。下面分别介绍这些表的物理结构：表3-3用户信息表(Userinforma)字段名描述类型长度是否充许为空主键User_name用户名char8否是Psw密码char10否否business职务char10否否department工作部门char10否否address用户住址nvarchar50是否phone用户联系电话char10是否表3-4管理员信息表(addminforma) 字段名描述类型长度是否充许为空主键name管理员名char8否是Psw密码char10否否表3-5上传文件信息表(doc_informa)字段名描述类型长度是否充许为空主键Doc_name上传文件名nvarchar50否是dep上传文件的部门nvarchar50否否context上传文件说明char100否否subject上传文件主题nvchar50是否Doc_size上传文件的长度binary50是否Doc_type上传文件类型nvchar50是否path上传文件的路径nvarchar50是否表3-6公告信息表(gginforma) 字段名描述类型长度是否充许为空主键id公告号int2否是title公告标题nvarchar50否否context公告内容nvarchar50否否time发送公告时间datetime8否否表3-7留言薄(message) 字段名描述类型长度是否充许为空主键id留言号数int4否是User_name留言者姓名char10否否title留言标题char50否否User_text留言内容char100否否User_time留言时间datatime8否否表3-8部门信息表(dep)字段名描述类型长度是否充许为空主键bm部门名char10否否jl负责人nchar10是否phone联系方式char11是否4 系统详细设计和实现4.1 详细设计4.1.1 用户、管理员登陆模块在企业公告及资料（公文）发布系统中，用户及管理员登陆模块用来验证用户的合法性，防止非法用户侵入、权限控制、存储和传输加密以及电子签名，以确保系统的安全性。一般情况下，企业内所处理的信息涉及企业的机密，而且不同的办公人员对办公信息的处理权限也是不同的，因此，安全性控制功能应该是系统得以投入使用的先决条件。其具体实现流程图如图4-1：用户管理员N身份判断？登录NY用户管理员用户权限操作管理员权限操作是否继续是否继续YY结束NNY图4-1登陆模块流程图4.1.2 公告发布模块了解到市场及企业的需要，系统管理员及时向外部发布产品、人才供求信息，以取得更多的商机和更多的优秀人才。实现网络信息服务的远程交流。系统管理员在企业内部发布重要通知或公告。各级部门职工管理信息的发布及近期部门的工作安排，重大会议及活动。单位内部职员通过点击查看企业内部所发部的紧急通知，会议通知等消息。查看的内容包括公告主题、公告发布人、公告发布时间、公告内容等详细内容，满足企业内部信息交流。其具体实现流程图如图4-2：管理员是否操作公告发布添加公告修改公告是否继续结束NY删除公告Y用户查看公告信息是否继续NY图4-2公告模块流程图4.1.3 提交工作报告模块提交工作报告即文件上传。文件上传是企业信息化中一个非常重要的功能之一,它能使企业各个部门实现信息资料互通,在不同的地方把企业需要的通知、公告、文件、档案等资料同时上传到一个服务器上，每个部门不需要人为的到别的部门提取资料，而在网上就能通过对方上传的文件进行下载，另外还对上传和下载实现编号、权限和分类管理即分部门管理，使用文件共享更加安全合理。文件上传下载实现的不仅仅是资料意义上的共享，还可以有效降低企业成本、提高效率。该软件是基于B/S结构模式开发的，任何能连入Internet网络的计算机都能登录该系统，在异地或外地，甚至与公司间相隔千里办公，只要把处理好的文档资料，通过WEB服务器实现既时上传，也一样可以共享信息资料，让企业内部当前的工作进度与状况。而不是传统意义上的先在客户或办事点整里好文档后再回到公司交给相关部门，最后在与客户进行联系，这样既增加了企业成本开销和负担，也大大降低了工作效率。而且上传的格式文件除支持.doc文件外，还支持其它多种格式，比如上传视频文件、音乐文件、工具软件等，都是可以根据实际需要而进行的。总的来说，文件上传就是一个实现资源共享，提高企业信息化的有效途径。其具体实现流程图如图4-3：是否操作提交工作报告Y用户提交到部门下载资料删除报告下载报告上传报告管理员Y管理员用户是否继续YYN结束N图4-3提交工作报告流程图4.1.4 修改个人信息此模块部分用来确保用户信息的安全，登陆用户可修改自已的个人信息资料，如电话号码，登录密码等。4.1.5 系统管理模块对于任何一个管理系统来说，系统管理部分是整个系统的核心操作部分。当然对于企业公告及资料（公文）发布系统也是如此。系统管理的好与否决定着整个系统的是否稳定。那么，对于企业公告及资料（公文）发布系统的系统管理模块部分应做好如下的管理工作：（1）公告信息管理公告信息管理是管理员对首面公告信息的修改、删除、更新的操作。管理员可以通过从数据库的公告信息表中提取出数据，将公告信息发布到首页，以便企业中职员及部门能及时看到，以免错过紧急事务。（2）用户信息管理系统管理员能够查询在职用户，添加新增用户的信息、删除离职人员的信息、更新在职人员需修改的相关信息，同时关赋予用户所具有的操作权限。（3）部门信息管理部门是企业生存的一个载体。系统管理员对部门有添加、修改、删除的管理功能，同时能够对部门发送资料（公文），并对部门所上传的资料（公文）能做相应的回复的。（4）文件信息管理系统管理员文件具有添加、修改、删除的操作的权限。并同时各部门的文件进行分类的管理。以致确保各部门的资料信息准确性和安全性，管理员能够将各个不同部门上传及所能下载到的资料（公文）分类分别存放到各个部门的文件夹当中。其具体实现流程图如图4-4：是否操作系统管理公告信息管理用户信息管理部门信息管理管理员管理报告信息管理管理员是否继续YN结束图4-4系统管理模块流程图4.2 系统实现4.2.1 系统主界面的实现通过以上详细的需求分析，及各模块的设计要求，现将各部分功能的相关界面截图及实现代码进行详细说明。系统主界面截图如图4-5：图45系统主界面4.2.2 ASP访问数据库实现对于动态系统的实现，ASP访问数据库的一个关键技术是ADO技术，主要的操作就是对数据库中数据的操作，在对数据的操作之前必前先与数据库建立连接。 4.2.3 登录模块实现 用户登陆(ulandok.asp)用户登录时采用的身份验证算法如图4-6所示：跳转到用户页面输入用户名和密码及验证码两者是否为空两者是否正确用户信息数据库密码错误或者无此用户两者均不能为空是否否是否图46用户身份验证其实现代码：while not rs.eof user=trim(Request.form(username) 获取用户名password=trim(Request.form(password) 获取密码if (trim(rs(name)=user and password=trim(rs(password) then 判断输入的用户名与密码是否正确session(name)=rs(name)response.redirect fram.asp 登陆成功跳转至fram.aspelsers.movenextend ifwend response.Write输入错误，请重新输入！4.2.4 用户管理模块的实现添加用户(adduserdb.asp) -接受数据- user_name=trim(Request.Form(username) 用户名pwd=trim(request.Form(password1) 密码okpwd=trim(request.Form(password2) 确认密码business=trim(request.Form(business) 职务department=trim(request.Form(department) 所属部门E_mail=trim(request.Form(Email) 电子邮件phone=trim(request.Form(phone) 联系电话address=trim(request.Form(place) 住址if E_mail= thenE_mail=未知end if在添加新用户的信息时，如果是这几种信息未加入时，则添加成功的页面中这一条用户信息显示为“未知”。if phone= thenphone=未知end ifif place= thenplace=未知end ifif user_name= or pwd= or okpwd= or business= or department= then Response.writealert(信息输入不完整,请重新输入! );location.href=adduser.asp;elseif pwd=okpwd then判断在添加用户时输入的密码与确认密码是否一致，如果一致则将新输入的用户信息插入到用户信息表（userinforma）中,否则不能添加。conn.execute(insert into userinforma values(&user_name&,&pwd&,&business&,&department&,&E_mail&,&phone&,&address&)elseResponse.writealert(两次密码输入不一致,请重新输入! );location.href=user.asp;end ifend if%修改用户信息(modifyuser.asp)在企业中为了能确保用户个人信息的安全性及准确性，用户有权更改自己的个人信息。if pwd1=pwd2 then判断在用户在修改个人的资料信息时输入的密码与确认密码是否一致，如果一致则将允许用户修改个人的资料信息,否则不能修改。set rst=server.CreateObject(adodb.recordset)rst.open update userinforma set pwd=&pwd1&,E_mail=&E_mail&,address=&address&,phone=&phone& where user_name=&user_name&,connset rst=nothingelseResponse.writealert(两次密码输入不一致,请重新输入! );location.href=modifyinformation.asp; end if删除用户信息sql=delete from userinforma where user_name=&user_name&conn.execute sql4.2.5 公告管理模块公告管理模块是实现首面公告信息的管理，当有新的公告由管理员添加到数据库时，首页的公告信息会自动更新，方便企业内部能及时获得公告消息。添加首页公告%rs.PageSize = 25rs.CursorLocation = 3 记录下载到浏览器端rs.open sql,conn, 2,2pre = truelast = truepage = trim(Request.QueryString(page)if len(page) = 0 thenintpage = 1pre = falseelseif cint(page) = rs.PageCount then pagecount返回recordset对象的分页总数intpage = rs.PageCountlast = falseelseintpage = cint(page)end ifend ifend ifif not rs.eof thenrs.AbsolutePage = intpage 当recordset对象有设置分页时，absolutepage会返回目前的页码end iffor i=1 to rs.PageSize 挡recordset对象内有设置分页时，pagesize为每页的记录条数if rs.EOF or rs.BOF then exit for% 第 28 页 共 28页修改首页公告代码：response.buffer=true 设置启用浏览器的缓冲处理Response.Expires=0 指定放入缓存区的网页的逾期时间为0title=request.form(title) 从表单中获取标题id=request.form(id) 从表单中获取编号context=request.form(neirong)rs.open select * from gginforma where id=&id& ,conn,3,2rs(title)=title 将表单中修改的值保存到数据记录中rs(context)=contextrs.update 删除公告:id=Request(id) 获取公告编号delsql=delete from gginforma where id=&id&conn.execute delsql4.2.6 文件管理模块保存上传文件(add_docok.asp)%set conn=server.createobject(adodb.connection)conn.connectionstring=dsn=xh;uid=xh;pwd=xhconn.opendim filepath 定义文件路径变量dim fileext 定义文件简介变量dim file_subject 定义文件主题变量dim sqldim msgdim errflag 定义出错标识dim errnumberdim savepath 定义文件保存路径变量dim maxfilesize 定义文件大小dim bmsavepath=savepath 虚拟路径（后面不加“/”）符号maxfilesize=5*1024 限制上传的文件为5MBerrflag=falsefilepath=savepath 使用虚拟路径进行赋值filepath=server.MapPath(filepath) 将虚拟路径转换为磁盘路径fileext=GetFromVal(fileext) 取得文件介绍errnumber=GetFromVal(errnumber)bm=GetFromVal(bm) 取得部门名errnumber=cint(errnumber)if len(trim(file_subject)=0 thenresponse.Write文件主题不能为空！response.Endend if if len(trim(fileext)=0 thenfileext=无简介！end ifupfilename=SaveFile(fruit,filepath,maxfilesize,errnumber,1) 保存并取得文件名select case trim(upfilename)case patherrormsg=错误：指定的路径不存在!errflag=truecase refilerrormsg=错误：文件不存在!errflag=truecase sizeerrormsg=错误：文件超出指定长度！errflag=truecase fileerrormsg=错误：被限制上传的文件格式errflag=truecase elsemsg=errflag=falseend selectif not errflag then 在上传文件没有错误情况下，把得到的文件信息保存到数据库中sql=insert into docinformation (doc_name,context,doc_size,dep,path)_values(sql=sql&(&file_subject&,&fileext&,&savepath&,&bm&,&persize&)conn.execute(sql)end if end if conn.closeset conn=nothingif errflag thenresponse.Write alert(&msg&);&vbcrlfend if response.Write( alert(您已经成功上传window.location=add_doc.asp;)%下载上传文件(download.asp)%sql=select * from doc_informationset rs=server.CreateO