电费管理系统
小区电费管理系统_毕业设计论文_开题报告基于.NET和SQL【呕心沥血整理版】

报告人签名:杨笑宇
2012年3月
指导教师对开题报告(文献综述)的评语:
指导教师签名:
年月
统一的语言
SQL可用于所有用户的DB活动模型,包括系统管理员、数据库管理员、 应用程序员、决策支持系统人员及许多其它类型的终端用户。基本的SQL 命令只需很少时间就能学会,高级的命令在几天内便可掌握。以前的数据库管理系统为上述各类操作提供单独的语言,而SQL 将全部任务统一在一种语言中。
是所有关系数据库的公共语言
(四)设计环境
硬件环境
随着计算机硬件的高速发展,现在普通的机子已经可以做为一个服务器端使用。
CPU:CⅣ2。0或更高
硬盘:40G或更多
内存:128M或更高(建议使用256M)
操作系统Windows 2000 Server /Windows XP
网络协议TCP/IP
数据库ACCESS
开发语言VB
其它辅助软件:Microsoft Word等
4 信息录入管理
实现用户信息的管理,用户的信息包括用户编号,用户姓名,用户类型,当前至码,抄表日期,上次欠费,电价(元/度),抄表人员,备注,电表倍数,可以实现用户信息录入,信息修改,信息删除等功能.
5 系统数据维护管理
实现用户数据维护的功能,数据维护包括用户类型维护以及操作员维护。用户类型维护包括电表类型,单价,有对电表类型进行添加,删除的功能,操作员维护包括姓名,权限,添加用户,删除用户,实现用户数据维护的功能。
毕业论文(设计)开题报告
论文题目
小区电费管理系统Байду номын сангаас计与实现
学生姓名
学号
专业
指导教师
职称
学历
开题报告(文献综述)内容:
电费管理系统

电费-管理软件《电费-管理软件》是一款通用性极强、功能极强大、内容极完整的的-电费管理系统-,本系统数据处理自动化,您只需设置一下抄表年月,系统一次性自动导入各用电户上月止码值做为本月起码值,只需在电价类别设置中,把相应用电类别的单价改动后,系统会自动更新电表信息中相应类别用电户的单价,而无需手动去调整。
具体包含了-电费-管理部门对用电户的资料管理,-电费-抄表员及收费员的日常工作管理以及收费情况统计查询和各种对比分析图形等。
功能模块:一、-电费-基本信息:包括供电单位设置,电费价格设置,用电户基本信息,系统初始化。
对供电单位设置后在打印票据时自动填写;电费价格设置和用电户基本信息进行设置后,方便以后的辅助录入。
二、-电费-抄表录入:包括创建抄表帐,抄表。
2.1 -电费-创建抄表帐:设置抄表的年月。
2.2 抄表:对抄表的信息进行记录,在抄表信息查询时,可以使用辅助录入,方便用户的查询。
三、抄表收费:包括收费,重打单据。
3.1 收费:用户交费时按照站区、户号、户名进行查询交费信息。
交费后还可以打印单据。
3.2 重打单据:给交费的用户重新打印单据。
四、基本查询:抄表查询,收费查询,收费员汇总,账户盈余明细,可自动结转户,余额不足用户。
五、汇总分析:用电量年月查询汇总,用电量类别年月查询汇总、年度用电月份走向,站区年度月份用电走向,用电同期月份对比分析,站区用电同期月份对比分析。
如果您对我们的这款软件-电费管理软件-有特殊需求或修改建议的话,可以联系我们,我们公司的软件均具有二次开发功能,我们可以完全根据您的意思进行修改定做,我们公司软件产品独具的二次开发功能可以使软件永不过时,随着-电费管理-客户业务的拓展,软件功能可以随其他不断变化功能。
只有您想不到,没有我们做不到。
电力企业MIS系统电费管理子系统

电力企业MIS系统电费管理子系统摘要:电费管理子系统包括了供电营销中最主要的客户管理、电费管理、电价管理、趸售管理、营业监控、营业报警、综合信息查询、特殊业务处理等功能,是整个信息系统的核心所在。
关键词:电力信息;安全分析;解决方案;探讨1 电费管理子系统的功能根据电费管理工作的特点和对系统的总体目标要求,电费管理子系统应具备如下五个方面的功能。
(1)用户电费档案管理:用户电费档案管理的建立;用户电费档案变更;工作传票处理。
(2)抄表数据处理:合理抄表路线的确定和调整;抄表数据的录入;抄表数据的校核。
(3)计算、打印电费收据:计算各类用户电费及其它各项代收款;打印各种电费收据。
(4)电费收缴管理:电费应收、实收、欠收的统计汇总;预收电费管理;与银行联网收费的帐目处理及数据传输管理。
(5)统计分析及查询管理:售电量、电费、平均售电单价的统计分析;按行业、用电性质分类统计售电量、电费、平均售电单价的增长情况;用户电度电费、基本电费、功率因数调整电费、峰谷电费构成情况;各类报表的统计、汇总和上报;所有用户情况和电力销售情况查询管理。
2 电费管理子系统的系统分析2.1电费管理的职能分析电费管理的主要职能是按时抄录用户的用电量,按照国家电价政策,严格、正确地计算和审核电费,并全部及时收回和上缴,对各个行业的用电量及回收电费进行综合分析和统计。
(1)抄、核、收工作。
电费管理的第一道工序为抄表即每月按例日定期、正确、不漏地抄回电能表示数并计算出用户的用电量。
抄表员抄回来后,由核算员根据抄表卡片计算电费,逐户开票,进行分类统计,填写计算票,同时,要检查核对用户的电价及用电设备容量有无变动,最后一并送交复核员审核整理。
复核员根据抄表员交回的抄表卡和核算员计算的电费票据及有关的汇总表进行电费复核,同时登录电费台帐,并做应收帐。
收费员接到转来的电费收据后,立即采用通过银行托收、坐收、走收、委托代收或其它方式,将电费全部收回、上缴。
电能表管理系统使用说明

DBMIS6电表管理信息系统使用手册第1章系统简介本系统是针对预付费电能表开发的一套给供电部门使用的售电管理软件,功能齐全,界面友好,结构清晰,操作方便,是推广使用预付费电表的有力工具。
了解电卡表售电系统整个售电系统所需的软硬件设备包括:预付费电表、IC卡读写器、IC卡、计算机终端管理系统。
关于电卡表预付费电表(简称电卡表),高精度、长寿命的静止式电子表,保证了长期稳定的计量准确性。
关于读写器读写器明华RD系列接触式IC卡读写器,读写器在售电过程中使用十分频繁,要求质量稳定。
读写器用一根串口数据线连接计算机的串行端口上。
连接速度(波特率)为9600bps。
通电后读写工作时有指示灯指示。
关于IC卡采用了标准加密IC卡,这种IC卡保密性好、安全可靠、通用性强、成本低廉,易第- 1 -页共38页于普遍推广采用。
关于管理软件管理软件在Windows 32位环境下设计开发,自带微软的MDAC数据访问部件,运行于MS Windows98 SE/2000,现在假设您已将系统成功安装在该平台上。
如果系统运行时显示不正常,请确保您的系统显示颜色设置至少为16位色800*600分辩率以上(32位真彩色1024*768尤佳)。
系统功能完备除应具有很强的业务处理功能外,还应具有较强的统计分析功能,提供全面的统计分析资料,为分析和决策提供帮助。
系统结构严密系统应提供严密的操作权限管理,方便、规范的基础资料录入功能,完善的资料备份、整理、恢复功能,保证系统运行的安全可靠。
系统界面美观系统应提供简便的操作方式和美观舒适的操作接口。
每个操作环节都有相应的提示信息,窗口和菜单的设计力求简单明了。
图1.1 主屏幕系统提供菜单、快捷工具栏和工具面板以便用户可以很方便地进入各模块。
菜单中包括了系统所有功能模块的控制;快捷工具栏包含日常业务和其它常用相关模块。
您可以很方便地使用您具有操作权限的各模块。
菜单结构1登录管理2日常业务3用户管理4查询报表开机人员登录开户配表登记用户档案管理购电第- 2 -页共38页情况查询更改人员密码营养售电服务销户恢复处理表库情况查询检查登录日志电表数据管理超时用户分析抄表情况查询退出管理系统电表更换处理各区售电分析类型对照查询报停退费处理各月售电分析营业售电报表恢复购电处理电表管理报表统计汇总报表5设置维护 6 电卡7帮助系统设置维护读入电卡数据帮助目录人员电价设置补用户购电卡使用手册数据库修改补电表设置卡版权信息数据库压缩制作专用电卡数据库备份读写设备选择数据库恢复功能概述DBMIS 预付费电表信息管理系统,它包括:登录管理、日常业务、用户管理、查询报表、设置维护、电卡读写等六个功能模块。
节能用电管理系统

