专业:计算机科学与技术 作者:范仁锋 指导老师:向德生
摘 要:随着城镇人口居住的集中化加剧,传统人工小区管理模式逐渐跟不上时代的潮流。这就要求我们提供一个专门的管理系统,来提高物管的工作效率、为住户提供更好的服务。本系统是本系统共有住户资料管理、投诉管理、住户报修管理、物业缴费管理和住户停车车位管理等五大功能模块,住户资料管理模块实现了小区住户信息的详细记录以及住户信息的添加、删除和修改;投诉管理管理模块实现了住户投诉情况的记录和管理;住户报修管理模块实现了报修信息的记录和管理;物业缴费管理模块实现了住户缴费信息的记录和管理;住户停车车位管理模块实现了住户车位信息的记录和管理。本系统界面设计大方、简洁、实用,操作简单方便,是一款完全适合普通小区物业日常事务管理的软件。软件设计综合了具有一定代表性的多家物业管理公司的业务模式和需求。能实现房产、客户等小区的智能化管理,可以提高物业管理的效率。
关键词:物业管理;ASP技术;MSSQL数据库;Dreamweaver MX 2004
Realty management system based on ASP.NET
Major: Computer of Science and Technology Author: Renfeng Fan
Teacher : Desheng Xiang
Abstract : With the decentralization of urban population living increase, the traditional model of community management gradually failed to keep pace with the trend of the times. This requires that we provide a special management system, to improve the efficiency of property management for the tenants to provide better service. The system is the system total household data management, complaint management, to repair household management, property management and tenants pay parking spaces, and other management functions of five modules, household information management module has a detailed information area households and households recorded information to add, delete And amendments to the management of complaints management module achieved a record of complaints tenants and management; households reported repair management module has reported the repair records and information management; pay property management module has tenants pay records and information management; households parking spaces management Household parking spaces to achieve the module records and information management.The interface of the system is generous, practical, with simple operational method, and it is also a software complete suiting the common Property business management. It synthesizes the requirement and business mode of many property management company in designing precess. It can realize the management of house property, customer in a small area of inhabitancy. And increase the efficiency of the property management. Keywords: relty management;ASP Technology;MSSQL Database;Dreamweaver MX 2004
目 录
前 言 .............................................................. 错误!未定义书签。 1 概述 ..............................................................................
1.1 ASP技术综述 .............................................
1.1.1什
的
特
点
么
是
ASP
1.1.2ASP
的
六
1.1.3ASP
大内建对象
1.2 数据库SQL简介 ..........................................
1.2.1关
Sql server 2000
作为数据库的理由
于
sql2000
的
介
绍
1.2.2用
1.3 开发环境Dreamweaver MX 2004简介 ........................
2 需求分析 ..........................................................................
2.1 需求分析的目的 .......................................... 2.2 进行需求分析的意义 ..................... 错误!未定义书签。 2.3 总体设计 ................................................
2.3.1系
统
功
能
设
计
2.3.2系统流程图 本系统的数据流程图如图3所示:
- 7 -
2.4 模块功能设计 ............................................
2.4.1住
诉
管
理
户
信
息
管
理
2.4.2投
- 9 -
2.4.3报
修管理
2.4.4缴
户
费管理
2.4.5住
停车管理
2.4.6系
统设置
3 概要设计 ..........................................................................
3.1 数据库设计 ..............................................
3.1.1概
理
结
构
设
计
念
结
构
设
计
3.1.2物
3.2 数据库配置 ..............................................
4 详细设计 ..........................................................................
4.1 系统预览 ................................................ 4.2 具体模块实现 ............................................
4.2.1登
户
资
料
管
理
模
块
录
模
块
4.2.2住
4.2.3投
诉信息管理模块
4.2.4缴费管理模块、保修管理模块和停车管理模块
理
员
设
置
模
块
4.2.5管
5 系统测试 ..........................................................................
5.1 测试的概述 ..............................................
5.1.1测
试
的
特
性
试
的
概
念
和
意
义
5.1.2测
试
5.1.3测
的重要性和范围
5.2 系统测试 ................................................
结 束 语 ..............................................................................
致 谢 词 ........................................................................ - 42 -
前 言
随着人民生活水平不断提高,人们对生活环境要求日益提高,尤其是对居住环境不断提出新的需求,为了适应这种形式,小区的经营者不仅首先要有坚实的硬件基础,还要有一套现代化的物业管理系统。由于此时人们对信息和数据的利用与处理也已进入自动化、网络化和社会化的阶段,因此实现这一功能,就要求物业管理者配备一套高效的管理住处网络系统,以便在小区内快速地发布和获取住处并以最快地速度响应用户的需求,及时为用户提供服务,为住户提供一个高效、舒适的居住、生活环境。这对内来看,可以提高工作效率;对外来看,获得竞争优势。住宅小区的物业管理准确地讲应当是指对以居住为主要功用的物业进行管理。除住宅外还应包括公寓、别墅等。
本物业管理系统的开发,是为了规范住宅小区的管理工作,为物业管理部门提供一套高效、快捷的应用软件。适用于管理以下物业,房产业主、大中小型物业管理公司、物业服务提供商、房地产开发商、物业中介公司等物业管理企业,用来管理公寓、住宅群体、智能小区、商品房、多层住宅、商业大厦、学校、医院、别墅区、营房区、各类小区等。
使用计算机进行小区物业信息的处理,具有如下的优点 1.及时信息交流,改善服务质量
通过本系统对小区物管信息的规范管理,可以及时的掌握业主们的需求,并根据需求有针对性的改进业务,以提高服质量。
2. 方便查询,提高工作效率。
1 概述
1.1 ASP技术综述
1.1.1 什么是
ASP
Active Server Pages 即我们所称的ASP,其实是一套微软开发的服务器端脚本环境.。ASP的含义从字面上说,包含三个方面的含义:
Active:ASP使用了Microsoft的ActiveX技术。ActiveX(COM)技 术是现在Microsoft软件的重要基础。它采用封装对象,程序调用对象的技术,简化编程,加强程序间合作。ASP本身封装了一些基本组件和常用组件,有很多公司也开发了很多实用组件。只要你可以在服务器上安装这些组件,通过访问组件,你就可以快速、简易地建立自己的WEB应用。 Server:ASP运行在服务器端。这样就不必担心浏览器是否支持ASP所使用的编程语言。ASP的编程语言可以是VBSCRIPT
和JSCRIPT。VBSCRIPT是VB的一个简集,会VB的人可以很方便的快速上手。然而Netscape浏览器不支持客户端的VBSCRIPT,所以最好不要在客户端使用VBSCRIPT。而在服务器端,则无需考虑浏览器的支持问题。Netscape浏览器也可以正常显示ASP页面。
Pages:ASP返回标准的HTML页面,可以正常地在常用的浏览器中显示。浏览者查看页面源文件时,看到的是ASP生成的HTML代码,而不是ASP程序代码。这样就可以防止别人抄袭程序。
1.1.2 ASP的特点
使用 VBScript 、JScript 等简单易懂的脚本语言,结合 HTML 代码,即可快速地完成网站的应用程序。
无须 compile 编译,容易编写,可在服务器端直接执行。 使用普通的文本编辑器,如 Windows 的记事本,即可进行编辑设计。
与浏览器无关 (Browser Independence), 用户端只要使用可执行 HTML 码的浏览器,即可浏览 Active Server Pages 所设计的网页内容。 Active Server Pages 所使用的脚本语言 (VBScript 、Jscript)均在 WEB 服务器端执行,用户端的浏览器不需要能够执行这些脚本语言。
Active Server Pages 能与任何 ActiveX scripting 语言相容。除了可使用 VBScript 或JScript 语言来设计外,还通过 plug-in 的方式,使用由第三方所提供的其他脚本语言,譬如 REXX 、Perl 、Tcl 等。脚本引擎是处理脚本程序的 COM(Component Object Model) 物件。 可使用服务器端的脚本来产生客户端的脚本。
ActiveX Server Components(ActiveX 服务器元件 ) 具有无限可扩充性。可以使用 Visual Basic 、Java 、Visual C++ 、COBOL等编程语言来编写你所需要的 ActiveX Server Component 。
1.1.3 ASP的六大内建对象
ASP提供了6个功能强大的内部对象,每个对象具有各自的属性(Property)、方法(Method),有的还拥有数据集合(Collection)与事件(Event),它们共同完成Web中的一些重要工作。这6个对象分别是:
Request对象:Request对象可以保存Client端送往Server端的所有信息。这些信息包括:使用Get或Post方法传递的数据、Server环境变量、Cookie信息等。在没有指定表单集合的情况下,程序将以QueryString、Form、Cookie、ServerVariable的顺序搜索所有集合,寻找指定变量。 Response对象:Response对象的主要功能是将信息从Server端传送到Client端。也可以用来实现页面的跳转或Cookie值的设定。由于ASP脚本没有输出“值“的功能,要完成此功能必须使用Response对象。
Server对象:Server对象的主要功能是执行与Web服务器直接相关的一些操作。
Session对象:Session对象能够记录用户每一次上线的个人信息,它相当于每个上线用户的私有变量集合。它随着用户的上线而产生,随着用户的下线或强制解除而终止。
Application对象:Application对象能记录所有Web用户的共有信息,它相当于所有上线用户的公共变量集合。它伴随着Web应用程序的开始运行而产生,随着Web应用程序的运行结束而终止。
Objectcontext对象:Objectcontext对象主要在进行交易处理时使用,利用该对象可以管理、控制这些交易
1.2 数据库SQL简介
随着科学技术的进步,信息已成为各行各业的重要资源。数据库以其强大的操作和管理功能成为高速信息表达的途经。据我所知,数据库的类
型
有
很
多
,
比
如:”sqlserver”,”vf”,”framework”,”access”,”Oracle””MySQL””SYBASE””DB2”等等,然而本软件选择了用SQL Server2000来作为数据库软件。
1.2.1 关于sql2000的介绍
Microsoft SQL Server2000是由 Microsoft公司开发的,在Microsoft SQL Server的发展历程中,有两版本具有重要的意义。那就是在1996年推出的SQL Server6.5和在2000年8月推出的SQL Server2000版本。6.5版本使SQL Server得到了广泛的应用,而2000版本在功能和易用性上有很大的增强,并推出了简体中文版,它包括企业版,标准版,开发版和个人版4个版本。 Microsoft SQL Server2000(简称SQL Server)由一系列相互协作的组件构成,能满足最大的Web站点和企业数据处理系统存储和分析数据的需求。
1.2.2 用Sql server 2000作为数据库的理由
SQLServer2000能够满足今天的商业环境要求不同类型的数据库解决方案。它一种应用广泛的数据库管理系统,具有许
多显著的优点:易用性、适合分布式组织的可伸缩性、用于决策支持的数据仓库功能、与许多其他服务器软件紧密关联的集成性、良好的性价比等。性能、可伸缩性及可靠性是基本要求,而进入市场时间也非常关键。除这些核心企业品质外,SQLServer2000还为数据管理与分析带来了灵活性,允许单位在快速变化的环境中从容响应,从而获得竞争优势。从数据管理和分析角度看,将原始数据转化为商业智能和充分利用Web带来的机会非常重要。作为一个完备的数据库和数据分析包,SQLServer2000为快速开发新一代企业级商业应用程序、为企业赢得核心竞争优势打开了胜利之门。作为重要的基准测试可伸缩性和速度奖的记录保持者,SQLServer2000是一个具备完全Web支持的数据库产品,提供了对可扩展标记语言(XML)的核心支持以及在Internet上和防火墙外进行查询的能力。
1.3 开发环境Dreamweaver MX 2004简介
Dreamweaver MX是一款专业的HTML编辑器,用于对Web站点、Web页和Web应用程序进行设计、编码和开发。无论直接编写HTML代码的驾驭感还是偏爱在可视化编辑环境中工作,Dreamweaver都会提供帮助良多的工具,丰富Web创作体验。
利用Dreamweaver中的可视化编辑功能,可以快速地创建页面而无需编写任何代码。不过,如果喜欢用手工直接编码,Dreamweaver还包括许多与编码相关的工具和功能。并且,借助Dreamweaver,还可以使用服务器语言(例如ASP、ASP.NET、ColdFusion标记语言(CFML)、JSP和PHP)生成支持动态数据库的Web应用程序。
使用Dreamweaver也可以制作出整个网站,只是Dreamweaver本身不适合处理图片,需要Photoshop或者Fireworks的配合。使用Dreamweaver制作静态站点的流程:新建站点→站点文件命名→定义页面属性→插入表格→定义页面大小→转换到布局视图→添加内容→插入导航条→转换到标准视图工作→添加链接→使用代码片断→定义及应用CSS→添加动态交互→链接站点各个页面。
2 需求分析
2.1 需求分析的目的
软件需求说明书的编制是为了使用户和软件开发者双方对软件的初始规定有一个共同的理解,使之成为整个系统开发工作的基础。主要是明确说明系统需求,界定系统实现功能的范围,指导系统设计以及编码。
本说明书的预期读者为:
(1)客户单位和用户:使他们了解想要获得什么样的功能和性能的软件;
(2)软件开发者:使他们理解用户的需求和用户需要什么样的软件;
(3)软件的验收人员:提供一个比合同更切合实际的验收依据。
2.2 进行需求分析的意义
(1)本节将对用户信息管理的业务、对系统要实现的主要功能、性能等需求进行全面地阐述,以便帮助用户判断所要开发的软件是否符合他们的要求。该节将在软件开发目标和需求方面为用户和开发者之间创建一个共同的基础和共识。
(2)由于需求分析要有用户的审核、修改完善、认定的过程,在这个过程中可以使用户在软件设计之前广泛地征求各业务部门的意见、提出有关系统建设的建议、对自己的需求和要求进行周密地思考,并要把这些意见和建议反映到用户需求分析中。这样就能减少事后重新设计、重新编码和重新测试的返工行为。
(3)用户需求的调查分析过程也是用户对自己的业务和管理进行总结和规范的过程,通过用户需求分析把用户更加规范的管理反映到了
软件开发中,从而使用户的管理更加完善和规范。
(4)需求分析是开发者进行软件设计的依据,软件设计要依据需求分析将进行系统分析、数据库设计、模块设计、接口设计、输入输出格式设计等。
(5)需求分析使开发者在软件进行设计和开发之前,能够充分了解和熟悉用户的要求,并判断这些要求是否有不能解决的技术问题,若有应提出一个用户认可的代替解决方案。以免出现设计出的一个目标不能在开发过程中实现的问题
(6)在需求调查和分析期间可以搜集有关系统开发的有关原始数据和代码,以便在系统开发中建立开发环境时应用
(7)在软件开发方面为用户和开发者提供一个标准,为系统开发结束进行确认和验收提供一个双方认可的依据。
(8)便于软件的维护和提高,为软件维护和为今后对所开发的软件进行完善扩充提供进一步分析的基础。
总之,用户需求分析的编写是软件工程中的非常关键的一个环节,用户需求分析也是软件工程中的非常重要的一个文档。一个好的用户需求分析不但能够提高软件开发的效率、保障软件开发的质量,而且有利于系统的验收和以后软件的维护及扩充。
2.3 总体设计
2.3.1 系统功能设计
根据系统功能的要求,小区物业系统分为五个主要模块。即住户资
料管理、投诉管理、住户报修管理、物业缴费管理、住户停车
车位管理。可以将系统分解成为几个功能模块来分别设计,功能模块间
的关系如图1所示。
根据系统功能的要求,小区物业系统分为五个主要模块。即住户资
料管理、投诉管理、住户报修管理、物业缴费管理、住户停车车位管理。可以将系统分解成为几个功能模块来分别设计,功能模块
间的关系如图1所示。
住户资料投诉管理 登录页面 报修管理 缴费管理 住户停车
图1
对于小区物业系统,根据系统功能分析,仅有一个单一的流程化页面。所以 从欢迎页面到登录页面,如果登录成功,则进入相应的功能页
整个系统的页面逻辑图如图2所示:
登陆页面(login
住户资料管理页面投诉管理页面(tousu.asp)报修管理页面缴费管理页面(money.asp) 住户停车管理页面 图2
2.3.2 系统流程图
2.3.3 本系统的数据流程图如图3所示:
管理员信登录模块 主控制模住户资料投诉管理 保修管理 缴费管理 住户停车
图 3
2.4 模块功能设计
本系统功能模块包括住户信息管理、投诉管理、报修管理、缴费管理、住户停车管理和系统设置。
2.4.1 住户信息管理
用于管理小区住户的详细信息。可以对住户信息进行添加、删除和修改。住户的信息主要包括住户名称、联系电话、楼宇名称、楼层、房屋号、单元、迁入日期、房型和备注。
2.4.2 投诉管理
用于管理住户对其所在小区提出的投诉,管理员可以根据具体情况对住户的投诉信息进行添加、删除和修改。住户投诉信息主要包括:投诉住户、接待人员、投诉内容、处理人员、投诉日期和处理情况。
2.4.3 报修管理
用于处理住户提出的修理要求,管理员可以根据实际情况对修理信息进行添加、删除和修改。住户的报修信息主要包括:单据编号、住户名称(即要被维修的住户)、维修人员、维修日期、物料费用、服务费用和报修内容。
2.4.4 缴费管理
用于管理住户的缴费情况,管理员可以对其进行添加、删除和修改。住户的缴费信息主要包括:单据编号、住户名称、缴费日期、收费人员、缴费方式、缴费总额和备注。
2.4.5 住户停车管理
用于对小区住户停车的车位进行管理,管理员主要是对车位的使用进行记录,可以对信息执行添加、删除和修改功能。住户停车信息主要包括:车位编号、住户名称、使用日期和备注。
2.4.6 系统设置
这个模块主要用于管理员修改密码。
3 概要设计
3.1 数据库设计
数据库设计是要在一个给定的应用环境(DBMS)中,通过合理的逻辑设计和有效的物理设计,构造较优的数据库模式、子模式,建立数据库和设计应用程序,满足用户的各种信息需求。 3.1.1 概念结构设计
在数据库设计中,先要对系统分析所得的数据字典中的数据存储进行分析,然后得出系统的关系模式,可以采用实体——联系图(简称E——R图)的方法进行数据结构的描述。E——R图由实体、属性、联系三部分组成。E——R图的有关符号说明如下:
实体 属联
下面列出本系统的E-R图:
住户信息 缴费信息 报修信息 投诉信息实体 实体间的联系如下: 车位信息 单据编号 楼宇名称 编号 户主名称 缴费日期 单据编号 缴费方式 缴费方式 缴费总额 投诉信3.1.2 物理结构设计 报修信维修人员 收费信维修人员 物料费用 服务费用 单据编号 首先在SQL Server 2000中创建一个数据库,命名为wygl。根据上面的分n 处理情况 备注 n 投诉内容 接待人员 处理人员 析,可以建该数据库中的基本信息表。其中基本信息表如下所示。 车位记录 记录 记录 使用日住户表1 本系统所用到的基本信息表及用途 1 1表名 用途 住户信Admin baseinfo 管理员信息表 房屋号 迁入日期 1 使用 1 车位信住户信息表 缴费信息表 住户停车管理信息表 日money park repai
tousu
保修管理信息表 投诉信息表
管理员信息表(Amin)如表2
表2 管理员信息表
名称
Id Username Pwd level
数据类型
int nvarchar nvarchar int
作用
编号(主键) 管理员用户名 管理员密码 权限
住户信息管理表(baseinfo)如表3
表3 住户信息表
名称 Id Hostname Tel
BuildingName HouseNum Floor Apartment indate roomtype Remark
数据类型 Int nvarchar nvarchar nvarchar nvarchar nvarchar nvarchar datetime nvarchar ntext
作用 住户编号 住户名称 联系电话 楼宇名称 房屋号 楼层 单元 迁入日期 房型 备注
住户缴费信息表(money)如表4
表4 缴费信息表
名称
id BillNum Hostname
数据类型
int varchar varchar
作用
编号(主键) 单据编号 住户名称
PayDate Person PayManner TotalAmount Remark
datetime varchar varchar varchar ntext
缴费日期 收费人员 缴费方式 缴费总额 备注
住户停车管理信息表(park)如表5
表5 停车信息表
名称
id CarportNum HostName UseDate Remark
数据类型
int ncarchar nvarchar datetime ntext
作用
编号(主键) 车位编号 户主名称 使用日期 备注
保修管理信息表(repair)如表6
表6 保修信息表
名称
id BillNum HostName ServicePerson ServiceDate ServiceFare MaterielFare Total Remark
数据类型
int nvarchar nvarchar nvarchar datetine int int int ntext
作用
编号(主键) 单据编号 户主名称 维修人员 报修日期 服务费用 物料费用 费用合计 报修内容
住户投诉管理信息表(tousu)如表7
表7 投诉信息表
名称
id
数据类型
int
作用
编号(主键)
TSnum TSname Receiver TScontent Processor TSdate Remark
nvarchar nvarchar nvarchar nvarchar ntext datatime ntext
投诉编号 投诉住户 接待人员 投诉内容 处理人员 投诉日期 处理情况
3.2 数据库配置 代码如下: class database
public conn,db,connstr public sub loaddata() connstr=\"driver={sql
server};server=127.0.0.1;database=wygl;uid=sa;pwd=sa;\" end sub
public sub connect() set
conn=server.createobject(\"adodb.connection\") conn.open connstr end sub
public function execute(sql)
set rs=server.createobject(\"adodb.recordset\") if isobject(conn)=false then connect()
rs.open sql,conn,1,3 else
rs.open sql,conn,1,3 end if
set execute=rs end function
public sub disconnect() conn.close set conn=nothing end sub end class
set data=new database data.loaddata
4 详细设计
4.1 系统预览
本节将给出本系统的几个主要功能界面。管理员在登录系统时首先进入的是登录界面,如图4-1所示。在该页面管理员需要输入账号、密码以及认证码才能登录,。当输入的账号、密码和认证码不正确或为空时,则跳转到错误提示界面并提示返回,如图4-2所示。如果登录成则跳转至主功能页面,如图4-3所示。
图4-1 用户登录界面 图4-2 登录错误提示界面
图4-3 主功能界面
在该页的左边有两个链接和六个下拉菜单。点击“管理员首页”链接可以返回图4-3的主功能界面(也可以点击右上角的“返回首页”来实现),“退出”链接可以退出系统返回登录界面。
六个下拉菜单分别是“基本设置”、“住户资料管理”、“投诉管理”、“保修管理”、“缴费管理”和“停车车位管理”。
点击下拉菜单“基本设置”,显示“修改密码”功能,单击此功能可以在右边显示修改密码的具体信息(如图4-4)。提交修改信息后将跳转至“错误信息界面”(图4-5)或“成功信息”(4-6)界面,提示放回上一页。
图4-4 管理员密码修改界面 图4-5 错误信息界面 图4-6 成功信息界面
点击“住户资料管理“菜单显示”住户添加“和”住户管理“两个功能模块。单击”住户添加“可以添加住户(图4-7),输入信息后点击”提交“可跳转至”成功信息界面“或”错误信息界面“,然后点击”返回上一页 “继续添加住户或填写正确的住户信息。单击“管理住户”在右边显示住户管理界面(4-8),该页面显示的是住户的一些主要信息供查找,单击这些信息中的“住户名称”将跳转至住户信息修改界面(图4-9)修改住户信息,提交后同样会显示成功信息界面或错误信息界面。 另外,点击住户主要信息行末的“删除”可以删除用户,会弹出确认删除界面(图4-10)。
图4-7 添加住户界面 图4-8 管理住户界面 图4-9 住户信息修改界面 图4-10 住户删除界面
“投诉添加”添加投诉信息(图4-11),同样在提交后显示成功信息或错误信息
图4-11 投诉添加
点击“投诉管理”可以查看投诉信息,同样可以修改和删除投诉信息如图4-12、4-13和4-14所示
图4-12 投诉信息管理“ 图4-12 投诉信息修改 图4-13 投诉信息删除
如果管理员要添加报修信息则点击“报修添加”添加,如图4-14。点击“报修管理”可以查看、修改和删除报修信息,如图4-15、4-16和4-17所示。
图4-14 报修信息添加 图4-15 报修信息管理 图1-16 保修信息修改 图4-17 报修信息删除
点击“缴费添加”可以让管理员添加缴费信息,如图4-18.点击“缴费管理”可以查看已有的缴费信息,同样管理员可以删除缴费信息和点
击“住户名称”修改信息,如图4-19、4-20和4-21.
图4-18 住户缴费信息添加 图4-19 缴费信息管理 图4-20 缴费信息修改 图4-21 缴费信息删除
管理员点击“住户停车管理”中的“添加”添加住户停车信息,如图4-22.点击“管理”查看停车信息,如图4-23。同样管理员可以修改和删除住户停车信息,如图4-24和4-25.
图4-22 住户停车信息添加 图4-23 住户停车信息管理 图4-24 住户停车信息修改 图4-25 住户停车信息删除
4.2 具体模块实现
4.2.1 登录模块
建立页面login.asp,在Dreamweaver中设计好登录界面。在管理员输入账号和密码后首先要核对用户名、密码和认证码。代码为:
data.admin()
if request.querystring(\"action\")=\"chk\" then
call chk()
end if
if request.querystring(\"action\")=\"\" then
if data.isadmin then
response.redirect(\"index.asp\")
response.end()
else
call login()
end if
end if sub login() dim ados,getcode
set ados=server.createobject(\"adodb.stream\") if err then
getcode=9999
end if end sub sub chk()
dim username,password,code
username=trim(request.form(\"username\")) password=trim(request.form(\"password\")) code=trim(request.form(\"code\")) if code=\"\" then
errmsg=\"
response.redirect(\"show.asp?action=adminerr&errmsg=\"&errmsg&\"\") exit sub
elseif session(\"getcode\")=\"\" then
errmsg=\"
elseif cstr(session(\"getcode\"))<>cstr(trim(code)) then
errmsg=\"
end if
session(\"getcode\")=\"\"
if username=\"\" or password=\"\" then
errmsg=\"
response.redirect(\"show.asp?action=adminerr&errmsg=\"&errmsg&\"\")
exit sub
end if dim rs
password = md5(password)
set rs = data.execute(\"select * from admin where username='\"&username&\"'\") if rs.eof and rs.bof then
errmsg=\"
输入
您的用户名。\"response.redirect(\"show.asp?action=adminerr&errmsg=\"&errmsg&\"\") exit sub
else
response.write(password&\" \"&rs(1))
if password=rs(2) then
session(\"isadmin\")=1
session(\"admin_name\")=username session(\"level\")=rs(3) if rs(3)=0 then
session(\"admin_type\")=\"管理员\"
end if
response.redirect(\"index.asp\")
else
errmsg=\"
重新输入
您的密码。\"response.redirect(\"show.asp?action=adminerr&errmsg=\"&errmsg&\"\") exit sub
end if
end if rs.close end sub
4.2.2 住户资料管理模块
该模块对住户资料进行添加、修改、显示和删除。主要代码为: select case request.querystring(\"action\")
case \"save\" call saveset() case \"add\" call add() case \"admin\" call admin() case \"edit\" call edit() case \"saveedit\" call saveedit() case \"del\" call del() case else call add() end select footer() sub saveset() data.chkadmin(0) dim
hostname,buildingname,floor,housenum,apartment,tel,remark
hostname =request.form(\"hostname\")
buildingname = request.form(\"buildingname\") floor = request.form(\"floor\") housenum = request.form(\"housenum\") apartment = request.form(\"apartment\") tel = request.form(\"tel\") remark=request.form(\"remark\") indate=request.form(\"indate\") roomtype=request.form(\"roomtype\") if hostname = \"\" then
errmsg=\"
response.redirect(\"show.asp?action=adminerr&errmsg=\"&errmsg&\"\")
response.end() end if
dim saveset,cmd cmd
=
\"insert
into
baseinfo(hostname,tel,buildingname,floor,housenum,apartment,indate,roomtype,remark)
values('\"&hostname&\"','\"&tel&\"','\"&buildingname&\"','\"&fl
oor&\"','\"&housenum&\"','\"&apartment&\"','\"&indate&\"','\"&roomtype&\"','\"&remark&\"')\"
set saveset = data.execute (cmd) info=\"
response.redirect(\"show.asp?action=adminsuc&info=\"&info&\"\")
temprs.close saveset.close end sub sub saveedit() dim
hostname,buildingname,floor,housenum,apartment,tel,remark,id
id= request.form(\"id\")
hostname =request.form(\"hostname\")
buildingname = request.form(\"buildingname\") floor = request.form(\"floor\") housenum = request.form(\"housenum\") apartment = request.form(\"apartment\") tel = request.form(\"tel\") remark=request.form(\"remark\")
indate=request.form(\"indate\") roomtype=request.form(\"roomtype\") if hostname = \"\" then
errmsg=\"
response.redirect(\"show.asp?action=adminerr&errmsg=\"&errmsg&\"\") end if
dim saveedit,cmd cmd
=
\"update
baseinfo
set
hostname='\"&hostname&\"',housenum='\"&housenum&\"',indate='\"&indate&\"',roomtype='\"&roomtype&\"',tel='\"&tel&\"',buildingname='\"&buildingname&\"',floor='\"&floor&\"',apartment='\"&apartment&\"',remark='\"&remark&\"' where id= \"&id&\"\" set saveedit = data.execute (cmd) info=\"
response.redirect(\"show.asp?action=adminsuc&info=\"&info&\"\") saveedit.close end sub sub del()
dim id
id= request.querystring(\"id\") dim del
data.execute(\"delete from baseinfo where id= \"&id&\"\") info=\"
response.redirect(\"show.asp?action=adminsuc&info=\"&info&\"\") del.close end sub sub add() data.chkadmin(0) end sub sub edit dim id,edit_news
if session(\"level\")=0 and session(\"level\")<>\"\" then id= request.querystring(\"id\") else id=session() end if
set rs = data.execute(\"select * from baseinfo where id= \"& id&\"\")
edit_news = rs(\"remark\") rs.close end sub
4.2.3 投诉信息管理模块
投诉管理模块可是实现投诉信息的添加、删除和修改。部分代码为:
select case request.querystring(\"action\") case \"save\" call saveset() case \"add\" call add() case \"admin\" call admin() case \"edit\" call edit() case \"saveedit\" call saveedit() case \"del\" call del() case else call add()
end select footer() sub saveset() data.chkadmin(0)
dim newstitle,article,txtsource,txtwriter tsnum = request.form(\"tsnum\") receiver = request.form(\"receiver\") tscontent = request.form(\"tscontent\") processor = request.form(\"processor\") tsname = request.form(\"tsname\") remark=request.form(\"remark\") tsdate=request.form(\"tsdate\") if tsnum = \"\" then
errmsg=\"
response.redirect(\"show.asp?action=adminerr&errmsg=\"&errmsg&\"\")
response.end() end if dim saveset,cmd cmd
=
\"insert
into
tousu(tsnum,tsname,receiver,tsdate,tscontent,processor,remark)
values('\"&tsnum&\"','\"&tsname&\"','\"&receiver&\"','\"&tsdate&\"','\"&tscontent&\"','\"&processor&\"','\"&remark&\"')\" set saveset = data.execute (cmd) info=\"
response.redirect(\"show.asp?action=adminsuc&info=\"&info&\"\")
temprs.close saveset.close end sub sub saveedit()
id= request.form(\"id\") tsnum = request.form(\"tsnum\") receiver = request.form(\"receiver\") tscontent = request.form(\"tscontent\") processor = request.form(\"processor\") tsname = request.form(\"tsname\") remark=request.form(\"remark\") tsdate=request.form(\"tsdate\") if tsnum = \"\" then
errmsg=\"
response.redirect(\"show.asp?action=adminerr&errmsg=\"&errmsg&\"\") end if
dim saveedit,cmd cmd
=
\"update
tousu
set
tsnum='\"&tsnum&\"',tsname='\"&tsname&\"',receiver='\"&receiver&\"',tscontent='\"&tscontent&\"',processor='\"&processor&\"',tsdate='\"&tsdate&\"',remark='\"&remark&\"' \"&id&\"\"
'response.write cmd
set saveedit = data.execute (cmd) info=\"
response.redirect(\"show.asp?action=adminsuc&info=\"&info&\"\") saveedit.close end sub sub del() dim id
id= request.querystring(\"id\")
where
id=
dim del
data.execute(\"delete from tousu where id= \"&id&\"\") info=\"
response.redirect(\"show.asp?action=adminsuc&info=\"&info&\"\") del.close end sub sub add() data.chkadmin(0) end sub sub edit dim id,edit_news
if session(\"level\")=0 and session(\"level\")<>\"\" then id= request.querystring(\"id\") else
id=session(\"belong\") end if
set rs = data.execute(\"select * from tousu where id= \"& id&\"\")
edit_news = rs(\"remark\") rs.close
end sub
4.2.4 缴费管理模块、保修管理模块和停车管理模块
这三个模块的代码与以上两个模块的代码大同小异,在此就吧多写了。
4.2.5 管理员设置模块
这个模块主要用于管理员修改密码。主要代码为: head() data.admin()
if data.isadmin=false then
errmsg=\"
response.redirect(\"show.asp?action=adminerr&errmsg=\"&errmsg&\"\") response.end() end if
if request.querystring(\"action\")=\"update_info\" then call update_info() else
call main() end if footer()
sub update_info()
dim username,password_org,password,password2,code username = trim(request.form(\"username\")) password_org = trim(request.form(\"password_org\")) password = trim(request.form(\"password_new\")) password2 = trim(request.form(\"password_new2\")) code=trim(request.form(\"code\")) if code=\"\" then
errmsg=\"
response.redirect(\"show.asp?action=adminerr&errmsg=\"&errmsg&\"\") exit sub
elseif session(\"getcode\")=\"\" then
errmsg=\"
response.redirect(\"show.asp?action=adminerr&errmsg=\"&errmsg&\"\") exit sub
elseif cstr(session(\"getcode\"))<>cstr(trim(code)) then
errmsg=\"
response.redirect(\"show.asp?action=adminerr&errmsg=\"&errmsg&\"\") exit sub end if
session(\"getcode\")=\"\"
if password_org=\"\" or password=\"\" or password2=\"\" then errmsg=\"
response.redirect(\"show.asp?action=adminerr&errmsg=\"&errmsg&\"\") exit sub end if
if password<>password2 then
errmsg=\"
response.redirect(\"show.asp?action=adminerr&errmsg=\"&errmsg&\"\") exit sub
end if dim rs
password_org = md5 (password_org)
set rs = data.execute(\"select * from admin where username='\"&username&\"'\") if rs.eof and rs.bof then errmsg=\"
response.redirect(\"show.asp?action=adminerr&errmsg=\"&errmsg&\"\") exit sub else
if password_org = rs(2) then dim saveset,cmd,md5_code md5_code=md5(password)
cmd = \"update admin set pwd = '\"&md5_code&\"' where username = '\"&username&\"'\" data.execute(cmd)
info=\"
response.redirect(\"show.asp?action=adminsuc&info=\"&in
fo&\"\") else
errmsg=\"
response.redirect(\"show.asp?action=adminerr&errmsg=\"&errmsg&\"\") exit sub end if end if rs.close end sub sub main()
dim username,admin_type
username = session(\"admin_name\") end sub
5 系统测试
5.1 测试的概述
5.1.1 测试的概念和意义
测试的定义:程序测试是为了发现错误而执行程序的过程。测试(Testing)的任务与意义可以描述为:
目的:发现程序的错误;
意义:通过在计算机上执行程序,暴露程序中潜在的错误,消
除软件故障,保证程序的可靠运行。 5.1.2 测试的特性
1. 挑剔性
测试是为了证明程序有错,而不是证明程序无错。因此,对于被测程序就是要“纯毛求疵”,就是要“鸡蛋里挑骨头”。只有抱着程序有错的目的去测试,才能把程序中潜在的大部分错误找出来。 2. 复杂性
设计测试用例比较容易,这其实是一个误区。设计测试用例是一项需要细致和高度技巧的高能工作,稍有不慎就会顾此失彼。 3.不彻底性
实际测试都是不彻底的,当然不能够保证测试后的程序不存在遗漏的错误。 4. 经济性
通场这种测试称为“选择测试(Selective Testing)”。为了降低测试成本,选择测试用力是应注意遵守“经济性”的原则。 5.1.3 测试的重要性和范围
软件测试在软件生命周期中占据重要的地位,在传统的瀑布模型中,软件测试学仅处于运行维护阶段之前,是软件产品交付用户使用之前保证软件质量的重要手段。近来,软件工程界趋向于一种新的观点,即认为软件生命周期每一阶段中都应包含测试,从而检验本阶段
的成果是否接近预期的目标,尽可能早的发现错误并加以修正,如果不在早期阶段进行测试,错误的延时扩散常常会导致最后成品测试的巨大困难。
事实上,对于软件来讲,不论采用什么技术和什么方法,软件中仍然会有错。采用新的语言、先进的开发方式、完善的开发过程,可以减少错误的引入,但是不可能完全杜绝软件中的错误,这些引入的错误需要测试来找出,软件中的错误密度也需要测试来进行估计。测试是所有工程学科的基本组成单元,是软件开发的重要部分。自有程序设计的那天起测试就一直伴随着。统计表明,在典型的软件开发项目中,软件测试工作量往往占软件开发总工作量的40%以上。而在软件开发的总成本中,用在测试上的开销要占30%到50%。如果把维护阶段也考虑在内,讨论整个软件生存期时,测试的成本比例也许会有所降低,但实际上维护工作相当于二次开发,乃至多次开发,其中必定还包含有许多测试工作。
软件测试贯穿于软件定义与开发的整个周期 ,软件的需求规格说明书 ,结构设计及程序编码,都属于软件测试的对象。
5.2 系统测试
测试在软件开发过程中一直都是备受关注的,即使在传统的软件工程中,也有一个明确、的测试阶段。随着软件危机的频频出现以及人们对于软件本质的进一步认识,测试的地位得到了前所未有的提高。测试已经不仅仅局限于系统开发中的一个阶段,它已经开始贯穿于整个系统开发过程,人们已经开始认识到:测试开始的时间越早,测试执行
的越频繁,所带来的整个软件开发成本的下降就会越多。
为了使本软件运行更加稳定,我对它进行了全面的测试,测试分为两部来进行,一是:界面测试;二是功能测试。
首先是界面测试,为了使软件在不同的的操作系统平台上运行界面能保持原来的风格。我把完整程序拷贝到Windows 2000环境下,程序运行界面正常,界面的布局、字体等设置都保持原样,没有出现类似字体变形的情况!
其次是进行功能的测试。本系统测试采用了黑盒测试中的等价分类法,所以现就此举一个例子作为说明。
使用此系统的各类用户身份登陆本系统,使用普通用户身份登陆5次,使用管理员身份登陆8次。
测试结果:使用普通用户身份登陆系统时的查询结果与数据库中的数据相同;使用管理员身份登陆系统时的查询结果与数据库中的数据相同,对楼盘、楼阁、房屋、住户信息、住户请修申请、普通用户信息、公司概况、部门信息等等的添加、编辑或删除操作结果与数据库中的数据对应,并无不同。
经过测试所有功能都能得以实现,至此系统功能的测试完满结束。
结 束 语
在设计开始这前,我对ASP并不了解,甚至对网页设计以前也没接触过,后来在老师和同学的帮助下,慢慢对ASP有了一定了解,并结合了FLASH、POTOSHOP等设计思想逐步完成了小区物业系统中的界面子系统模块。
在整个设计过程中,也出现过很多的问题,在不断学习的过程中我体会到:
a.设计是一个不断学习新鲜事物的过程,从设计初的不懂到最后能够顺利完成,我体会到在实践中学习的重要性。
b.由于前期工作的不彻底,对系统的需求分析的要求认识不够清楚,使得后续的工作不得不经常返回去修改数据表和个别代码。使我体会到在设计中的每一步的重要性,如果上一个步骤不能很好的完成,在后续的设计将会付出几倍的代价。
c.设计过程中,由于要实现某些功能,互联网帮了我的大忙。网络资源是一个丰富的共享体系,我通过在ASP论坛上提出问题得到了很多热心网友的帮助,使我在很多地方少走了很多的了弯路。
经过近二个月的设计,我深刻体会到了一个软件的设计和它的发展是那很的严密,容不得半点的马虎。要严格按照软件工程的方法与思想,逐步完成。同时也让我明白了,很多的知识在用时才会觉的“书到用时方恨少”,只有靠平常的积累。由于我是第一才接触网页设计和ASP,此次毕业设计还有很多不足之处,比如功能不完整、界面不够友好等等。论文的不足之处,望各位老师予以批评指正。
致 谢 词
在小区物业系统设计过程中,我得到了许多老师和同学的帮助,尤其是我的指导老师向老师,他给予我非常大的帮助并提出了许多宝贵的具体建议。此外,在完成设计的过程中,喝多同学和网上论坛的朋友也给了我很大的帮助,谨在此向他们表示衷心的感谢!
因篇幅问题不能全部显示,请点此查看更多更全内容
Copyright © 2019- obuygou.com 版权所有 赣ICP备2024042798号-5
违法及侵权请联系:TEL:199 18 7713 E-MAIL:2724546146@qq.com
本站由北京市万商天勤律师事务所王兴未律师提供法律服务