防雷档案管理系统简介.pdfVIP

  1. 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
  2. 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  3. 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  4. 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  5. 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  6. 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  7. 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
2010年福建省气象学会学术年会——省科协第十届学术年会卫星会议 防雷论文集 防雷档案管理系统简介 张雷1应凌云2汪少鲜3涂慰云4 2.福建省南平市气象局,南平353000 (1.福建省南平市气象局,南平353000= 4.福建省浦城县气象局,浦城353400) 3.福建省建瓯市气象局,建瓯353100= l前言 防雷档案是各防雷中心不可或缺的资料,它的内容对于中心领导及管理人员来说都是至关重 要。一个好的档案管理系统应该具有能够存储大量的档案信息并且还应具有方便快捷的查询方式· 随着经济的发展以及防雷工作的日渐成熟,各防雷中心的业务量与日俱增,档案资料亦随之俱增, 因此各中心长期使用的手工管理档案的方式已跟不上时代的步伐,因为这种管理方式存在着许多缺 点,如:效率低、保密性差、各类档案信息的查找、更新、维护过程烦琐等。 本系统使用计算机对防雷档案信息进行管理,具有手工管理所无法比拟的优点,例如:存储量 大、占用空间小、查找方便、可靠性高、保密性好、寿命长等。这些优点能够极大地提高档案管理 工作的效率,为各防雷中心向科学化、正规化方向发展提供了必要保障。 2系统设计 2.1系统流程 数 据 库 本系统功能主要由两部分内容实现,一部分是数据库的设计,另一部分是用户的操作界面,具 体参见图1. 阱蕾论文誊 2010年橇t省气象学套学术年会—-省科协第十目学术年鸯Ⅲme# 2 2数据库设计 本系统川MicrosoftAccess2000建矗了一个数据阼.井拄数据序中建立了检测、验收、酗审三 十柱.其巾检测嵌州于存放常规检测的档案资车年.如加油站的档寨资料;验收棼}用于存放立接进行 办理验收手续的项El档案盗料.如T业项目(根据当地政府的政策要求.此类项日通常是先建后补 手续):酬审表H{于存储按正常手续办理的项目的防街档案资辑.本系统中的数据库相当于系统中 的一个仓库.主要担负莉存储档案信息的任务。 2 3操作界面的设计及功能实现 visualBasic6 本系统用Microsoft 0编写代码建立了一个人机交换的操作界面,在这个界面 上J玎户能够录入、卉询、矗看及更新数据阼中的荫雷档案资料。由于检测、酗审、!|盘收的操作界面 及功能实现相似.所以本文主要以检捌档r睾管理的撵作界面驶功能实现为例介蜘本系统. 231登陆界面 幽2登陆界面 由于档案资料具有一定的保密性.所以进入本系统必须要输入正确的密码才能进入·如幽2所示。 部分源码如F: PrivateSubc硎0K_CIick0 ’ToDo:创建测试密码是否正确 ’检舟正确密码 Text=’{+++rThen IftxtPassword 0K=True HelIide IIjde frmSplash Show frmDocument Else 2 3 2数据录入界丽及功能实现 2010年犏建省气象学会学术年会——齿抖*虬十届学术年套1坚盎议聃苗论文矗 幽3常规检测数据录^界面 本系统所有的常规检测档案主要姓通过此界面存入到数据库中的检攫i表中,朋户需填写检测报 告编号、被检单位、被检项口、检测日期等相关信息.如图3所示。本操作界面中有添加、编辑、 删除等控制:。舔加控什主要是向数据库中输入数据,编辑控件主要是对存储信息的更改.删除顾名 思义就是删除数据库中数据.部分源码如F: 添加渊码: IfNot(BOFAndEOF)Then mvBoold,ark=Bool【埘ark EndIf A

文档评论(0)

wuhuaiyu002 + 关注
实名认证
文档贡献者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档