DF型系列节能用电管理系统简介一、系统概述山东科大中天电子有限公司专业研制的DF型系列节能用电管理系统专业适用于住宅等流动性强、群体广、用电管理困难的物业管理的用户。
解决电费回收难、用电不明细、公用电盲目分摊等管理混乱问题,从而让消费更明白、工作更快乐、管理更愉悦。
二、系统结构DF型节能用电管理系统主要由多用户管理模块、集中式计量模块、多元化网络通讯模块等三部分组成。
系统结构图如下图:三、系统特点该系统结构简单、配置灵活,可靠性高:简洁的树状结构,保证了数据传输的可靠性。
采集器的数据储存功能、和掉电保护功能,保证掉电情况下仍能正确计量。
每个采集器的信号接口可以接不同的计量表,每个计量模块均可有不同的参数配置,这为工程的安装和应用带来很大的灵活性。
且该系统操作简便,功能丰富。
主要功能、特点◆数据采集:管理软件自动采集各用户的能耗数据,并具备单点、单元、群采集的功能。
◆费用结算:根据抄表记录自动计算用户的能耗费用。
◆远程控制:可使用管理软件远程控制欠费用户的电源,提高电费回收率。
◆查询功能:1、单户查询;2、全区查询。
◆预付费功能:系统可实现预付费功能及其用、售电的管理。
◆设定与更改功能:系统具有对各电能表进行参数设定功能和住户信息修改、设置及底码更改等功能。
◆电话查询与报警功能:根据设定自动提醒用户购电;可提供电话查询、自动应答语拨号报警功能。
◆打印功能:可以打印各用户月能耗费用报表和单户费用清单。
◆数据储存、备份与打印:系统具备强大的数据储存和备份数据功能、可打印各类费用报表和清单。
◆系统运行日志与设备自检功能:系统具备线路、设备等的自检功能。
◆防作弊功能:系统实现授权密码操作,并设有运行日志,可以详细记录操作员的操作流程。
四、企业简介山东科大中天位于中国院士泰山创业基地,注册基金1150万元,由中国科学院宋振骐院士汇聚多位院士等业内高端专家,充分依托山东科技大学联合中国矿业大学与山东大学等多所高校院所组建而成。
电费管理系统需求规格说明书

电费管理系统需求规格说明书电费管理系统需求规格说明书一、引言本文档旨在对电费管理系统进行详细的需求规格说明,以确保系统开发人员对系统功能和性能有清晰的了解,并为开发过程中提供指导。
本文档包括系统概述、功能需求、性能需求、界面需求、安全需求、数据需求、约束和假设等章节,以全面而详尽地描述系统的需求。
二、系统概述本章节对电费管理系统进行总体说明,包括系统的目标、背景、用户特点和主要功能。
2.1 系统目标电费管理系统的目标是提供一个高效、准确、可靠的电费管理解决方案,帮助用户实现电费的缴纳、查询、统计、报表等功能。
2.2 背景电费管理系统应用于各类单位和个人,用于管理和控制电费的支付和使用情况。
传统的电费管理方式繁琐、效率低下,不利于电费的统计和管理,因此需要开发一个电费管理系统来提高工作效率。
2.3 用户特点电费管理系统的用户包括以下几类:- 管理员:负责对系统进行配置、维护和管理。
- 员工:负责进行电费查询和缴纳。
- 用户:包括单位和个人,需要使用系统进行电费查询和支付。
2.4 主要功能电费管理系统的主要功能包括但不限于:- 用户注册和登录:用户通过注册账号并登录系统进行相关操作。
- 电费查询:用户可以根据不同的时间段查询电费使用情况。
- 电费缴纳:用户可以通过系统完成对电费的缴纳。
- 统计和报表:系统能够根据用户的需求,相应的电费统计报表。
三、功能需求本章节详细说明了电费管理系统的功能需求,包括用户管理、电费管理、数据统计等方面的功能。
3.1 用户管理3.1.1 用户注册用户可以通过系统进行注册,提供必要的个人信息进行身份验证,并唯一的用户标识。
3.1.2 用户登录用户可以使用注册的账号和密码进行登录操作,系统应验证用户身份信息并允许登录。
3.1.3 用户信息管理用户可以修改个人信息,包括密码、邮箱、联系方式等。
3.2 电费管理3.2.1 电费查询用户可以根据不同的时间段查询电费使用情况,包括查询历史电费记录和当前电费余额。
电费管理系统需求规格说明书

电费管理系统系统需求规格说明书编号:ZPARK-JAVA-SX-SRS版本:1.0变更记录目录1.简介41.1.开发背景41.2.目的41.3.业务范围42.约束及假定52.1.软件运行环境以及技术约束52.1.1.软件约束52.1.2.硬件约束52.2.交付及部署约束53.功能性需求63.1.系统角色63.1.1.货号〔User〕错误!未定义书签。
3.2.系统总体模块构造73.3.缩写数据字典与规那么73.3.1.缩写73.3.2.数据字典73.4.需求描述83.4.1.系统用户管理模块83.4.2.货号信息管理模块错误!未定义书签。
3.4.3.入库单信息管理模块错误!未定义书签。
3.4.4.出库单信息管理模块错误!未定义书签。
4.非功能性需求114.1.性能114.1.1.CSMS系统要支持25个并发用户。
114.1.2.CSMS系统处理查询操作响应时间不超过10秒。
114.2.可扩展性114.3.可用性114.4.平安性114.4.1.平安防护114.4.2.操作跟踪114.4.3.控制114.5.易用性11 4.6.可维护性111.简介1.1.开发背景系统名称:电费管理系统本工程是电费管理系统,集合了缴费模块,电价增加模块,用户管理模块,催缴费管理模块等多个模块,是一个面对电费公司的后台管理系统1.2.目的本文档定义了电费管理系统的详细需求,明确了电费管理系统的功能内容、功能边界、开发途径。
1.3.业务范围电费管理系统业务范围,包括了系统管理员管理,用户管理,抄表信息管理,电费信息管理,电价信息管理,缴费信息管理,催缴费信息管理者这几大模块,是一款面对于电力公司使用的基于WEB的管理系统2.约束及假定2.1.软件运行环境以及技术约束2.1.1.软件约束eclipse8.5 mysql webstorm9.02.1.2.硬件约束Web效劳器及数据库效劳器均采用DELL〔1.73G HZ〕笔记本电脑。
电费管理铁塔系统流程

电费管理铁塔系统流程一、铁塔电费管理的重要性铁塔作为移动通信网络的重要组成部分,需要大量的电力支持运行。
而电费是铁塔运营的重要成本之一,合理的电费管理对于控制成本、提高效益至关重要。
因此,建立科学的电费管理铁塔系统流程对于铁塔运营方具有重要意义。
二、电费管理铁塔系统流程的目标三、电费管理铁塔系统流程的具体流程1.数据采集与分析(1)采集铁塔的用电数据,包括用电量、用电时间等。
(2)对采集到的数据进行统计与分析,了解铁塔的电力使用情况,找出存在的问题。
2.用电策略制定(1)根据数据分析结果,制定科学合理的用电策略。
(2)建立用电规范,明确用电范围、用电权限及用电限制要求。
3.电费计费与结算(1)根据铁塔的用电情况,制定电费计算标准,包括价格、计费周期等。
(2)通过电表等计量设备,对铁塔的电力消耗情况进行实时监测和计量。
(3)根据监测和计量结果,按照制定的电费计算标准,计算铁塔的电费,并进行结算。
4.电费核查与审计(1)对电费计费与结算结果进行核查,确保电费的正确性和合理性。
(2)定期进行电费审计,检查电费管理的操作流程是否符合要求,发现问题及时解决。
5.电费文档管理(1)建立电费管理的相关文档,包括电费计费标准、电费计量设备使用手册等。
(2)对电费管理的操作流程进行文档化管理,确保操作流程的规范化和持续优化。
6.电费分析与优化(1)对电费管理的数据进行分析,找出存在的问题和潜在的优化空间。
(2)通过技术手段和管理手段,对电费管理过程进行优化,降低电费支出。
四、电费管理铁塔系统流程的考虑因素1.电费管理的监管与政策要求要根据所在国家或地区的电费管理监管要求和政策法规,制定电费管理铁塔系统流程,确保符合相关要求。
2.电费管理与铁塔运维的融合3.信息化支持利用信息技术手段,建立电费管理铁塔系统,实现电费数据的实时监测、计量和统计分析,提高电费管理的效率和准确性。
4.运营商需求与合作与运营商、电力公司等合作,共同制定电费管理铁塔系统流程,确保双方的利益最大化。
高校水电费管理系统项目介绍

高校水电费管理系统项目介绍1. 项目背景随着高校规模的不断扩大和学生数量的增加,高校的水电费管理面临着越来越大的挑战。
传统的手工录入、统计和管理方式已经无法满足高效、准确和便捷的需求。
为了提高水电费管理的效率和精度,开发一个高校水电费管理系统变得非常必要。
2. 项目目标本项目旨在开发一个全面、灵活且易于使用的高校水电费管理系统,以提高水电费数据录入、统计和查询的效率,减少人力资源投入并降低错误率。
具体目标包括:- 实现学生信息、宿舍信息和水电费信息的录入与管理; - 提供自动生成账单、查询账单和缴费功能; - 支持管理员对系统进行权限管理; - 提供数据统计与分析功能,帮助管理员了解学生宿舍用能情况。
3. 功能需求3.1 学生信息管理•学生信息录入:包括学号、姓名、性别、年级等基本信息。
•学生信息查询:支持按照学号或姓名进行精确查询。
3.2 宿舍信息管理•宿舍信息录入:包括宿舍号、楼栋号、楼层等基本信息。
•宿舍信息查询:支持按照宿舍号、楼栋号或楼层进行精确查询。
•宿舍信息修改:支持对宿舍信息的修改操作。
3.3 水电费信息管理•水电费信息录入:包括学生所在宿舍的水电度数等信息。
•水电费信息查询:支持按照学生学号或宿舍号进行精确查询。
3.4 账单管理•自动生成账单:根据水电费信息自动生成账单,包括应缴费用和截止日期等内容。
•查询账单:支持按照学生学号或姓名进行查询,展示该学生的所有账单情况。
•缴费功能:提供在线缴纳水电费用的功能,并更新账单状态。
3.5 管理员权限管理•管理员账号注册与登录:管理员通过注册账号并登录系统,获得相应的权限。
•权限管理:管理员可以对系统中的各个功能模块进行权限设置,包括数据录入、数据修改、数据查询等。
3.6 数据统计与分析•学生用能情况统计分析:根据水电费信息对学生宿舍用能情况进行统计和分析,生成报表和图表展示。
4. 技术实现本项目将采用以下技术实现: - 前端开发:使用HTML、CSS和JavaScript等技术实现用户界面的设计与交互。
电表管理系统

