基于BS模式环境监测系统设计与实现.docVIP

基于BS模式环境监测系统设计与实现 　　摘要：该文设计了一种基于BS模式的环境参数监测系统，可以有效地提高环境参数监测工作效率，降低数据出错的概率。该文给出了系统的总体设计方案和具体实施步骤，并介绍了系统中几个重要模块的设计和实现。 　　关键词：BS；环境监测 　　中图分类号：TP311 文献标识码：A 文章编号：1009-3044（2015）17-0085-02 　　本文设计了一种基于 BS模式的环境参数监测系统，可以有效地提高环境参数监测工作效率，并且方便以后对历史数据的查询，为环境保护部门提供一套比较科学的、规范的、实用性强的环境信息管理与决策系统。此系统可以对环境参数监测数据进行查看与分析，实现对环境参数监测数据管理的科学指导和宏观监测，使得对环境的监测更加及时、高效，提高环境监测。 　　本系统主要采用 ASP、VBScript、SQL Server 等技术构建。 系统实现的功能主要包括：环境参数实时监测、监测点状态监测、历史数据查询、报警查询、阈值设置、信息发布等功能。该系统人机界面友好，完善的自定义数据查询界面及系统信息维护功能；具有完善数据分析和统计功能。 　　1 系统总体设计 　　本系统采用 B/S 结构，系统总体结构如图 1 所示。 　　系统用户分为普通用户和管理员两类，普通用户是指各县区用户，管理员是指市物价局用户。 两类不同的用户登录系统后，将进入不同的页面。普通用户页面包括的功能模块有：系统说明、环境参数、环境监测、和法律法规等。管理员页面包括的功能模块有：系统说明、环境参数、环境监测、阈值设置、警示内容设置、密码修改、用户管理和法律法规等。 　　2 系统主要功能模块 　　2.1 用户登录模块 　　该模块主要完成用户的登录。 用户登录流程图如图 3所示。 　　实现代码如下： 　　% choose=request.Form（R1） 　　if choose=manage then 　　userid=request.Form（userid） 　　pwd=Request.Form（pwd） 　　if userid= then 　　errmsg=请输入用户名！ 　　else 　　dim sql sql=select * from username where username= userid 　　set rs=server.CreateObject（adodb.recordset） 　　rs.Open sql，StrConn 　　If rs.EOF Then 　　errmsg=用户名不存在！请重新输入！ 　　else 　　if pwdtrim（rs.fields（pwd）） then 　　errmsg=密码不正确！请重新输入！ 　　else 　　session（passed）=true response.Cookies（userid）=trim（rs.fields（username）） 　　Response.Redirect（admin.asp） 　　end if 　　end if 　　end if 　　end if 　　% 　　2.2 环境监测模块 　　环境监测页面是监测系统最重要的功能模块，监测界面如图4所示，主要包括实时监测、历史数据查询、报警查询、信息发布等功能。 　　本文以历史数据查询为例说明，该模块功能主要是查询统计出用户所选择的某一天、周、月的环境监测历史数据记录，在本功能模块中又嵌套了按监测点位置，监测参数类型来查询，即可以根据用户所选的监测点位置，参数类型（温度、湿度等）来查询各监测点的历史数据记录。显示出距当前时间最近的历史监测数据。如图5所示。 　　2.3 阈值设置 　　由于不同环境的具体监测参数范围有所不同，所以管理员可以通过修改参数上限或下限等数值来监测环境和报警，如图6所示。 　　2.4 监测点状态监测 　　该功能模块对监测点工作状态进行实时监测，监测点出现故障，则进行故障报警警示管理员，同时可以通过手机信息提示管理员，管理员登录监测点状态监测页面查看各个监测点状态，找出存在故障的监测节点，并及时的进行维护，确保系统能正常运行。点击系统主界面中的“监测点状态”，进入故障监测界面。如图7所示。 　　3 系统实现和开发工具 　　系统采用 B/S 结构数据库采用SQL Server2005 开发环境采用 Macromedia Dreamweaver 8，开发语言采用 ASP、VBScript和javaScript。 　　4 结束语 　　本环境参数监测系统目前已投入实际使用。 实际运行结果表明，使用该系统可以有效的提高环境参数监测工作效率，降低数据出错的概率。系统具有一定的实际应用价值。 　　参考