电表管理系统样本.doc

上传人:m**** 文档编号:550933182 上传时间:2023-09-30 格式:DOC 页数:62 大小:431.54KB
返回 下载 相关 举报
电表管理系统样本.doc_第1页
第1页 / 共62页
电表管理系统样本.doc_第2页
第2页 / 共62页
电表管理系统样本.doc_第3页
第3页 / 共62页
电表管理系统样本.doc_第4页
第4页 / 共62页
电表管理系统样本.doc_第5页
第5页 / 共62页
点击查看更多>>
资源描述

《电表管理系统样本.doc》由会员分享,可在线阅读,更多相关《电表管理系统样本.doc(62页珍藏版)》请在金锄头文库上搜索。

1、毕业设计电表管理系统班级_姓名_学号_摘 要1Abstract2第一章 引言411 课题背景412 系统简介5第二章 系统分析621 系统开发目的和思想622 系统可行性分析8第三章 系统设计1831 系统功能构造设计1832 系统数据库设计33 界面设计与代码设计2324结束语46道谢47参照文献48摘 要 老式电费管理都是由工作人员手工查表,抄表完毕,其中要完毕顾客电费收取,每月抄度,顾客购电状况查询,以及列出欠费顾客信息名单,之类信息.其工作强度大,工作流程繁琐,由于工作人员不细心,将会导致电费收支出错也是经常发生.鉴于以上因素咱们有必要开发一种帮作电费管理人员软件系统,可以完毕检查顾客

2、用电状况,每月抄度,信息录入以及基本数据维护各项功能.本系统采用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 us

3、ers to buy electricity enquiries,and a list of user information channels list such information. Its work-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 mak

4、e 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 secur

5、ity. keyword :tariff management,visual basic,Access,the database第一章 引言11 课题背景老式电费管理都是由工作人员手工查表,抄表完毕,其中要完毕顾客电费收取,每月抄度,顾客购电状况查询,以及列出欠费顾客信息名单,之类信息.其工作强度大,工作流程繁琐,由于工作人员不细心,将会导致电费收支出错也是经常发生.鉴于以上因素咱们有必要开发一种帮作电费管理人员软件系统,可以完毕检查顾客用电状况,每月抄度,信息录入以及基本数据维护各项功能.本系统采用visual basic 6.0与微软Access数据库方式.界面尽量做到人性化,数据维护方面

6、做到可靠安全.12 系统简介 本系统重要由如下几大功能模块构成:一. 顾客交费:(交纳电费,本日小节)二. 本月抄度:(单户抄度 多户抄度)三. 资料导出 (所有清单,欠费清单)四. 数据查询 (电费查询与记录,顾客欠费查询)五. 信息录入 (资料录入,资料修改,资料删除)六. 系统数据维护 (数据备份,数据恢复)七. 基本数据维护 (顾客类型维护,操作员维护)八. 协助九. 退出第二章 系统分析21 系统开发目的和思想 本系统重要服务于电费管理人员寻常工作.设计思路重要参照工作人员抄表,记录资料,资料管理,信息录入等方面工作流程展开.22 系统可行性分析本系统采用visual basic6.

7、0与微软access作为数据库结合.在系统编写上具备可行性.经济方面:本系统可以服务电厂,电费管理单位,为公司节约人力开支.社会方面:服务于大众,以便抄表人员工作,可靠以便.第三章 系统设计31 系统功能构造设计程序登陆主界面顾客交费本月抄费资料导出数据查询信息录入系统数据维护基本数据维护协助退出32 系统数据库设计1. 顾客类型表:字段名称数据类型阐明ATypeID自动编号AType文本电费类型UNITPRICE货币Adate日期/时间电费设立日期2. 密码表:字段名称数据类型姓名文本操作权限文本密码文本3. MaxID表:字段名称数据阐明TableName文本MaxID数字33 界面设计与

8、代码设计1.顾客登陆界面设计:34 界面设计与代码设计顾客登陆界面代码分析: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 Then rstpchard.AddNew rstp

9、chard.Fields(0) = reHard rstpchard.UpdateBatch adAffectCurrentElse If Trim(reHard) Trim(rstpchard.Fields(0) Then MsgBox 对不起,使用不合法请与开发者联系! ,vbInformation End End IfEnd IfIf Check1.Value = 1 ThenSet rec = New ADODB.Recordsetrec.Open select * from 记住密码,gCnn,3,3rec(标记) = 1If Combo2.Text Thenrec(姓名) = Co

10、mbo2.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(标记) = 0rec.Updaterec.CloseEnd IfDim rec1 As ADODB.RecordsetSe

11、t 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,3If rec.EOF = False Then If rec(操作权限) 管理员 Then FRMMAIN.XZCK.Enabled = False MDIme.mczy.Enabled =

12、 False MDIme.xtwh.Enabled = False MDIme.del.Enabled = False FRMMAIN.DJGL.Enabled = False FRMMAIN.delte.Enabled = False Else Me.XZCK.Enabled = True MDIme.mczy.Enabled = True MDIme.xtwh.Enabled = True CreateNewKey HKEY_CURRENT_USER,ZhiYuanTechnologe SetKeyValue HKEY_CURRENT_USER,ZhiYuanTechnologe,UserName,dlj,REG_SZ SetKeyValue HKEY_CURRENT_USER,ZhiYuanTechnologe,PassWord,dlj,REG_SZ FRMMAIN.DJGL.Enabled = True FRMMAIN.delte.Enabled = True End If rec1(姓名) = Combo2.Te

展开阅读全文
相关资源
正为您匹配相似的精品文档
相关搜索

最新文档


当前位置:首页 > 高等教育 > 其它相关文档

电脑版 |金锄头文库版权所有
经营许可证:蜀ICP备13022795号 | 川公网安备 51140202000112号