电表管理系统在现代社会,电力已经成为人们生活和工作中不可或缺的能源。
为了确保电力的准确计量和合理分配,电表管理系统应运而生。
它就像是电力世界的“大管家”,默默地守护着每一度电的流动和使用。
电表管理系统是一个综合性的管理平台,涵盖了从电表的安装、数据采集、计费到故障监测等一系列环节。
其首要任务是实现对电表的精准计量。
通过先进的传感器和测量技术,电表能够准确记录用户的用电量,为后续的计费和数据分析提供基础。
在电表的安装环节,系统需要考虑众多因素。
比如,安装位置要便于读取数据和维护,同时要保证电表的安全性和稳定性。
此外,不同类型的用户,如居民用户、商业用户和工业用户,可能需要不同规格和功能的电表,以满足其特定的用电需求。
数据采集是电表管理系统的关键环节之一。
过去,人工抄表是获取用电数据的主要方式,这种方法不仅效率低下,而且容易出现误差。
如今,随着通信技术的发展,远程自动抄表已经成为主流。
系统通过无线网络、电力线载波等通信方式,将电表中的数据实时传输到数据中心。
这不仅大大提高了数据的准确性和及时性,还节省了大量的人力成本。
采集到的数据会被用于计费。
系统根据预先设定的电价政策和计费规则,自动计算用户的电费。
同时,它还能够生成详细的电费账单,让用户清楚地了解自己的用电情况和费用构成。
这有助于用户合理规划用电,提高节能意识。
除了计费,电表管理系统还承担着故障监测的重要职责。
它能够实时监测电表的运行状态,一旦发现异常,如电量突变、电表故障等,会立即发出警报。
维修人员可以根据系统提供的信息,迅速定位故障点,及时进行维修,确保电力供应的连续性和稳定性。
对于供电企业来说,电表管理系统还能够提供强大的数据分析功能。
通过对大量用电数据的分析,企业可以了解不同地区、不同用户群体的用电规律和趋势,从而优化电力供应规划,合理分配电力资源。
例如,在用电高峰时段,提前做好电力调配准备,以避免出现供电不足的情况。
在安全性方面,电表管理系统也采取了多种措施。
智能电表管理系统

智能电表管理系统随着世界各国能源需求的不断增长和环境问题的逐渐突出,能源管理已经成为国家和企业面临的一个重要挑战。
智能电表管理系统作为一种新型的能源管理技术,可以有效地解决电力供应商和消费者之间的能源管理问题,实现电力的节约和降低电费的目标。
本文将重点介绍智能电表管理系统的定义、优点、构成和实现原理,并探讨其应用前景。
一、智能电表管理系统定义智能电表管理系统通常指的是一种能够自动获取电能数据、实时监测用电情况、分析用电行为和提供贴身式用电建议的电能计量和管理系统。
它集成了电表计量、通讯传输、数据处理和分析、用电建议等多种技术,能够实现对家庭、企业和城市用电的全方位监测和管理。
二、智能电表管理系统的优点1.实时监测用电情况:智能电表管理系统可以实时监测用电情况,无需人工干预,能够准确记录每一居民、企业和城市的用电情况。
2.节约用电成本:通过智能电表管理系统的监测和分析,用户能够更加精准地了解自己的用电情况,从而控制用电成本,节约用电费用。
3.提供用电建议:通过分析用电行为,智能电表管理系统可以向用户提供贴身式的用电建议,帮助用户更加科学合理地使用电能。
4.数据共享:智能电表管理系统可以让电力供应商和消费者之间实现数据共享,从而实现合作共赢的局面。
三、智能电表管理系统的构成智能电表管理系统通常由以下几个方面组成:电能计量装置、通讯模块、数据处理与分析平台、用电建议平台。
1.电能计量装置:智能电表系统最核心的部分是电能计量装置,它是系统中负责实时监测用电情况、记录用电数据的核心组成部分。
电能计量装置通常由电表、开关、采集单元和传感器组成。
2.通讯模块:智能电表管理系统通过通讯模块实现与电网的连接,使用网络通信技术将实时采集的数据上传到云端服务器。
3.数据处理与分析平台:数据处理与分析平台是智能电表管理系统中的重要组成部分,它能够对上传到云端服务器的数据进行处理和分析,提供数据可视化和预警功能。
4.用电建议平台:用电建议平台是智能电表管理系统中的用户界面,用户可以通过该平台了解自己的用电情况,获取用电建议和实现用电节能。
电力管理系统

电力管理系统1. 简介电力管理系统是一种可以帮助用户监控和控制电力消耗的系统。
它可以实时收集和分析电力数据,并提供细致的报告和分析结果,帮助用户管理电力使用,提高能源利用效率,降低电费支出。
本文档将介绍电力管理系统的原理、功能和使用方法。
2. 原理电力管理系统主要通过接收来自电力表、电能表和传感器的数据来实现对电力消耗的监控和管理。
这些数据包括电能消耗、电压、电流和功率等信息。
系统利用这些数据进行实时分析,生成报告和分析结果。
3. 功能电力管理系统具有以下主要功能:3.1 实时监控系统可以实时监控电力消耗,包括整个建筑、楼层、区域甚至单个设备的电力使用情况。
用户可以通过系统界面查看实时数据,并对不同时间段的数据进行比较和分析。
3.2 能效分析系统可以根据收集到的数据,为用户提供能效分析报告。
该报告可以显示整个建筑或系统的能源利用效率,识别能源浪费的区域或设备,并提供改进建议。
3.3 负载管理电力管理系统可以帮助用户合理分配电力负载,防止过载和电力不平衡现象的发生。
系统会监测负载情况并提供警报,以便用户采取适当的措施。
3.4 能耗预测基于历史数据和建筑使用情况,系统可以估计未来的能源消耗。
这有助于用户制定合理的能源计划,并节省电费支出。
3.5 远程控制用户可以通过电力管理系统进行远程控制,以便更好地管理电力消耗。
例如,用户可以远程控制设备的开关,调整设备的功率等。
4. 使用方法4.1 安装和配置用户需要按照系统提供的安装指南,将电力管理系统部署在建筑或设备上。
然后,用户需要配置系统的参数,例如连接到电力表和传感器的接口,设置报警阈值等。
4.2 数据采集和分析系统会自动收集和分析电力数据,并生成相应的报告和分析结果。
用户可以通过系统界面查看这些数据,并进行定制化的分析和比较。
4.3 能效改进基于能效分析报告,用户可以采取相应的改进措施。
例如,替换能源低效的设备,优化能源使用计划等。
4.4 远程控制用户可以通过系统界面进行远程控制。
智能电表管理系统

姓名专业班级论文名称指导教师目录摘要 (1)一、选题背景 (2)1.1课题概述 (2)1.2技术背景 (2)二、用户需求分析 (7)2.1技术需求 (7)2.2功能需求 (7)三、概要设计 (8)3.1系统的构成 (8)3.2系统的主要功能及特点 (9)四、详细设计 (10)4.1数据库设计 (10)4.2系统界面设计 (14)4.3系统程序设计 (27)五、关键技术 (51)5.1构造合适的16进制通信数据 (51)5.2串口通信发送16进制数据实现 (54)5.3串口通信接收硬件返回的16进制数据的实现 (55)5.4分析硬件返回数据转换为用户可读数据 (55)六、安装与使用说明 (59)6.1安装说明 (59)6.2使用说明 (59)6.3注意事项 (59)七、致谢 (61)八、参考资料 (62)摘要智能电表管理系统是为了在物业管理中对用电状况进行智能化管理的解决方案,使得电能的管理更加简洁、人性化和自动化。
目前企业宿舍、公寓用电管理是其中重要的一个环节,同时随着电力系统及其相关产业的发展以及电能管理系统的不断完善,且伴随着计算机技术、通信技术、网络技术和控制技术的交叉和综合发展,人们进入了高度发达的信息时代。
本系统就是结合这些发展中的优势资源而融合出来的产品,可以让使用者更方便快捷的享受高科技所提供的服务。
智能电表管理系统主要有计算机、智能电表、数据库、服务器等各部分组成,对各个楼栋的电表实行用电管理,此管理系统可以高效快捷的完成任务,省去了传统普通电表需要定期派专人上门抄表催收电费等耗时费力的工作。
系统采用C#语言在Microsoft Visual Studio 2005集成开发平台上进行编程开发,并使用微软的SQL Server 2005数据库存储数据以提高数据的安全性,系统使用了SerialPort控件组织十六进制数据实现了串口通信功能。
系统共包含四项主要功能,一、包括数据库管理功能,系统采用的数据库设计科学合理,字段命名规范,键值设置合理,易于后期的维护和管理;二、具有用户信息管理功能,可以进行(1)操作员信息管理,编辑用户使用权限.(2)电表信息管理,可以查看并修改住宅小区的用户电表信息.(3)楼栋信息管理,可以查看并修改小区内楼栋的名称及楼层数量.(4)用户用电记录查询,可以多条件查询用户的用电信息;三、系统同时具有串口通信功能,可以完成(1)显示当前正向有功总电能.(2)查询电表地址.(3)通断电控制;四、系统还具有权限管理功能,任何越权操作都将被拒绝,当用户具有较高使用权限时才可以使用系统中的较多功能,例如”admin”用户可以更改系统中其他操作员的使用权限,提高系统管理的质量与效率。
电费管理系统需求规格说明书

电费管理系统需求规格说明书电费管理系统需求规格说明书1. 引言本文档旨在定义和描述电费管理系统的需求规格,包括系统的功能需求、性能需求、可靠性需求、可用性需求、安全性需求等方面的详细描述。
该文档的读者包括开发团队、测试团队、项目管理人员以及相关的利益相关者。
2. 需求概述2.1 目标电费管理系统旨在提供一个便捷、高效的电费管理解决方案,方便用户查询、缴纳电费,并提供电费使用情况的统计报表。
2.2 范围电费管理系统涵盖以下主要功能:- 用户登录与权限管理- 电费查询与缴纳- 电表读数录入与管理- 报表与统计分析- 系统管理与维护3. 功能需求3.1 用户登录与权限管理3.1.1 用户注册:用户可以通过填写必要的个人信息注册系统账号。
3.1.2 用户登录:已注册用户可以通过用户名和密码登录系统。
3.1.3 用户权限管理:系统管理员可以设置不同用户的权限,包括查看电费信息、缴纳电费、录入电表读数等权限。
3.2 电费查询与缴纳3.2.1 电费查询:用户可以根据房间号或户主姓名查询相应房间的电费情况。
3.2.2 电费缴纳:用户可以选择在线缴纳电费,并提供多种支付方式,如、支付等。
3.3 电表读数录入与管理3.3.1 电表读数录入:管理员可以录入用户的电表读数,包括当前读数和上次读数。
3.3.2 电表读数管理:系统可以根据电表读数计算用户的电费,并提供相应的报表和统计。
3.4 报表与统计分析3.4.1 电费统计报表:系统可以根据用户的电费数据相应的统计报表,包括每月、每季度、每年的电费消费情况。
3.4.2 数据分析:系统可以对电费数据进行分析,提供相关的统计图表,帮助用户进行能源管理和节能减排。
3.5 系统管理与维护3.5.1 用户管理:管理员可以管理系统中的用户,包括添加用户、删除用户、修改用户信息等。
3.5.2 系统设置:管理员可以对系统进行配置和设置,包括电费计价规则、支付方式等。
3.5.3 日志管理:系统可以记录用户的操作日志,方便管理员进行系统的审计和故障排查。
浅谈电费收缴管理系统设计

浅谈电费收缴管理系统设计摘要:电力企业应用计算机管理在我国发展时间并不长久,而且在全国发展极不平衡,为了使电力企业电力营业管理模式规范化,实现更加高效的管理,以及为用户提供舒适、快捷的服务,提出了开发电力电费收缴管理系统的需求。
关键词:电费收缴营业结账收费该文阐述某某电力企业电力电费收缴管理系统采用的是C/S模式设计,操作系统采用的是Windows 2003 Server,数据库采用的是SQL 2000数据库,以.NET为系统开发平台。
本系统经过测试,系统具有操作界面友好,实用性强的优势。
针对电力电费收缴的特殊需求,论文首先阐述了用户管理业务分析,主要业务包括增加用户、修改用户信息、查看用户信息以及删除用户等,然后依次详细阐述了交费管理业务分析、营业结账管理业务分析、账单管理业务分析、收费查询管理业务分析、营销账务管理业务分析以及欠费管理业务分析等重要模块。
在某某电力企业电力电费收缴管理系统需求分析的基础上,进而给出了系统设计目标、系统设计原则、系统总体设计框架以及系统详细设计,在系统详细设计中给出了系统数据库设计与功能设计。
该系统采用的是技术,以.NET Framework为框架。
采用了C/S模式。
C/S模式的应用系统最大的好处是不依赖企业外网环境,即无论企业是否能够上网,都不影响应用。
ADO访问数据库的技术。
使得系统开发人员只需考虑编写访问数据的代码而不用关心数据库是如何实现的。
数据库技术,它主要研究如何组织和存储数据,如何高效地获取和处理数据。
1 某某电力企业电力电费收缴管理系统需求分析需求分析,主要是对某某电力企业电力电费收缴管理系统的需求分析,分析了电力电费收缴管理的流程以及相关系统功能需求,并给出数据模型。
其中有用户管理业务分析、交费管理业务分析、营业结账管理业务分析、账单管理业务分析、收费查询管理业务分析、营销账务管理业务分析、欠费管理业务分析。
相对应的则有、用户管理功能需求、交费管理功能需求、营业结账管理功能需求、账单管理功能需求、收费查询管理功能需求、欠费管理功能需求。
2019预付电费管理系统操作流程

2019预付电费管理系统操作流程Managing prepaid electricity in 2019 requires a systematic approach to ensure smooth operations and customer satisfaction. 预付电费管理系统需要一个系统化的方法来确保运营顺利,以及客户满意度。
First and foremost, it is crucial to have a user-friendly interface for customers to top up their prepaid electricity. 客户可以轻松充值预付电费,非常关键。
This can be achieved by implementing a mobile app that allows customers to conveniently top up their electricity balance from anywhere. 这可以通过实施一个手机应用程序来实现,客户可以方便地从任何地方充值他们的电费余额。
The app should be easy to use, with a simple and intuitive design that allows customers to check their balance, track their electricity usage, and top up their account with just a few clicks. 应用程序应该易于使用,设计简单直观,让客户可以轻松查看他们的余额,追踪他们的用电量,以及通过几次点击来充值他们的账户。
In addition to the mobile app, customers should also have the option to top up their prepaid electricity through various channels such as online payment platforms, ATM machines, or designated kiosks. 除了手机应用程序,客户也应该有通过各种渠道充值预付电费的选项,比如在线支付平台,ATM机,或者指定的服务台。
2023年电费管理系统模板

03
数据安全与隐私保护
Data Security and Privacy Protection
数据加密与权限控制
1. 数据加密的重要性:电费管理系统涉及到用户的隐私数据,包括用户的电费消耗、账单信息等。为了保护用户的隐私,数据加密技术是非常重要的。通过对数据进行加密,可以防止未经授权的访问和窃取,确保用户信息的安全性。
2. 权限控制的必要性:电费管理系统中存在不同用户角色,如管理员、维护人员和普通用户。不同角色具有不同的操作权限和访问权限。因此,实施权限控制是必要的。通过明确和限制每个角色可以执行的操作,可以保证系统的稳定性和安全性,防止不当操作和滥用权限。
3. 数据访问监控和审计:为了确保电费管理系统的合规性和追踪数据访问情况,应该实施数据访问监控和审计机制。通过监控和记录用户对系统数据的访问行为,可以及时发现异常操作并采取相应措施。审计记录也可以用于审计和调查目的,以确保数据使用的合法性和正确性。
3. 数据分析:在获得了准确的能耗数据之后,电费管理系统需要具备数据分析的能力。它可以通过对能耗数据的统计、分析和对比,发现能耗异常、高负荷用电等问题,并提供相应的优化方案,以减少能耗和节约电费。
4. 能效评估:电费管理系统还应该具备能效评估的功能。通过对能耗数据的分析和对比,可以评估不同用电点的能效水平,并提供相应的改进建议。这有助于企业提高能源利用效率,减少资源浪费,达到可持续发展的目标。
2.b) 用户信息采集:系统需要记录每个用户的基本信息,例如用电类型、用电量等。通过对用户信息的采集和分析,可以更好地优化电费管理策略,提高运营效率。
3. 数据分析:数据采集后,对数据进行合理的分析是电费管理系统的核心功能。以下两个方面值得关注:
4.a) 用电数据分析:系统需要能够对采集到的用电数据进行深入分析,例如分析用电峰谷时段、用电波动情况等。这样可以帮助运营人员了解用户的用电习惯,进一步优化电费管理方案,达到节约用电、降低成本的目的。ຫໍສະໝຸດ 自动化报表生成实时监测
电表管理系统

毕业设计电表管理系统班级________学号____摘要 (1)Abstract (2)第一章引言 (4)1.1 课题背景 (4)1.2 系统简介 (5)第二章系统的分析 (6)2.1 系统开发的目标和思想 (6)2.2 系统的可行性分析 (8)第三章系统的设计 (18)3.1 系统的功能结构设计 (18)3.2 系统的数据库设计3.3 界面设计与代码设计 (23) (24)结束语 (46)致 (47)参考文献 (48)摘要传统的电费管理都是由工作人员手工查表,抄表完成的,其中要完成用户电费的收取,每月抄度,用户购电情况查询,以及列出欠费用户的信息,之类的信息.其工作强度大,工作流程繁琐,由于工作人员的不细心,将会造成电费收支的出错也是经常发生的.鉴于以上原因我们有必要开发一种帮作电费管理人员的软件系统,可以完成检查用户用电情况,每月抄度,信息录入以及基本数据维护的各项功能.本系统采用visual basic 6.0与微软Access数据库方式.界面尽量做到人性化,数据维护方面做到可靠安全.关键字: 电费管理,visual basic, Access,数据库AbstractElectricity from the traditional management staff are artisanal Chabiao, meter reading completed, which should be completed by the users of electricity per month penalty for users to buy electricity enquiries, and a list of user information channels list such information. Itswork-intensive, cumbersome workflow, because staff are not careful. would result in the tariff revenue is recurring mistakes. Given the above reasons we need to develop a management software to help make electricity system, the user can complete the inspection of electricity monthly copied degrees, Information includes basic data and the maintenance function. with the system using visual basic Microsoft Access 6.0 database. as far as possible humanization interface, data maintenance to reliable security.keyword : tariff management, visual basic, Access, the database第一章引言1.1课题背景传统的电费管理都是由工作人员手工查表,抄表完成的,其中要完成用户电费的收取,每月抄度,用户购电情况查询,以及列出欠费用户的信息,之类的信息.其工作强度大,工作流程繁琐,由于工作人员的不细心,将会造成电费收支的出错也是经常发生的.鉴于以上原因我们有必要开发一种帮作电费管理人员的软件系统,可以完成检查用户用电情况,每月抄度,信息录入以及基本数据维护的各项功能.本系统采用visual basic 6.0与微软Access数据库方式.界面尽量做到人性化,数据维护方面做到可靠安全.1.2系统简介本系统主要由以下几大功能模块组成:一.用户交费:(交纳电费,本日小节)二.本月抄度:(单户抄度多户抄度)三.资料导出 (全部清单,欠费清单)四.数据查询 (电费查询与统计,用户欠费查询)五.信息录入 (资料录入,资料修改, 资料删除)六.系统数据维护 (数据备份,数据恢复)七.基本数据维护 (用户类型维护, 操作员维护)八.帮助九.退出第二章系统的分析2.1系统开发的目标和思想本系统主要服务于电费管理人员的日常工作.设计思路主要参照工作人员抄表,记录资料,资料管理,信息录入等方面的工作流程展开的.2.2系统的可行性分析本系统采用visual basic6.0与微软的access作为数据库结合.在系统编写上具有可行性.经济方面:本系统可以服务电厂,电费管理单位,为企业节省人力开支.社会方面:服务于大众,方便抄表人员工作,可靠方便.第三章系统的设计3.1系统的功能结构设计3.2系统的数据库设计1.用户类型表:2.密码表:3.MaxID表:字段名称数据说明TableName 文本MaxID 数字3.3界面设计与代码设计1.用户登陆界面设计:3.4界面设计与代码设计用户登陆界面代码分析:Private Sub Command1_Click()Dim rstpchard As New ADODB.RecordsetDim reHard As StringDim getid As StringreHard = GetpcHard(getid)rstpchard.Open "select * from getpchard ", gCnn, adOpenKeyset, adLockBatchOptimisticIf rstpchard.RecordCount = 0 Thenrstpchard.AddNewrstpchard.Fields(0) = reHardrstpchard.UpdateBatch adAffectCurrentElseIf Trim(reHard) <> Trim(rstpchard.Fields(0)) ThenMsgBox " 对不起,使用不合法请与开发者联系! ", vbInformationEndEnd IfEnd IfIf Check1.Value = 1 ThenSet rec = New ADODB.Recordsetrec.Open "select * from 记住密码", gCnn, 3, 3rec("标记") = "1"If Combo2.Text <> "" Thenrec("") = Combo2.TextElserec("") = ""End IfIf Combo1.Text <> "" Thenrec("权限") = Combo1.TextElserec("权限") = ""End IfIf Text2.Text <> "" Thenrec("密码") = Text2.TextElserec("密码") = ""End Ifrec.Updaterec.CloseElseSet rec = New ADODB.Recordsetrec.Open "select * from 记住密码", gCnn, 3, 3rec("标记") = "0"rec.Updaterec.CloseEnd IfDim rec1 As ADODB.RecordsetSet rec1 = New ADODB.Recordsetrec1.Open "select * from 登录人员", gCnn, 3, 3Set rec = New ADODB.Recordsetrec.Open "select * from 密码表 where ='" & Combo2.Text & "'and 操作权限='" & Combo1.Text & "'and 密码='" & Text2.Text & "'", gCnn, 3, 3 If rec.EOF = False ThenIf rec("操作权限") <> "管理员" Then' FRMMAIN.XZCK.Enabled = FalseMDIme.mczy.Enabled = FalseMDIme.xtwh.Enabled = FalseMDIme.del.Enabled = False' FRMMAIN.DJGL.Enabled = False' FRMMAIN.delte.Enabled = FalseElse' Me.XZCK.Enabled = TrueMDIme.mczy.Enabled = TrueMDIme.xtwh.Enabled = TrueCreateNewKey HKEY_CURRENT_USER, "ZhiYuanTechnologe" SetKeyValue HKEY_CURRENT_USER, "ZhiYuanTechnologe", "UserName", dlj, REG_SZSetKeyValue HKEY_CURRENT_USER, "ZhiYuanTechnologe", "PassWord", dlj, REG_SZ' FRMMAIN.DJGL.Enabled = True' FRMMAIN.delte.Enabled = TrueEnd Ifrec1("") = Combo2.Textrec1.Updaterec1.CloseMe.HideGuser = Combo2.TextMDIme.ShowElseMsgBox "权限或密码不正确,请重试!", vbInformationEnd Ifrec.CloseEnd SubPrivate Sub Command11_Click()End SubPrivate Sub Command2_Click()Combo2.Text = ""Text2.Text = ""Combo1.Text = ""End SubPrivate Sub Command3_Click()EndEnd SubPrivate Sub Command4_Click()Me.HideFRMMMXG.Show 1End SubPrivate Sub Form_Activate()Text2.Text = ""Combo1.Text = ""Combo2.Text = ""Set rec = New ADODB.Recordsetrec.Open "select * from 记住密码", gCnn, 3, 3If rec("标记") = "0" Or rec("标记") = "1" ThenCheck1.Value = rec("标记")End Ifrec.CloseSet rec = New ADODB.Recordsetrec.Open "select * from 记住密码", gCnn, 3, 3If rec("标记") = 1 ThenCombo2.Text = rec("")Combo1.Text = rec("权限")Text2.Text = rec("密码")End Ifrec.CloseCommand1.SetFocusEnd SubPrivate Sub Form_Load()gCnn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:database password= " & DbPassword & " ;Data Source= " & _ App.Path & "\data\dbdb.mdb;Persist Security Info=False"gCnn.CursorLocation = adUseClientgCnn.OpenSet rec = New ADODB.Recordsetrec.Open "select distinct from 密码表", gCnn, 3, 3With Combo2Do Until rec.EOF.AddItem rec("")rec.MoveNextLoopEnd Withrec.CloseSet rec = NothingEnd SubPrivate Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer) Cancel = TrueSelect Case MsgBox("此操作将退出本系统,继续吗?", vbYesNo, "警告") Case vbYesCancel = FalseEndCase ElseCancel = TrueEnd SelectEnd Sub2.主界面设计:主界面代码设计:Private Sub alllm_Click()frmList.qfFlg = FalsefrmList.ShowEnd SubPrivate Sub backup_Click()frmbeifen.ShowEnd SubPrivate Sub benrixiaojie_Click()frmCount.ShowEnd SubPrivate Sub Command1_Click()frameFee.Visible = FalseEnd SubPrivate Sub cmdQuery_Click()Dim rst As New ADODB.Recordsetrst.Open " select * from panelinfo where holder='" & Me.txtUser & "' and delflag<>true ", gCnn, adOpenStatic, adLockBatchOptimisticIf rst.RecordCount <> 0 Thendcvalue.Text = rst.Fields(2)txtUserName(0) = rst.Fields(1)txtUserName(1) = rst.Fields!nowecounttxtUserName(2) = rst.Fields!cendcodedtpwdate.Value = rst.Fields(4)txtUserName(3) = Format(rst.Fields!lMoney, "###0.00")txtUserName(4) = Format(rst.Fields!bmoney, "###0.00")txtUserName(6) = Format(rst.Fields!lsFee, "###0.00")'txtUserName(5) = txtUserName(1) * rst.Fields!lMoney *(rst.Fields!lightScale / 100) + txtUserName(1) * txtUserName(4) * (1 - rst.Fields!lightScale / 100)txtUserName(5) = Format(txtUserName(1) * rst.Fields!lMoney * (rst.Fields!lightScale / 100) + rst.Fields!nowecount * rst.Fields!bmoney * (1 - rst.Fields!lightScale / 100), "###0.00")txtUserName(8) = rst.Fields(9)txtUserName(7) = Format(Val(txtUserName(5)) +Val(txtUserName(6)), "####0.00")dcNum.Text = rst.Fields(1)ElseMsgBox " 没有查询到数据! ", vbInformationEnd Ifrst.CloseSet rst = NothingEnd SubPrivate Sub dcNum_Click(Area As Integer)Dim rst As New ADODB.Recordsetrst.Open " select * from panelinfo where holderid='" & dcNum.Text & "'and delflag<>true ", gCnn, adOpenKeyset, adLockBatchOptimisticIf Not rst.EOF Thendcvalue.Text = rst.Fields(2)txtUserName(0) = rst.Fields(1)txtUserName(1) = rst.Fields!nowecounttxtUserName(2) = rst.Fields!cendcodedtpwdate.Value = rst.Fields(4)txtUserName(3) = Format(rst.Fields!lMoney, "###0.00")txtUserName(4) = Format(rst.Fields!bmoney, "###0.00")txtUserName(6) = Format(rst.Fields(8), "####0.00")txtUserName(5) = Format(txtUserName(1) * txtUserName(3) * (rst.Fields!lightScale / 100) + txtUserName(1) * txtUserName(4) * (1 - rst.Fields!lightScale / 100), "####0.00")txtUserName(8) = rst.Fields(9)txtUserName(7) = Format(Val(txtUserName(5)) +Val(txtUserName(6)), "####0.00")End Ifrst.CloseEnd SubPrivate Sub dcvalue_Click(Area As Integer)Dim rst As New ADODB.Recordsetrst.Open " select * from panelinfo where holderid='" & dcvalue.BoundText & "' and delflag<>true ", gCnn, adOpenStatic, adLockBatchOptimisticIf Not rst.EOF Thendcvalue.Text = rst.Fields(2)txtUserName(0) = rst.Fields(1)txtUserName(1) = rst.Fields!nowecounttxtUserName(2) = rst.Fields!cendcodedtpwdate.Value = rst.Fields(4)txtUserName(3) = Format(rst.Fields!lMoney, "###0.00")txtUserName(4) = Format(rst.Fields!bmoney, "###0.00")txtUserName(6) = Format(rst.Fields!lsFee, "###0.00")'txtUserName(5) = txtUserName(1) * rst.Fields!lMoney *(rst.Fields!lightScale / 100) + txtUserName(1) * txtUserName(4) * (1 - rst.Fields!lightScale / 100)txtUserName(5) = Format(txtUserName(1) * rst.Fields!lMoney * (rst.Fields!lightScale / 100) + rst.Fields!nowecount * rst.Fields!bmoney * (1 - rst.Fields!lightScale / 100), "###0.00")txtUserName(8) = rst.Fields(9)txtUserName(7) = Format(Val(txtUserName(5)) +Val(txtUserName(6)), "####0.00")dcNum.Text = rst.Fields(1)End Ifrst.CloseSet rst = NothingEnd SubPrivate Sub dcvalue_KeyPress(KeyAscii As Integer)KeyAscii = 0End SubPrivate Sub del_Click()frmdel.ShowEnd SubPrivate Sub dhcb_Click()usrcopyP.ShowEnd SubPrivate Sub dhcp_Click()frmCopyP.ShowEnd SubPrivate Sub duohu_Click()frmCuifei.muser1 = 2frmCuifei.ShowEnd SubPrivate Sub edit_Click()frmEdit.ShowEnd SubPrivate Sub exit_Click()EndEnd SubPrivate Sub insert_Click()frmInsert.Show 1End SubPrivate Sub jiaonadianfei_Click()frmFee.ShowEnd SubPrivate Sub M_USERYTPE_Click()FRMUSERTYPE.Show 1End SubPrivate Sub MDIForm_Load()loadAddEnd SubPublic Sub loadAdd()If rst.State = 1 Thenrst.CloseEnd Ifrst.Open " select * from panelinfo where delflag<>true ", gCnn, adOpenKeyset, adLockBatchOptimisticIf rst.RecordCount <> 0 ThenSet dcvalue.RowSource = rstdcvalue.BoundColumn = "holderID"dcvalue.ListField = "holder"Set dcNum.DataSource = rstSet dcNum.RowSource = rstdcNum.ListField = "holderid"If Not rst.EOF ThendcNum.Text = rst.Fields!holderiddcvalue.Text = rst.Fields(2)txtUserName(0) = rst.Fields(1)txtUserName(1) = rst.Fields!nowecounttxtUserName(2) = rst.Fields!cendcodedtpwdate.Value = rst.Fields(4)txtUserName(3) = Format(rst.Fields!lMoney, "##0.00")txtUserName(4) = Format(rst.Fields!bmoney, "###.0.00")txtUserName(6) = rst.Fields!lsFeetxtUserName(5) = Val(txtUserName(1)) * Val(txtUserName(3)) * (Val(rst.Fields!lightScale) / 100) + Val(txtUserName(1)) *Val(txtUserName(4)) * (1 - rst.Fields!lightScale / 100)txtUserName(8) = rst.Fields(9)txtUserName(7) = Val(txtUserName(5)) + Val(txtUserName(6))rst.Fields!cFeeMoney = txtUserName(7)rst.UpdateBatch adAffectCurrentEnd IfEnd IfEnd SubPublic Sub loadData(Hid As String)Dim rst As New ADODB.RecordsetDimn As New ADODB.ConnectionDim Atimes As IntegerDim sqlAdd As Stringn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:database password= " & DbPassword & " ;Data Source= " & _App.Path & "\data\dbdb.mdb;Persist Security Info=False"n.CursorLocation = adUseClientn.OpenIf Trim(Hid) <> "" Thenrst.Open " select * from panelinfo where holderid='" & Hid & "' and delflag<>true ",n, adOpenStatic, adLockBatchOptimisticElserst.Open " select * from panelinfo where delflag<>true ",n, adOpenStatic, adLockBatchOptimisticEnd IfIf Not rst.EOF ThendcNum.Text = rst.Fields!holderiddcvalue.Text = rst.Fields(2)txtUserName(0) = rst.Fields(1)txtUserName(1) = rst.Fields!nowecounttxtUserName(2) = rst.Fields!cendcodedtpwdate.Value = rst.Fields(4)txtUserName(3) = Format(rst.Fields!lMoney, "####0.00")txtUserName(4) = Format(rst.Fields!bmoney, "####0.00")txtUserName(6) = Format(rst.Fields!lsFee, "####0.00")'txtUserName(5) = Format(txtUserName(1) * txtUserName(3) * (rst.Fields!lightScale / 100) + txtUserName(1) * txtUserName(4) * (1 - rst.Fields!lightScale / 100), "####0.00")If rst.Fields!Atimes = 0 ThenAtimes = 1ElseAtimes = rst.Fields!AtimesEnd IftxtUserName(5) = Format(Val(txtUserName(1)) * txtUserName(3) * Atimes, "####0.00")txtUserName(8) = rst.Fields(9)txtUserName(7) = Format(Val(txtUserName(5)) +Val(txtUserName(6)), "####0.00")rst.Fields!cFeeMoney = txtUserName(7)rst.UpdateBatch adAffectCurrentEnd Ifrst.Closen.CloseEnd SubPrivate Sub MDIForm_Unload(Cancel As Integer)gCnn.CloseSet gcon = NothingEnd SubPrivate Sub mgcf_Click()frmFeefind.ShowEnd SubPrivate Sub mhf_Click()frmdaoru.ShowEnd SubPrivate Sub msf_Click()frmFind1.ShowEnd SubPrivate Sub qianfeilm_Click()frmList.qfFlg = TruefrmList.ShowEnd SubPrivate Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button) Select Case Trim(Button.Key)Case "a"frmFee.Show 1Case "b"frmCopyP.ShowCase "c"frmFee.Show 1Case "d"frmbeifen.Show 1Case "e"frmdaoru.Show 1Case "f"frmFeefind.Show 1Case "g"frmFind1.Show 1Case "dhcb1"Case "dbcb2"Case "j"X = MsgBox("真的要退出吗?", vbYesNo + vbQuestion, "警告")If X = vbYes ThenEndElseEnd IfEnd SelectEnd SubPrivate Sub Toolbar1_ButtonMenuClick(ByVal ButtonMenu As MSComctlLib.ButtonMenu)Select Case ButtonMenu.KeyCase "dhcb1"frmCopyP.ShowCase "dhcb2"usrcopyP.ShowEnd SelectEnd SubPrivate Sub weihu_Click()FRMYHSD.ShowEnd SubPrivate Sub yihu_Click()frmCuifei.muser1 = 1frmCuifei.ShowEnd Sub4.备份界面设计::备份代码设计:Private Sub Command1_Click()Dim a As Stringa = App.Patha = a & "\"b = Text1.Text'On Error GoTo errhandle:Dim filename As Stringfilename = "" & Text1.Text & "dbdb.mdb"If a = Text1.Text ThenMsgBox "备份目录与原文件目录相同,请重新选择!"Exit SubEnd IfIf Dir("" & b & "dbdb.mdb") <> "" ThenDim llp As Stringllp = MsgBox("此目录下已有该文件,要覆盖吗?", vbYesNo, "备份文件")If llp = vbYes ThenKill ("" & b & "dbdb.mdb")FileCopy "" & a & "\data\dbdb.mdb", "" & b & "dbdb.mdb"Dim ll = MsgBox(" 备份成功! ", vbOKOnly, "提示")ElseExit SubEnd IfElseFileCopy "" & a & "\data\dbdb.mdb", "" & b & "dbdb.mdb"Dim llll = MsgBox(" 备份成功! ", vbOKOnly, "提示")End IfExit Sub'errhandle:'MsgBox "出现错误,不能复制", vbOKOnly + vbCritical, "复制文件" 'Resume NextEnd SubPrivate Sub Command2_Click()'dy'Me.HideUnload MeEnd SubPrivate Sub Dir1_Change()'Drive1.Drive = Dir1If Right(Dir1.Path, 1) <> "\" ThenText1.Text = Dir1.Path + "\"ElseText1.Text = Dir1.PathEnd IfCommand1.Enabled = TrueEnd SubPrivate Sub Dir1_Click()If Right(Dir1.Path, 1) <> "\" ThenText1.Text = Dir1.Path + "\"ElseText1.Text = Dir1.PathEnd IfCommand1.Enabled = TrueEnd SubPrivate Sub Drive1_Change()Dir1.Path = Drive1.DriveEnd SubPrivate Sub Form_Activate()Command1.Enabled = FalsegCnn.CloseChDrive App.PathChDir App.Path'Text1.SetFocus'Text1.Text = "c:\"Text1.Text = CurDir()Text1.Enabled = FalseEnd SubPrivate Sub Form_Load()ChDrive App.PathChDir App.PathEnd SubPrivate Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer) dyEnd SubPrivate Sub Form_Unload(Cancel As Integer)If gCnn.State = 0 ThengCnn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:database password= " & DbPassword & " ;Data Source= " & _App.Path & "\data\dbdb.mdb;Persist Security Info=False"gCnn.CursorLocation = adUseClientgCnn.OpenEnd IfMDIme.loadAddEnd Sub5.单户抄表界面设计:单户抄表代码设计:Private Sub Command2_Click()Dimn As New ADODB.ConnectionDim rstE As New ADODB.RecordsetDim cmdExe As New mandDim nowEv As DoubleDim sqlAdd As StringIf Trim(txtUserName(0).Text) = "" ThenMsgBox " 没有要抄表用户,请先添加用户! ", vbInformation Exit SubEnd IfIf Trim(txtUserName(9).Text) = "" ThenMsgBox " 请先输入数据! ", vbInformationExit SubEnd IfIf Trim(txtUserName(9).Text) < Trim(txtUserName(2).Text) Then MsgBox " 输入数据错误,当前止码太小! ", vbInformation Exit SubEnd Ifn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:database password= " & DbPassword & " ;Data Source= " & _ App.Path & "\data\dbdb.mdb;Persist Security Info=False"n.CursorLocation = adUseClientn.OpencmdExe.ActiveConnection =nrstE.Open "select nowecount from panelinfo where holderID= '" & Trim(txtUserName(0)) & "'",n, adOpenStatic, adLockBatchOptimisticnowEv = Val(rstE.Fields(0).Value) + (Val(txtUserName(9)) -Val(txtUserName(2)))sqlAdd = "update panelinfo set LEndPCode=" &Val(txtUserName(2).Text) & ",cEndCode=" & Val(txtUserName(9).Text) & ",nowEcount=" & nowEv & " ,writedate=#" & dtpwdate(1) & "# where holderID= '" & Trim(txtUserName(0)) & "'"mandText = sqlAddcmdExe.Execute sqlAdd'n.Execute sqlAddtxtUserName(2).Text = txtUserName(9)txtUserName(9) = ""n.CloseMsgBox " 数据保存完成! ", vbInformationUnload MeEnd SubPrivate Sub Form_Load()Dim rst As New ADODB.RecordsetDim sqlEdit As Stringdtpwdate(1).Value = Format(Now, "yyyy-mm-dd")sqlEdit = "select * from panelinfo "sqlEdit = sqlEdit & " where holderid='" & Trim(MDIme.txtUserName(0)) & "'and delflag<>true"rst.Open sqlEdit, gCnn, adOpenStatic, adLockBatchOptimisticIf Not rst.EOF ThentxtUserName(0) = rst.Fields(1)txtUserName(1) = rst.Fields(2)txtUserName(2) = rst.Fields!cendcodedtpwdate(0).Value = rst.Fields(4)End Ifbuttontime = FalseEnd SubPrivate Sub Form_Unload(Cancel As Integer)MDIme.loadData (txtUserName(0))Cancel = 0End SubPrivate Sub nextuser_Click()Dim rst As New ADODB.RecordsetDim sqlEdit As StringsqlEdit = "select * from panelinfo "sqlEdit = sqlEdit & " where holderid<>'" & Trim(txtUserName(0)) & "'and delflag<>true "rst.Open sqlEdit, gCnn, adOpenStatic, adLockBatchOptimisticIf buttontime = False ThenIf Not rst.EOF ThentxtUserName(0) = rst.Fields(1)txtUserName(1) = rst.Fields(2)txtUserName(2) = rst.Fields!cendcodedtpwdate(0).Value = rst.Fields(4)buttontime = TrueEnd IfElserst.MoveNextIf Not rst.EOF ThentxtUserName(0) = rst.Fields(1)txtUserName(1) = rst.Fields(2)txtUserName(2) = rst.Fields!cendcodedtpwdate(0).Value = rst.Fields(4)buttontime = TrueEnd IfEnd IfEnd SubPrivate Sub txtUserName_KeyPress(Index As Integer, KeyAscii As Integer) If Index = 9 ThenIf KeyAscii <> 8 And KeyAscii <> 46 And KeyAscii < 48 Or KeyAscii > 57 Then KeyAscii = 0End IfEnd Sub6.数据导入界面设计:数据导入代码设计:Private Sub Command1_Click()On Error GoTo errhandle:Dim a As Stringa = App.Patha = a & "\"b = Text1.TextDim filename As StringIf Dir("" & a & "计费系统数据库.mdb") <> "" ThenDim ll As Stringll = MsgBox("此目录下有此文件要覆盖吗", vbYesNo, "复制文件")If ll = vbYes ThenKill ("" & a & "计费系统数据库.mdb")FileCopy "" & Text1.Text & "", "" & a & "计费系统数据库.mdb"Dim ll = MsgBox("数据导入成功", vbOKOnly, "提示")ElseExit SubEnd IfElseFileCopy "" & Text1.Text & "", "" & a & "计费系统数据库.mdb" Dim llpllp = MsgBox("数据导入成功", vbOKOnly, "提示")End IfExit Suberrhandle:MsgBox "出现错误,不能复制", vbOKOnly + vbCritical, "复制文件" End SubPrivate Sub Command2_Click()dyUnload MeEnd SubPrivate Sub Dir1_Change()If Right(Dir1.Path, 1) <> "\" ThenText1.Text = Dir1.Path + "\"ElseText1.Text = Dir1.PathEnd IfFile1.Path = Dir1.PathEnd SubPrivate Sub Drive1_Change()If Drive1.Drive = "a:" ThenMsgBox "不能从A盘导入"Exit SubEnd IfDir1.Path = Drive1.DriveEnd SubPrivate Sub File1_Click()Text1.Text = Text1.Text + File1.filenameCommand1.Enabled = TrueEnd SubPrivate Sub Form_Activate()gCnn.CloseCommand1.Enabled = False'Text1.Text = "c:\"Text1.Text = CurDir()Text1.Enabled = FalseEnd SubPrivate Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer) dyUnload MeEnd SubPrivate Sub Form_Unload(Cancel As Integer)If gCnn.State = 0 ThengCnn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:database password= " & DbPassword & " ;Data Source= " & _App.Path & "\data\dbdb.mdb;Persist Security Info=False"gCnn.CursorLocation = adUseClientgCnn.OpenEnd IfMDIme.loadAddEnd Sub7.数据删除界面设计:数据删除代码设计:Private Sub cmdAsure_Click()If MsgBox(" 你确定要删除该数据吗? ", vbInformation + vbYesNo) <> vbYes ThenExit SubEnd IfIf Trim(MDIme.dcvalue.BoundText) <> "" ThenDimn As New ADODB.ConnectionDim sqlAdd As Stringn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:database password= " & DbPassword & " ;Data Source= " & _App.Path & "\data\dbdb.mdb;Persist Security Info=False"n.CursorLocation = adUseClientn.OpensqlAdd = "update panelinfo set delflag=true"sqlAdd = sqlAdd & " where holderid='" &Trim(MDIme.dcvalue.BoundText) & "'"n.Execute sqlAddn.CloseMsgBox " 数据删除完成! ", vbInformationEnd IfEnd SubPrivate Sub Command1_Click()For i = 0 To 10If i <> 9 ThenMDIme.txtUserName(i) = ""End IfNextMDIme.dcNum = ""MDIme.dcvalue = ""Unload MeEnd SubPrivate Sub Form_Load()Dim rst As New ADODB.RecordsetDim sqlEdit As StringsqlEdit = "select * from panelinfo "sqlEdit = sqlEdit & " where holderid='" & Trim(MDIme.txtUserName(0)) & "' and delflag<>true "rst.Open sqlEdit, gCnn, adOpenKeyset, adLockBatchOptimisticIf Not rst.EOF ThentxtUserName(0) = rst.Fields(1)txtUserName(1) = rst.Fields(2)txtUserName(2) = rst.Fields(3)dtpWdate.Value = rst.Fields(4)txtUserName(3) = rst.Fields(5)txtUserName(4) = Format(rst.Fields(6), "####0.00")txtUserName(5) = Format(rst.Fields(7), "####0.00")txtUserName(6) = rst.Fields(8)txtUserName(7) = rst.Fields(9)txtUserName(8) = rst.Fields(10)txtUserName(9) = rst.Fields!cendcodechangeE = rst.Fields!cendcodecEcount = rst.Fields!nowecountIf rst.Fields(14) <> Null ThenDTPicker1.Value = rst.Fields(14)End IftxtUserName(10) = rst.Fields!cFeeMoneyEnd Ifrst.CloseEnd SubPrivate Sub Form_Unload(Cancel As Integer) MDIme.loadAddEnd Sub8.数据修改界面设计:数据修改代码设计:Dim changeE As DoubleDim cEcount As DoublePrivate Sub cmdAsure_Click()If Trim(MDIme.dcvalue.BoundText) <> "" Then Dimn As New ADODB.ConnectionDim sqlAdd As Stringn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:database password= " & DbPassword & " ;Data Source= " & _App.Path & "\data\dbdb.mdb;Persist Security Info=False"n.CursorLocation = adUseClientn.OpensqlAdd = "update panelinfo set holderid='" & txtUserName(0) & "',holder='" & txtUserName(1) & "',LEndPCode='" & txtUserName(2) & "',CopyDate=# " & dtpWdate.Value & "# ,lightscale=" & txtUserName(3) & ",lsfee=" & txtUserName(4) & ",lmoney=" & txtUserName(5) & ",bmoney=" & txtUserName(6) & ",cname='" & txtUserName(7) & "',memotext='" & txtUserName(8) & "',cEndCode=" & txtUserName(9) & ",cFeeMoney=" &Val(txtUserName(10)) & " ,nowecount=" & changeE & ",atimes=" & Me.Text1 & ""sqlAdd = sqlAdd & " where holderid='" &Trim(MDIme.dcvalue.BoundText) & "'"n.Execute sqlAddsqlAdd = "update 用户类型 set UNITPRICE=" & Me.txtUserName(5) & " where ATypeID=" & dcob用途.BoundTextn.CloseMsgBox " 数据修改完成! ", vbInformationEnd IfEnd SubPrivate Sub Command1_Click()Unload MeEnd SubPrivate Sub dcob用途_Click(Area As Integer)Dim rst As New ADODB.RecordsetIf dcob用途.BoundText <> "" Thenrst.Open "select * from 用户类型 where ATypeID=" & dcob用途.BoundText & "", gCnn, adOpenStatic, adLockBatchOptimisticMe.txtUserName(5) = Format(rst.Fields(2), "###0.00")rst.CloseElseMsgBox " 请先添加用户电表类型信息! ", vbInformationExit SubEnd IfEnd Sub。
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
电费计算管理系统摘要电费管理系统是一个供电企业不可缺少的部分,它的内容对于企业管理者来说至关重要,所以供电管理系统应该能够为用电管理者提供充足的信息和快捷的查询手段。
本管理系统是运用vs2010编写而成的。
通过对此管理系统的整个开发过程的研制与应用,来进一步提高电力企业的管理水平,为其管理带来了一定的方便。
本论文论述了系统开发的基本原理,结构,以及电费计算的方法和过程。
本文详细阐述了系统分析、需求分析、概要设计、详细设计、系统实现以及系统维护等软件开发过程。
力求将所学到的知识在信息系统开发中得以全面的应用,并使系统在实际的操作中能按照设计的要求安全有效正确的运行。
关键词:库存管理系统;Visual studio2010; SQLsever;1.概述1.1开发背景随着社会主义市场经济的不断发展和电力体制改革的不断深入,供电部门面临着开拓电力市场、增加售电量的严峻形势,同时电力用户对供电部门的服务质量也提出了更高的要求。
传统的电费管理都是由工作人员手工查表,抄表完成的,其中要完成用户电费的收取,每月抄表,用户购电情况查询,以及列出欠费用户的信息名单之类的信息。
其工作强度大,工作流程繁琐,由于工作人员的不细心,将会造成电费收支的出错也是经常发生的。
1.2选题的意义采用该电费管理系统,在管理节省了时间,为部门节省了大量的人力和物力;并且方便业主对自己相关信息的了解,真正做到电费管理的透明化、高效性、方便性。
适应了当今社会高效、便捷的要求。
本软件适用于库存管理,是一个很方便的库存管理软件,能帮助管理人员利用计算机,快速的对物品进行管理,其基本信息包括客户信息,仓库信息和用户信息。
客户可以分为供应商和购货商两种,在产品入库时,需要提供供应商信息。
本系统是基于windows系统,VS2010开发平台以及SQL20082.需求分析2.1业务分析2.1.1使用范围对于用户用电的统计和计算进行管理,能够实现查询、添加和删除的操作,要求管理员与普通用户能够实现不同的功能操作,以确保管理过程中数据的安全性。
2.1.2系统研究内容本系统包含如下功能:(1) 用户交费管理有电费交费功能,电费交费时包括应收电费,实收现金,滞纳金,实现电费的收取。
(2)本月抄表管理有录入抄表信息功能,抄表信息包括用户编号,用户姓名,上次至码,抄表日期,当前至码,抄录日期。
(3)数据查询管理有电费查询的功能,电费查询时包括用户电费查询以及用户欠费查询,电费查询与统计包括用户编号,用户名称,应交金额,实交金额,本月电量(度),交费日期,用户欠费查询包括用户编号,用户名称,欠费。
2.1.3信息录入管理实现用户信息的管理,用户的信息包括用户编号,用户姓名,用户类型,当前至码,抄表日期,上次欠费,电价(元/度),抄表人员,备注,电表倍数,可以实现用户信息录入,信息修改,信息删除等功能。
2.1.4 系统数据维护管理实现用户数据维护的功能,数据维护包括用户类型维护以及操作员维护。
用户类型维护包括电表类型,单价,有对电表类型进行添加,删除的功能,操作员维护包括姓名,权限,添加用户,删除用户,实现用户数据维护的图2.1 系统流程分析图2.2功能分析2.2.1设计方法1.查询相关资料,了解本系统的研究意义。
可以上网搜索或者是去图书馆查阅相关资料。
2.通过查询资料了解该系统要如何做,及要做哪些东西。
3.设计出大体上的功能模块,画出模块图。
4.通过进一步的了解,对每个功能模块进行细化,将每一步都想清楚。
制定出每一步的做法和注意的地方。
5.对设计好的程序进行调试,通过调试发现存在的问题并解决,从而达到完善系统的目的。
6.最后,整理各阶段的设计记录文档,写成论文稿。
2.2.2数据分析1.信息采集与各部门的使用权限要求普通用户和管理员能够实现不同的操作,对不同用户,设置使用权限。
2. 数据的完整性,准确性(1)录入数据采用表格方式,限制录入数据类型及取值范围以保证数据的完整性及准确性。
(2)系统具有部分反悔修改功能,系统备有的修改功能均可反悔。
3.数据安全性本系统采用二级安全保障第一级:对用户使用权限加以限制。
第二级:在程序模块中通过使用密码控制功能对用户使用权限加以限制。
2.2.3其他需求要求界面适当美观,幽雅,通用性比较强。
3.数据库逻辑设计数据库逻辑结构设计有两个目标,一是对需求分析中的实体建立对应的表,二是将实体之间的联系映射到表时间的关系上,具体来说就是设置表的主键和外键。
在设计数据表结构之前,首先要创建一个数据库,本系统使用的是在SQL2005环境下建立的数据库,其中包含一下四个表:仓库表、用户表、商品表和生厂商表。
为了对用户进行管理,设计了用户表,其中包括用户名,用户类型,用户登录密码,以实现对用户访问权限的限制以及不同用户的使用权限不通,管理员可以实现对该表的插入和删除操作。
具体结构如下:表3.1 用户类型表用户名密码用户类型用户类型编码gzc 123 管理员 1wlh 456 普通用户 2lzp 567 普通用户 2为了对不同的用电进行分类管理,以确保用电管理的规范性,而设计了用电量类型表,其中包括产品的基本信息,如:用电类型、编号、收费标准(kw/h)等信息。
其中,编号为主键,管理员可以实现对用电类型表的查询、插入和删除操作。
具体结构如下:表3.2 用电量类型表用户类型用电编号收费标准居民用电 1 0.5商业用电 2 1.5为为了对普通用户进行管了,设计了普通用户表,其中包括用户名,用户号,预存款,当余额,联系电话,本月用电量,拖欠款,用户类型编号,用电编号,其中,用户号为何主键,每个用户的用户号是唯一的,具体结构如下:表3.3 生厂商表用户名用户号联系电话用电类型编号用户类型编号预存款当前余额本月用电量拖欠款齐大 1 1234 1 2 20.1 12.0 20 0 吉大 2 5678 1 2 50.8 49.1 4.5 0 北大 3 1456 1 2 80.4 34.9 38.2 0 工大 4 3345 2 2 30.6 10.8 19 04软件功能设计图4.1 库存管理系统功能模块示意图4.1用户信息管理用户信息模块可以实现以下功能:添加用户类别;修改用户类别;删除用户类别;查看用户类别;添加用户信息;修改用户信息;删除用户信息;查询用户信息。
4.2电费操作管理通过硬部件设计,将用户当前用电信息及时准确的导入数据库,有管理员以及系统来时实现对数据的计算操作。
4.3统计查询管理功能统计查询管理模块可以对用户以及用电进行各种类型的统计查询,从而使用户能够全面的了解用电状况。
5.界面设计系统主页面显示了该系统的所有功能。
它应用C#中的选单编辑器来实现这一功能。
利用选单的基本功能有两个,一是提供人机对话的接口,以便让用户选择应用系统的各种功能;二是管理应用系统,控制各种功能模块的运行。
选单一般分为两种基本类型:下拉式选单和弹出式选单。
还包括了scrip脚本文件。
该系统应用的是下拉式。
每一个选单只包含一个Click事件,当鼠标选中该选单控件时,将调用该事件。
在VS2010的环境下,打开文件名为库存管理的工程,首先我们登录的界面是一个用户名与密码的界面。
如下图所示,用户名,密码可以在数据库中查询,然后点“确定”按钮就可以成功地进入到我们的管理系统中了。
界面1 用户登陆界面登陆成功之后,将进入主界面,将ADO.Data、AataGrid、DataCombo等控件添加入工程中,并制作一个背景图片,修改其属性,设为平铺,将其边框调整为适当大小。
系统界面总图如下所示:界面2 主界面进入主界面之后,用户可以对数据库信息插入、删除以及修改等操作,其所查询的信息加会直接显示在当前页面之中,当所包含的信息过多时,可通过拉伸滚动条来完成查询操作,其具体结构如下:界面3 查询界面当需要对产品信息进行删除操作时,则单击“查询”选项卡,所要修改的行,进行操作完之后,需要刷新才能完成数据库的更新,其具体结构如下:界面4 删除界面当对数据库进行删除操作时,为了确保用户进行非法操作或是操作失误,系统会提示用户,确认是否进行删除操作,界面图如下:界面5 确认删除当要对数据库进行插入操作时,为了使用户感觉到方便,需要进入新的界面,输入基本信息,单击确认即可,具体结构如下:界面6 插入界面用户抄表单界面界面如下:界面7 用户抄表单界6.结束语本软件的设计目的是在电表收费管理维护方面为企事业单位和管理人员提供方便和帮助。
通过段时间的开发,我学到很多以前没有学到的VS 2010开发技术,在硬部件上有了很大的进步的同时在软件工程学上更是取得了很大的进步。
经过大量的测试和试用,作者深信本软件达到了方便和实用的设计目的,并在软件界面和易用实用等方面有着独到之处。
肃然在卡法过程中遇到了很多问题,但是经过不断地测试和调试,已经基本解决,可以使用。
虽然软件基本达到设计要求并且达到同行的先进水平,但由于作者水平限,软件存在bug也是在所难免的,希望用户能给予意见或建议。
7.参考文献1.王珊,萨师煊,数据库系统概论(第四版).北京:高等教育出版社,20062.张海藩,软件工程.清华大学出版社 20053.Anders Hejlsberg,C#程序设计语言.机械工程出版社 20094.何立明.单片机高级教程——应用与设计,北京:北京航天航空大学出版社, 2000.4,149-173.5. 李广弟,朱月秀.单片机基础,北京:北京航空航天大学出版社,2001.8, 36-85.6. 楼然苗,李光飞.MCS-51系列单片机设计实例,北京:北京航天航空大学出版社,2001.3,75-83.7. 李华.单片机原理与接口技术,北京:清华大学出版社,33-80.8. 王伟.高性能、低功耗带RAM实时时钟芯片DS1302(上),电子世界:第一期,1995,26-35.。