《中粮米业资材决策支持系统研究与开发》由会员上传分享,免费在线阅读,更多相关内容在学术论文-天天文库。
COFCORicematerialmanagementinformationsystemByZhaoLuFengTheDissertationSubmittedtoJiangXiAgriculturalUniversityForMasterDegreeofAgriculturalTechnologyExtensionSupervisedbyProLWangYingLongCompletedin2月2011年 一一 一———————————————————苎兰—————————————————一独创性声明本人声明,所‘^交的学忾沧文,是住指导教师指导F,通过我的努力取得的成果,并且是白己撰写的。尽我所知,除了文中作了标注嗣l致谢中已经作了答谢的地方外,论文中不包含其他人发表或撰写过的研究成果。也不包禽扯i上拍农业人学业其它教育机构获得学忙业证j5而使州过的材料。’J我一尉对本研究做出贡献的同忠.都往|仑文中作了明确的说l蝈井表示了谢意。如被卉有严重仪犯他人知识产权的行为,由本人承担麻有的责任。肯求笔箍。蔗丘l垒丞。删肯求笔箍鼾电£!i!垒u删论文使用授权南说明知vjf矗奉人完全了解江I儿i农业人学宵咒保留、使坩学仲论文的规定,即学校订权送交沦文的复印仆,允许沦文被卉劂_l借阅:学校可以公布论文的全部或部分山布,可以采埘影印、缩印或其他复制手段保存踣丈。保密,往——年后解密可适刖本授权}e。口不保秘,本学位论文属]不保密。口(}☆在方框内打“√”)学怔论文作者采笔签名指导教师亲笔箍私龃川。:!型日j[f】:芝!f.』!l尹 ~_________一;_.气■●,●●Hl●●●●●●●●●l●一 摘篮摘要资材的管理品种较多,存铋世中进入调出频繁,因此企业的管理用户都期望能对资材的整个流动状态、库存情况了如指掌,并为企业的决策管理提供科学依掘;企业资材管理操作用户希望能够避免相对繁琐的手工操作,将传统的于工记账方式变为现代的电脑管理,以提高工作效率。资材管理应用软件将用户的期望变为现实,并提高了企业用户的j作效率,节约运营成本。关1。盗材管理的应用软件企业管理中不可缺少的一个应用,资材已成为企业中很重要的一个管理对象,它对企业的运营管理着直接的影响.资材管理技术水平的提高有助于降低幽№运营成本。此外,资材运用和企业资会息息相关,一方而,采购价格决定着采购成本的高低.另一方丽,物流、仓储、库房的管理直接影响着企业的运营成本。在本次I#业设计中我选择了瓷材管理信息系统,也就是编写一个专用的管理系统软件,通过资材申请计划、仓储、保管、领用等活动,解决资材供需之间存在的时州、空队数量、规格以及价格等方面的矛盾,衔接企业运作中的各个师符,确保几常事务处理的顺利进行”’。并把所有入库、出库、库存的记录登记,井可叭快速查找与分类这屿数据,同时可以随时备份各种数据以便计算机的维护。本软件的丌发采用"visualgllsic6O丌发工具和Access数据库,并以WindowsXP系统作为平台。关键词:苷’理倍息系统;资材管理挫术;VisualBasic6.0:AcceSS ABSTRACTThecommoditymanagememtypeismanypassesinandoutfrequentlyinvariousdepartments.becauseofthecommoditysuperintendent.hopedcantothecommodityentireflowcondition.thestockcondition.andprovidesthescientificbasislbrthepolicy—makingmanagement:Thestaffhopedcarlavoidthetediousmanualoperationlhrowsofftheobsoletehandworktorecordlheaccountway.achiexesthetwicetheresultwithhalftheeflbrteflbctAbovethegoodsandmateriaItnanagementapplicationsoft'^arenotonlycausedthehopealltoturntherealit).enhancedtheenterprisetheeconomicefficiencyMaterialmanagementsystemwasinthebusinessmanagementanessentiallinkthematerialhasbecomeintheenterpriseaveryimportantmanagementobjecthehasthedirectinfluencetoenterprise。Smanagementthegoodsandmaterialhandlinglevelheightisaffectingtheentireenterprise’ScostdirectlyInaddition.thethingflowswiththefimdflowsthedirectcorrelation.ontheonehand,thepurchasepriceisdecidingthepurchasecostheight.ontheotherhand,thetransportation.stores,thestorehousemanagementisaffectingenterprise’SoperationcostdirectlyIhavechosenmaterialmanagementinformations.vseminthisgraduationproject,alsocompilesaspecial—purposemanagementsystemmanagementsystemsoftware.Ihroughthematerialrequestplan.thestorage.thecollarwithandSOontheactivity.aspecttheandSOontime,space,quantity,pricewhichbetweenthesolutioncommoditysuppbanddemandexistscontradiction.1inksupinenterpriseoperationeachlinkguaranteesthedailybusinesstoprocesssmoothlycarriesonAndallstoreinwarehousecomeoutwarehouseIhestockrecordingregistrationsandmaytheextremelyquicklookandclassifiesthesedata.althesaT/letimenecessarybackupeachkindofdatainordertocomputermaintenmlceThissystembaseonWindowsXPanditisdevelopedwitbVisual13asic6.0developmenttoolsandAccessdatabasesKeyWords:ManagementInfommtionSystem;MaterialManagementPechnique:VIsun】13asic60:Access: 日最目录第1章前言⋯⋯⋯1ll资材管理概述⋯⋯⋯12资材管理的定义及意义⋯⋯⋯313资材管理的特点⋯⋯⋯314资材管理信息系统⋯⋯3第2章选题的背景和意义⋯52.1选题的背景⋯⋯⋯5第3章信息与信息系统⋯⋯⋯.-63.1信息与数据⋯⋯⋯⋯⋯632现代企业对信息处理的要求⋯⋯63.3管理信息⋯73l管理信息是重要的资源信息⋯⋯83.32管理信息是决策的基础⋯⋯⋯833.3管理信息是实施管理控制的依据93.4f言息系统⋯⋯⋯⋯⋯⋯⋯93.4.1信息系统的定义⋯⋯⋯⋯一9342信息系统的模型结构⋯⋯11第4章系统的分析⋯⋯⋯⋯⋯⋯124l系统开发的可行性分析⋯⋯⋯⋯124.1l技术上的可行性⋯⋯12412经济上的可行性⋯12413管理七的可行性⋯⋯⋯1342系统的分析⋯⋯⋯⋯⋯1342l系统的详细调研q2,2系统的发⋯|栎14423各阶段的事要任务⋯⋯⋯25 目录43系统丌发的原则⋯154.4系统的需求获墩⋯⋯⋯⋯⋯⋯⋯1645系统的需求分析⋯⋯⋯1746系统的用例分析⋯⋯⋯⋯174.7主要活动图⋯20第5章系统71:发的环境建立⋯+225.1系统的开发平台⋯225,2数据库⋯⋯225.3丌发软件VisualBasic简介⋯⋯⋯⋯2254系统丌发的结构模式⋯23第6章数据库设计⋯⋯⋯⋯⋯⋯2561数据库设计概述⋯2562影响数据库设计的因素⋯⋯⋯⋯256.3编码设计⋯⋯⋯⋯266.4数据库设计过程⋯⋯⋯⋯306.5数据库的安全性⋯⋯34第7章系统的详细设计与宴现⋯⋯⋯387.1系统功能模块设计与实现⋯⋯3871.1系统登录界而设计39712系统主界面设计⋯4072基本信息模块设计与实现⋯⋯417.21仓库管理界面设计⋯⋯⋯42722供应商信息界面设计427.23朝初库存设置界面设计⋯⋯437.3资材信息管理模块设计与实现⋯⋯⋯4473.1资材入库管理界面设计⋯44732资材出库管理界面设计⋯47733资材借出管理界面设计48734资材归还管理界面设计⋯⋯⋯49 H录73.5资材盘点管理界面设计4974资材蠢询统计模块设计与实现,5274.1资材查询界面设汁⋯.527j资材数据报表界面设计⋯⋯一537.5l资材库存报表界面设计⋯⋯⋯5376系统维护模块设计与实现⋯5476I数据清理界面设计⋯55762操作员管理界面设计56763密码修改界面设计56764操作员权限殴置界面设计⋯577.65查看R志界面设计⋯5877系统的测试,587.71系统的测试计划⋯5872系统的测试项目5977.3系统的测试结果”⋯⋯59∞们酡甜塑~~}|展~~与~~撇二懈章扑!要{薹8考序第致参程 栌,“,‘ 第1章前言在新世纪JI:始.我国计算机应用技术取得了突飞猛进地发展。随着计算机成本的快速下降和性能的迅速增强,已经有越来越多的企事业单位将计算机技术应用于生产管理中,取得了显著的经济效益和良好的社会效益。现在,计算机技术不仅仅大量应用在国有大中型企业、大型民营企业、中外合资企业等且有一定舰模和实力的企业,我们还欣喜地看到,更多的小型私营企业为在激励的市场竞争中处于不败之地,也正在加大对企业内部管理和生产经营的电子化、信息化的投入⋯。资材是企业进行和维持生产经营管理活动、具有实物形态的重要经济资源,资村管理费用在产品制造成本中占有最大的比重。如果资材管理混乱,企业的实资材产就有可能流失:如果该摊销的该报废的不及时处理,长期挂帐,还会造成企业资产不实,导致管理者和投资者的决策失误。人们在进行产品设计时,考虑得较多的往往足产品的成本、生产工艺、产品质量等因素.现代计算机技术的发展能在极短的时间内设计出有效和高质量的产品,但是生产过程中资材管理因素却往往被忽略,结累辛辛苦苦设计出柬的、预期能带柬较大利益的产品,往往由于资材库存成本增加、由于不合理的频繁采购、运输作业等,而雀失殆尽其垃训优势。凼此对资材管理进行系统改革是一些产品经营企业中最具深刻意义的一环。经济体制改革的深化进_.步把企业推向市场经济的浪潮l_|J,氽业就像脱离娘胎的婴儿,自山地进入了市场,面临的却是供给山短缺走向过剩、卖方转向买方的激烈市场竞争,能否在市场经济大洲中站稳脚跟,是摆在企业面lj仃的一大难题。为了更好地协调企业内部的人、财、资材源,增强企业的市场竞争力,企业需要进行管理思想,管理组织、管理方法、管理手段等方面的改革,而其中重要的一项内容是对原材料等资材进行系统管理的改革。1.1资材管理的概述现代管理离不开信息,随着信息时代的到柬,信息的收集、传递、处理己成为项上型的社会活动。在各利,业务领域和H带生活中t人们部小得小花费大嚣的时州和精JJ进行信息的查找、收集和整理,计算机技术的发展为信息处 第i章前言理提供了有效的[具。随着计算机应用的不断普及,MIS作为一门新兴的学科得到了迅速技腱。管理信息系统(MIS)作为计算机技术的一个方面已丌始应用于我国现代化经营管理的各个领域,在不同的部门、不同的层次上参与和支持着各种经营、管理活动,扮演着越柬越重要的角色,也产生了一定的经济效益和社会效益。把管理信息系统(MIS)引入企业管理活动,能促进企业管理的现代化、科学化、规范化和系统化,并提高管理工作的效率和水平,从而提高企业效益⋯。资材管理是企业产供销三大支柱之一,其主要目标是及时按质按量提供生产所需的各种资材,以最小的资材储备束达到最佳的供货状态,避免资材积压和缺料.合理组织供应,加强资会周转,保证生产活动的『F常运行”1。确保企业的尘产运行和设备维修等所需的各类资材的萨常供应,通过资材的信息化管理,加强生产资材的采购、供应、和使用各个环节的严格管理,降低生产成本和加速瓷余的周转,并对各种信息进行详细的统计分析,及早的发现和改正生产资材管理中存在的各种问题,为资材管理提供及时的决策信息,从而进一步提高资材管理的科学性、先进性。以提高企业的经济和社会效益。随着社会的进步和人们生活水平的不断提高,越来越多的单位都感到使用程序化的管理给人们生活和生产带柬的巨大好处。资材管理系统是任何一个单位,任何一个部门所必须的系统。一个部门,一个单位能够正常运转,资材管理系统是必不呵少的。采用先进的计算机技术实现资材管理自动化,可以提高资材管理水平。资材管理系统成为企业管理规范化、自动化管理系统的⋯部分,对提高企业的管理效率,增加收八发挥出不可替代的作用。=”。T.2资材管理的定义及意义资材管理是资材分配和流通过程中有关资材的组织和检查工作的总称。通过用料申请汁划、采购、运输、仓储、保管、领用等活动,解决资材供需之间存在的时『白J、数量、品种、规格以及价格和质量等方面的矛盾,衔接好生产中的各个环节,确保生产的顺利进行”3。资材管理是金【k生产经营管理的一项重要内容,是保证企业生产发展和提高经济敏益的重要环节,它对r加强企业资村管理县有重要的意义。(【)加强资材管理是保证奈业生产能币常进行的重要条件。资材管理是生产前的~项准备_丁作,要保|正企业的生产过程不断地进行,就需要不断地供应生 第1章前言产所需要的符种资材。如果资材供应不及时,或供应的品种、规格、质量不符台要求,企业的生产就不能顺利进行。(2)加强资材管理是提高企业经济效益的重要途径。工业企业的生产过程同时也足资材的消耗过程。在资材的消耗过程中,如何做到合理利用资材和节约资材,直接影响到企业的经济效益。(3)加强资材管理也足搞好整个国民经济资材管理的重要一环。因为从整个困民经济柬看,国家在一定时期内的资材资源和资会总是有限的,搞好企业资材管理,正确地选用和合理使用资材,加速资材的周转,就能咀闸量的资材资源和资盒为社会提供更多的产品.这对于促进国民经济的发腱有着十分重要的意义⋯。13资材管理的特点(1)资材种类多,有关原始凭证的信息量大且进出频繁。(2)要求集中处理,业务量人。每到月术年终有关人员都要加班、加点,对大量的原始数据进行分类、汇总。并按有关部门的要求进行统计、计算,填制各种报表。由于二手工作业效率低,错误难以避免,虽然在此过程中耗费了大量人力、物力,但效果往往不甚理想。(3)信息交叉、查账困难。由于张单据记录了多种内容的信息,而所需报表及各种统计需要畦采各自不同的信息。这样势必造成信息交叉,重复劳动,给查阅带来凼难。(4)要求及时制定合理、准确的动态供应计划。资材企业要想取得好的经济效益,必须制定出合理的采购计划,因为只有采购的资村与顾客的需求相_÷.致时,才不会出现由于超储积压而造成的资会浪费现象。而符合实际需要的动态计划的制定,需要以人量的企业内外的数据与信息为依据。(5)时间性强,精度要求高。资材管理不仅要求按规定时问完成有关数据的记录,汇总、统计、核算、编制和呈送报表,而且耍为企业顿导进行决策及时提供有关信息⋯。14资材管理信息系统矗。‘{。!}[1fn资材辑』星辅助静Ip生『”运作的过枷h埘Ji瓷村的弊竹管聪包括 第l章前言计划、采熘、库存、入库、出库等都是靠^工方式进行的,即主要靠手写柬记录资材的流向。人[处理资材数掘是一项繁琐而枯燥的工作,由于资材管理涉人工处理效率低,对资材数据信息的传输方面不及时、不准确.对于资材经营管理容易造成数据冗余、数据管理不一致等种种问题,因此靠人工管理资材信息已经不能适应企业发展的需要,急需用新的技术、新的方法来解决所面临的这一系列问题。近几卜年来,随着数据库技术的迅速发展以及数据库管理系统的广泛应用,人们利用信息技术工作和搜索数据的能力大幅度提高.千千万万个数据库被利用于商业管理、政府办公、科学研究和工程丌发等等,人们积累的数据越来越多。用数掘库管理系统柬存储数据,分析数据己成为大势所趋。资材管理系统是一个体化系统或集成系统,就是说资材管理系统进行企业的资材信息管理要从总体出发,全面考虑,这样可以保证各种职能共享共同的数据,减少数据的冗余,保证数据的幕容性和~致性。数掘的一体化并不限制个别功能子系统可以保存自己专用的数据,为保证一体化,茸先就是要有一个全局的系统实现计划,每一个系统的实现均要在这个总体计划的指导下进行。其次,是通过标准、大纲和手续达到系统一体化。这样数据和程序就可以满足多个用『1的要求,系统的设备也应当相互兼容,即使在分靠式数据库得到的情况下,保ilE数据的一致性也是十分重要的。资材管理系统也是一项复杂而特殊的物流、资会流和信息流处理系统。它将计划、采购、销售,以及资材调度、库存管理有机地结合起来,合理地组织采购、存储、使用资材。对于降低采购和销售成本、减少库存积压、加速库存资金地周转和控制库存资材地流程管理,以及及时采购和补充资材以保证生产地顺利进行都将起着十分显著地效果和非常积极地作用。近几年柬,现代资材管理在我国迅猛发展,国内外很多专家对资材管理系统进行了研究,并取得了巨大f|勺成就”““。 第2章选题的背最平¨意义第2章选题的背景2.1选题的背景中粮(汀西)米业有限公司是日前中国唯一、砸洲晶大的蒸谷米加工厂.是中国蒸谷米生产:和大米规模化深加工的旗舰。公司由中粮集团和江西金佳谷物股份有限公司共同创办,位f江西省南昌市,于2001年8月成立.2004年11月全线投产。公司是国家农产品深加工示范工程项目、国家农产品1JHA:业出口日i范企业、农业产业化国家绒重点龙头企业、江西省优秀龙头企业、江西省工业企业节能降耗先进单位。中粮(江西)米业蒸谷米产品销售主要以出口为导向,通过巾粮集团大米部间接实现出L7销售.同时兼顾国内销售。燕谷米在欧美、中东等地区非常畅销,在国外以健康营养米、绿色食品著称,广泛面向欧洲、美洲、中东、非洲等主耍国际市场,中国生产的会地、金花阿个蒸谷米品牌稳定占有国际市场份额:蒸谷米在国内市场以“全稻原米”的概念健康销售,成功进入上海世博餐厅,并受到了国内市场越来越多“绿色消费者”的追捧。资材管理是企业生产管理环节中重要的’环,需要对资材基本信息管理、资材调配信息等进行完整的监控。企业资材入库首先耍登记瓷材的基本信息.包括资材的种类、名称、规格、单位、单价等:然后登记资材入库信息,包括资材基本信息、入库地点、入库人、经手人、数量等,根据资材的入库、出库过程的综合,得到各种资材的信息,方便进行后续工作。因此资材管理信息系统需要记录资材流通的全过程,加强资材管理,不但有算得出、看得到的效益,还可以大大提高管理队伍的素质,加强职员的增产节约意识、爱护财产意识和学习科技曲意识,使科学管理形成共识。并可以减少资材设备在各个环节上的矛盾。 兰!童堡星兰堕星墨竺第3章信息与信息系统3.1信息与数据信息匿今尚未有一个统一的、确切的定义。人们在研究信息定义时往往与各自的工作领域相联系,在不同领域中对信息的内涵有不同的理解,形成不同的定义和描述。从广泛意义上|兑,信息是对事物运动状态和特征的描述,而数据是载荷信息的物理符号。信息和数掘是不可分离而又有一定区别的概念,一方面并非任何数掘都能表示信息,信息只是认识了的数据,是数据的含义;另一方而信息是更本质地反映事物的概念,而数据则是信息的具体表现.所以信息不随载体的性质而改变.而数据的具体形式却取决于载体的性质。32现代企业对信息处理的要求现代企业目前正面对着市场需求多变和激烈的竞争,生产服务的高度社会化以及生产服务过程中机械化、自动化、电子化设备的广泛应用。在这种条件下。为保证管理活动的及时性、有效性和适应性的要求,必须使各级生产和管理部门能及时获得准确而可靠的信息。现代企业对信息处理的要求可归结为及时、准确、适用、经济四个方面。1及时所谓及时,有两层意思,是对一些时过境迁并且不能追忆的信息要及时记录:二是信息的加]:、检索、传递要快。如果信息不能及时提供给各级决策和管理部门使用,就会失去其使用价值。现代化!L产过程瞬息万变,如果反映管理对象当时状态的信息不能及时传递到控制部门,就无法进行实时控制,或者会造成系统运行过程的中断。而现代化生产足以高效率、高时间价值为特征的,因此.哪}自足几分钟的生产过程中断,也会造成重大的经济损失。2准确信息不仪要及时,而且要求准确地反映实际情况。有了可靠的原始数据,_能加工出准确的信息,并保证决策者做出谁确的判断。如果信息不准确,就不能对经济建设和生产实践起指导作用,反而会造成失误。尤其要曜决反对弄 第3章信.g.j-,ffi息系统虚作假,制造假信息不仅是无效劳动,而且是反效劳动。根据假信息做出的决策,必然会造成经济活动和生产过程的混乱。任何一个系统的备个环节都是相互联系、相互制约的。系统中许多信息会在不问的管理工作中共同享用,因此,要求系统内的同一个信息应具有统一性。以工业企业系统为例,企业中出现假信息是个别现象,而同一信息不统一的状况则是比较普遍的。例如.企业中的技术文件、各类定额标准、原始记录和凭证等,每次进行管理整顿时,都要花很大的力量加以整理,以保证其统一性。但时州一跃,还足容易发生数据重复、互不一致、残缺不全的混乱现象。这不仅是因为缺乏科学的管理制度和方法.还由于没有一个可靠的技术手段作保证,因此保持信息的统一性,也是埘信息处理准确、标准的一个重要要求。3适用各级决策和管理部I]所需要的信息,在范围、内容、洋细程度、精度和需用频率等方面都是备不相同的。因此,信息不在于多,而贵在适用。必须保证提供适用的信息,使各级决策和管理部门及时得到与本部门工作有关的资料、数据,以便做出相应的决策,如果让各级领导去查阅大量重复的、无关紧要的资料,势必要浪费刑I'uJ,不仪徒劳无功,而且也会贻误时机,使工作遭受损失。4.经济信息的及时性、准确性和适用性必须建立在经济性的基础上。信息在管理现代化中起着重要的作用,但信息处理也是现代管理工作中一项劳动量大、复杂而又耗资、耗时多的工作,因此,对信息处理的方法和技术手段必须进行可行性分析和效益评估,不能盲目地追求机械化、自动化和电子化的水平“,。3.3管理信息在企业管理中,常将管理信息定义为:经过加工处理后对企业_二产经营活动有影响的数据。就一个企业数据加工过程而言,由于处理的结果输出内容是为某种特定需要服务的,这罩要强调的是其内容含义,所以称其处理的结果为管理信息。对于处理过程所需的输入资料,山于此时它不能为一个特定的需要服务,要对它进行处理,注意的是其表现形式,故通常称输入资料为数据。例如,丁业企业中的完工常、检验单和考勤}等原始凭证.是用以已录产品完成数量、产品质量和职员出勤等实际状况的数据,把这些数掘经过整理分析后就 第3章信息上J信息系统成了对管理活动有用的信息。例如,将这些原始数据与计划和定额标准进行对比分析,可得出产品生产计划完成的百分比及各种废品的数量和比率,并据此分析造成废品的各种原因、废品损失对产品成本影响的程度等为管理决策提供依槲。只有经过Jill]]处理的数据,爿能成为对管理决策有用的信息。当然应浚指出,管理中涉及的数掘足一种广义的数据,它不仅包括数值数据,而且也包括非数值数据,如声音、各种特殊符号、图形、图像、表格、文字等。管理数据和信息ZI'R]的区别是相对的,低层决策用的信息又可以成为加工处理高~层决策所需信息的数据,这就是信息问的递归定义。因此在计算机系统中常将信息与数掘不加区分地位用。例如,信息处理与信息管理,也可称为数据处理与数据管理。企业管理中所应用的信息十分广泛,它既包括企业内部的信息,也包括企业外部的信息。例如,生产性企业的销售、原材料供应、生产、价格、成本、利润、技术设备、人力资源等情况,以及生产技术资料、各种规章制度、市场需求、蹦家经济政策等等,都是企业管理决策所必需的信息。33.1管理信息是重要的资源信息近年柬,信息已被视为与能源、材料同等重要,是人类赖以生存和艘展的重要资源。信息的占有水平与利用程度,已成为衡量一个国家现代化水平的重要标志,是国家综合实力的重要组成部分。各种经济管理信息的及州、准确、完整的收集、传输和综合处理,能有助于促进市场经济健康发展和有助于实现能源、材料等资源的合理配置。在我国经济体制,从传统计划经济体制向社会主义市场经济体制转变,经济增长方式从辋破型向集约型转变的过程巾,充分玎发和利用信息资源t才能根据企业内部条件、外斋l:环境确定【F确的发展战略和经营方针丌拓市场:爿能大幅度提高资材资源利用牢,提高生产附加价值和经济集约化程度。3.32管理信息是决策韵基础现代管理的核心是决策,但汇确的决策取决于多利咽隶。如决策体制、决策方法、领导者的能力、技巧等。但决定性的困索,是对客观实际,即对未来行动及其肝泉的1T,确判断。所以,信息不充分,决策就失去了根本的依据,信 第3章信息与信息系统息不灵,就可能导致决策的失败。尤其是今天科学技术飞速发展,同新月异的时候.要提高企业的竞争能力,要实现n=确的决策,必须拥有大量的信息。国外的企业界认为:“信息是企业的生命,在激烈的国际、国内市场竞争的环境中t获得可靠信息是决定公司、企业以至整个国家上下沉浮的关键所在”【J2]33管理信息是实施管理控制的依据从挎制论的观点看,管理过程就是信息的收集、传递、加l:、判断、决策的过程。无论是整个国民经济系统,还是其组成部分的企业系统,它们的仝部活动都可概括为两大类:一类是生产活础,输入原材料和其他资源.经过加工处理输f{{成品:另一类是管理活动,围绕和伴随着一系列佳产活动,执行着决策、计划和调节职能,以控制生产次序能有效地进行。生产活动中流动的是物,从输入、处理转换到输出形成系统的信息流。3.4信息系统3.41信息系统的定义信息系统作为社会无数系统中的一种孥门系统,在社会进步和发展中发挥了重要的作用,对信息系统的研究.就要在一般系统思想和方法的指导下.形成对社会不同层次信息活动的全新认识和科学管理。从屯子数据处理系统(ElectronicDataProcessingSystems.EDPS)到管理信息系统(ManagementInformationSystems.Mrs)到决策支持系统(DecisionSupportSystems.DSS)至U未来全新的信息系统,这一发展路径显示了现代系统思想与现代系统技术和信息技术的有机结合和功能凸现。1985年,管理信息系统的创始人,美固明尼苏达大学#尔森管理学院的著名教授高鼗·藏维斯(GordonBDavis)给出了信息系统一个较为竞整的定义:“管理信息系统是个利用计算机硬件和软件,手工作业,分析、计划、控制和决策模型,以及数槲库的用户的机器系统。它能提供信息,支持企业或者组织的运行、管理和决策功能”。这个定义说明了管理信息系统的目标、功能和组成,也反映了管理信息系统当时已达到的水平⋯。 第3章信息与信息系统管理信息系统是信息系统在管理领域的具体应用,具有信息系统的一般属性。从管理信息系统的建立、功能等方面来分析,管理信息系统可以定义为:管理信息系统是一个以人为主导、利用计算机硬件、软件、网络通信设备以及其他办公设备,进行信息的收集传输、加工、储存、更新和维护,以企业战略竞优、提高效益和效率为目的,支持企业高层决策、中层控制、基层运作的集成化的人机系统。信息系统是一个人造系统,它由人、硬件、软件和数据资源组成,12的是正确地收集、加[、存储、传递和提供信息,实现组织中各项活动的管理、调节和控制。信息系统示意图如下圈3一I所示:对数据进行处理,使它获得新的结构与形态或产生新的数据。不政变信息本身的内容,作HJ是把信息从一处传输到另处。幽31信息系统示意幽从信息系统的概念内涵可以看出,它出四部分组成:信息源、信息处理器、信息Hj户和信息管理者。信息源产生信息:信息处理器负责信息的收集、加工、存储、检索和传输:信息用户是信息的使用者:信息系统的设计、实施和维护山信息管理者负责。它们之『日J相互联系,可以用经典的信息系统的概念结构图和结构层次图柬描述它们的关系,如图3-2、图33所示: 第3章信息与信息系统斟3-2fi息系统的概念结构幽幽33信息系统概念结构层改幽理3.4.2信息系统的模型结构狂信息系统丌发过程中,信息系统具有多种描述模型,每种模型郝是从某认以程度和某角度对信息系统的抽象描述。在每种模型中,模型元素都呈现出明确的构成关系t只足在不同的模型中,信息系统模型结构具有不同的内涵和彤式。信息系统的模型1:要有需求模犁、逻辑模型、设计模型和实现模掣“’。信息系统的模’避结构图,如图34所示: 苎!翌堕璺!生垦墨竺——需求分析系统分析系统设计实现与测试巨34信息系统模聚结构幽在这四种模型中,信息系统模型结构的四种形式分别是信息系统的需求结构、分析结构、设计结构和实现结构。凹种结构反映了在信息系统开发的不同阶段和不同方仰信息系统各要素呈现的构成关系,1司时也反映了人们认识和把握信息系统体系结构的程度和过程。厂一二㈣ 第4章系统的分析4.1系统开发的可行性分析41.1技术上的可行性系统所需硬件设各,如服务器、PC机、打印机及网络配件等,这些设备在性能上L三经有了很大提高,价格又相刘较低,能满足系统功能需求。软件上。操作系统采H{WindowsXP,数据库管理系统采用Access,这些软件在管理信息系统"发中已被人量应用,技术上都比较成熟。本资材管理信息系统将采用VisualBasic60和Access开发完成。语言简洁明快、实用性强;操作简便,容易:成本低廉,参考书目较多。系统采用全部功能均采用模块化设计、各项参数均可自行驶置,具有高成长陛:界面美观,操作简便,计算精确”“。4.1.2经济上的可行性本系统属于一个上具型的系统,可达到降低工作人员的工作难度与强度,它可以节省工作人员大量数掘收集、录入、整理、查询、修改等于工操作,节约人儿资源,而EL迅速准确,能够极大地提高工作效率,同时促进业务的规范化、程序化,以达到减少公司丌支的目的。4.1.3管理上的可行性管理信息系统是建立于科学管理基础之上的,只有在合理的管理体制以及完整、准确的原始数据的基础上,彳能有效的丌发出管理信息系统。管理基础工作为了提高套止管理水平.适应管理信息系统的要求,使人家认识到了实施MIS的必要性和效益,对企业整体经营势力管理水平提高的意义,了解实施MIS的大量问题,并进一步加强了企业管理基础工作。综上所述.实施管理信息系统在技术上、经济上、管理上都是可行的,因此,开发企业资材管理系统是可行的。4.2系统的分析所谓系统分析,就足指在整个系统丌发1程巾,解决“做仆么”的问题, 第4章系统的分析把要解决哪些问题,满足用户哪些具体的信息需求调查分析清楚,从逻辑上或|兑从信息处理的功能需求上提出系统的方案,即逻辑模型,为下一阶段进行物理方案设计的解决提供依据。它是信息7r发系统中的一个重要阶段,是建立系统模型的第一步。其核心是目标分析与需求分析,最后提出系统的逻辑方案。4.2.1系统的详细调研在实际调研中,我们主要通过座谈、询问及发放征询意见表等方法柬了解他们对信息系统的需求情况,主要了解的用户有:L单位管理员。2使用资材管理信息系统的各职能部门的管理员。3.单位信息管理的高层管理员。4负责运行维护管理信息系统的管理人员、技术人员和操作人员。通过对以上人员的需求调查得知,以前的资材管理办法,工作繁琐,工作量大,效率低。因而,建立一套资材管理信息系统势在必行。各用户的需求虽然不尽相同,但大体上可分为如下几个方面:(I)用户的信息要求:随时查询库存资材状况,进行库存资材汇总,对记录能随时删除、插入及恢复。(2)用,T的处理要求:能随时增加、删除,修改每一个库存资材记录。(3)对数据的安全性、完整性的要求:要保证每个记录必须完整t不能被他人非法窃去。42.2系统的设计目标l建立一套适合公司的资材管理信息系统,形成全新的资材信息管理模式.市场交易模式,企业运作模式以及业务人员获取信息的方式:并导致企业业务流重组,改变企业的运作模式,系统软件将成为企业资源计划和供应链管理的中枢神经,资材管理部门的采购业务及行为将延伸成“无边界”的企业成本控制中心“⋯。2系统要集成多个用户平台,公司内部甚至以外的台作伙伴,从行政上和经济上相互独讧的单位只要在统的局域网内,都可以在这个统一的平台上运行,而不同平台的加户数据相互独立,互不影响。 第4章系统的分析3系统功能的发挥不受系统用户单位的组织机构的影响,仅与资材管理的业务逻辑有关。423各阶段的主要任务I.系统分析在系统分析阶段,先根据用户提出的建立新系统的要求.进行初步响查和初步可行性分析,提出系统总体规划。经分析系统可行并可以丌展丌发工作以后,再对原系统进行深入的调查.彻底掌握原系统的模型,并在此基础上提出新系统的逻辑模型,使系统刀:发达到合理、优化。2、系统设计系统设计的任务是根据系统分析确定的逻辑模型,确定新系统的物理模型,即计算机化信息系统应用软件的总体结构和数据库设计.并提出系统配置方案.继而对物理模型进行洋细的设计。主要内容有:代码设计,用户界面设计,处理过程设计,编写系统设计说明“”。3.系统实施系统实施按照物理模型实现应用软件的编写和测试,系统试运行,编写技术文件,系统转换,系统交付使用,以及运行后的系统维护和评价等工作。本人采用的方法主要优点是整个丌发过程阶段和步骤清楚,每一阶段和步骤均有明确的成果。在每阶段或步骤中,整个项目可以划分为许多组成部分,各部分可各自独立地开展工作,但备部分的工作必须按时到达阶步骤的终点,这样有利于整个项目的管理与控制。浚资材管理信息系统是针埘公司的资材管理部分做专门设汁的,在系统JT发之前就已经做好了详细的用户需求调鸯,对公司的需要和系统将要达到的效果有了明确的目标,系统可以说是对其良身定做的‘“1。43系统开发的原则根槲资材管理信息系统的需求分析,我们对其进行了总体的设计。资材管理系统的总体设计应遵循以F没计原则”⋯:I5 第4牵系统的分析1.实用性和先进性原则:资材管理系统是根据公司处理工作中最迫切需要解决的问题而建立的,从实用性出发,实实在在解决某些手工操作越束越困难的[作,为领导决策提供及时、准确、全面的信息依据。系统设计立足于先进的计算机技术、网络技术、数据库技术等,结合先进的丌发方法与现代管理方法,做到实用性与先进性相结合。2可扩充性原则:在应用系统设计过程中,采用模块化的程序设计方法,为系统留有充分的接口,使应用系统具有良好的可扩充性,能随着企业的发展变化进行升绂、改进,满足企业未来发展的需要。3丌放性原则:系统在建设上加强标准化及采用统一的技术规范,与其他管理业务平台要有机的联系对接,以实现资源、信息、数据共享。4安全性原则:为了保障数据平稳正常的运行,以及数据的完整性,整个系统必须有很好的安全性,必须加强数据库的安全保密凝计。5统一管理、分级管理与丌放性协调发展原则。6动态管理原则:由于行业的竞争同趋激烈,所设计的方案应具有快速实现能力,以求缩短丌发周期,尽量让系统早投入实旄动作,占领市场和资源。周时,针对未柬的发展,方便已有的IT资源重复利用和增量发展。7集成性原则:企业的资材采购信息管理作为整个企业电子化的一部分,必须可以与现有的系统快速集成。而且随着今后业务的进一步发展,所有新系统与原系统的集成应该遵循同一的标准接口,而无需为应用程序的每次变化再专门设计客户化的解决方案。8.完推性原则:实现优化的系统设计,高效的信息管理,友好的用户界面““。44系统的需求获取通过事先制定比较详细的调研计划,然后到资材管理相关的各个岗位与员工进行充分的了解、、己录相应的客户需求信息,并且在软件开发过程中,做到经常与其体的使用者进行讨论沟通等方式,在以下几个主要方面取得了较为明确的客户需求调查信息。1、组织机构和功能、lk务2、组织目标和发展钱略3、不同时期需求重点 第4章系统的分析4、管理方式和具体业务的管理方5、业务流程与工作形式6、数掘与数据流程7、决策方式和决策过程8、可用资源和限制条件9、现存问题和改进意见从而形成了客广J需求调研报告。4.5系统的需求分析对需求获取阶段取得的各类数据,进一步分析处理后,我归纳出了浚资材管理信息系统对具体的使用单位而占.所面临的两大类客户需求:I、业务需求方面:资材分类登记入库。资材出库管理。复台条件查询、统计、打印(入库、出库、库存等)。数据备份与恢复。面向部门内部员工与外部普通用户应做邓同的客户端设计。2、管理需求方面:角色区别设计,不同级别管理人员在资材入库、审批出库等环节应提供匹配其角色身份的用户界面。数据安全设计。注册保密功能,对不同级别管理人员设定相应的系统功能.达到用户数保密的目的。通过以上用户需求的获取、分析等工作步骤,形成了软件需求,从功能需求、数掘要求、性能需求、#I-N接门、设计约束等方面对后面的设计实现的二【作做m了明确的说明。46系统的用例分析执功能lUML建模系统”r分为需求校型、对豫梭’啦干¨体系结_『5j模删.个f系统,直¨阁{i所币: 第4章系统的分析可视化模掣需求模鼎对象模硝体系结构模赳静态横犁(用恻圈)静态模颦(类闺、对象圈、软件体系结构模犁动态模掣(活动图)包图):动态模掣(合作图、硬件体系结杜J模掣({丧I件图、顺序国、状态图)^E置图)t)‘黼)}锗I!黼}I蕊⋯幽4lUML建模系统用例模型的基本组成部件是用例、角色和系统。用例用于描述系统的功能,也就是从外部用户的角度观察,系统应支持哪些功能,帮助分析人员理解系统的行为,它足对系统功能的宏观描述,一个完整的系统中通常包含若干个用例,每个用例具体说明应完成的功能,代表系统的所有基本功能(集)。角色是与系统进行交互的外部实体,它可以是系统用户,也可以是其它系统或硬件设备,总之,儿是需要与系统交互的任何东西都可以称作角色。系统的边界线以内的区域(即用例的活动区域)则抽象表示系统能够实现的所有基本功能。在一个基本功能(集)已经实现的系统中,系统运转的大致过程是:外部角色先仞始化用例,然后用例执行其所代表的功能,执行完后用例使给角色返回一些值,这个值可以是角色需要的来自系统中的任何东西””。帆。执行肴③在管理系统中,山于牵扯到大量的执行者与用例,为了便于组织。按与系统交互的对象的不同将系统划分为三个包,如图4-2所示: ——蔓!兰墨笙盟坌堑匿匿匿嗍4-2圳例模刑包幽仓库管理员与系统交互包描述仓库管理员要使用系统功能(用例),用户向系统输入信息,然后从系统获取信息,以及需要系统提供功能支持资材仓库管理员的同常工作。此资材管理系统操作员与资材管理系统交互包描述包括高级决策操作人员所需要从系统获取到的信息,从而做出分析与决策,并且支持系统更好的运转:资材管理系统操作用户则需维护系统、管理系统.使其正常T作。系统操作员与系统交互的用例模型如下所示:执行者:仓库管理员。用例:身份验Ⅱ、入库管理、出库管理、库存状态、调拨、查询、盘点、生成报表。嘲43仓库管理员川例楼耻陶 第4章系统的分析<)—三卜()㈣“◇翻4-4决策人员、系统操作员的川例模鼎幽47主要业务活动图活动图描述了需要做的活动以及执行这些活动的顺序,它晟大的特点也是与程序流程图最根本的区别在于:程序流程图。般用柬表示串行过程:而活动圈则常常用柬表月i并行过程。活动图的并行表达能力对企业业务活动的建模非常重要,它可以|三l方便的表示业务活动中常见的并行过程.鼓励人们在建立业务过程模型时自然的保留那些业务过程中实际存在的并发行为,在实现阶段可以大大提高业务过程的办事效率和反应的灵敏程度驯。主要业务活动图如图45所示: ——堡!里i竺塑坌堑削4-5主要业井活动剀 第5章系统开拄的环境建立第5章系统开发的环境建立5.1系统的开发平台要根据系统的安全性、可靠性、响应时问、运行效率,计算机操作人员的习惯和水平.公司现有计算机资源和网络状况,现有应用软件的情况等因素,并本着实用、适用、适当超前的原则柬选择数据库管理系统、丌发1‘具、局域网模式、操作系统以及远程网络体系结构等系统平台。目前,解决这一课题的方法与手段非常多,所以首先应选定丌发工具与环境。编程环境的选择微软公司的VisualBasic6.0是Windows应用程序开发工具,使目前最为广泛的、易学易用的面向对象的丌发工具。VisualBasic提供了大量的控件,这些控件可乍|j于设计界面和宴现各种功能,减少了编程人员的工作量,也简化了界面设计过程,从而有效的提高了应用程序的运行效率和f叮靠性。故而,实现本系统VB是‘个相对较好的选择。并选用了WindowsXP操作系统平台,它继承和发展了系统的功能和稳定性,是一个稳定的操作系统。它不但增强了可靠性和灵活性,而且降低了拥有强大、灵活管理服务的计算系统的成本,并为运行企业应用程序提供了良好的基础“”。5.2数据库数据库(Database)是按照数据结构束组织、存储和管理数据的仓库,它产g二于距今血十年前,随着信息技术和市场的发展,特别是二十世纪九十年代以后,数据管理H:再仅仅是存储和管理数据,而转变成用户所需要的各种数据管理的方式。数据库有很多种类型,从最简单的存储有各种数据的表格到能够进行海量数据存储的大型数据库系统都在各个方面得到了广泛的应用””。5.3开发软件visuafBasic简介visualBasic(简称VB)是美田微软公司推m的Windows环境F的软件Jr发_[具,使川VB『Ⅱ以既快又简单地丌发Windov,s应用软件。VisualBasic是从BAsIc(Be搿nnersA11一purposeSystemInstructionCode,棚学者通j目符号指令代码)语奇发展而术的,是Windows环境下快速丌发应用程序的町视化工具。其中,22 第5章系统开发的环境建立Visual是指)-F’发图形用户的界面(graphicaluserinterface,GUI)的方法。Visual的英文原意是“视觉的”或“可视的”,这是指是指直观的编程方法。在VB中引入了控件的概念,如各种各样的按钮、文本框、复选框等。VB把这些控件模式化,并且每个控件都由若干个属性束控制其外观、工作方法。这样,采用Visual方法无需编写大量代码去描述界面元素的外观和位置,只要把预先建立的控件加到屏幕I:.就像使用画图之类的程序,通过选择画图工具柬画图一样。Basic是指BASIC语言,之所以叫VisualBasic,就是因为它使用了BASIC语者作为代码。VB在原有BASIC语言基础上进一步麓展.至令已包禽了数百条语句、函数关键词,其中很多与WindowsGUI有直接关系。VB与BASIC之问有着千艘万缕的联系。当然,尽管VB沿用了早期BASIC中的一些语法,但并不等于会用gASIC语占编程的人就能灵活运用VB。它是一种]1发工具而不仅仪是种语言,从数学计算、数据库管理、客户/N务器软件、通信软件、多媒体软件Internet/Intranet软件,都¨I以用VisualBasic丌发完成,其功能之强大也绝非早期的BASIC所能比拟。使用VisualBasic语占,4;但可以编制常规的应用程序,而且还可以使用VisualBasic的脚本语言VBSeript进行Web丌发:使用嵌入式VisualBasic语言VBforApplication(简称VBA)对一些流行软件(比如Word、Excel、Access、AutoCAD和CorelDRAW等)进行_=次丌发;使用VisualBasic语占还u,以设计ActiveX控件,用rWeb或者其他支持这技术的程序中。此外.VisualBasic是少数的几个有中文版的编程工具之一““。VB足目dF所有丌发语言中最简单、最容易使用的语占。作为程序设计语言,VB主要育以F特点。1面向对象的可视化设计平台。2.事件驱动的编程机制。3结构化的设计语占。4.允分利用Windows资源。5刀傲的数据库功能与网络支持。54系统开发的结构模式 第5章系统开发的环境建立C/S模式即Clie州Server结构模式,其形式如图j1所示,在C/S结构的网络中,客户机与数据库服务器相连,并负责与用户的交互及收集用户信息,通过网络向服务器请求对数据库信息的处理工作。客户机的处理功能通常都很强,在它上面运行的程序通常也很复杂。服务器负责管理对数据库的访问,对数据库进行检索和排序,并负责数据库的安全控制。在C/S模型中,所有客户端需要配置操作系统、网络协议软件、客户机软件、丌发工具、应用程序等“”。世刖——1磊匝互卜—[——l幽5I客户机/服务器网络纠i构凹13/S结构模式,即Browser/Server结构模式。其形式如图5—2所示,分三层,第·层为表示层,用户通过浏览器完成和后台的交互及最终查询结粜的输出功能。第二层为具有ODBC接口的WEB服务器,届功能层,主要利用服务器完成客户的应用功能。第三层是数据层,根据客户的请求独立地进行各种运算。在13/S模型中,客户端只需装上操作系统、网络怫议软件、浏览器即可。服务器端则集中了所有的应用软件的丌发、维护等工作“⋯。幽5—2浏览器7服务器州络结构恻 第6章数据库设计61数据库设计的概述计算机信息系统【三l数据库为核心,在数据库管理系统的支持下,进行信息的收集、整理、存储、检索、更新、加工、统计和传播嚣操作。对于数据库应用丌发人员米I兑,为使现实世界的信息流计算机化,并对计翦:机化的信息进行符种操作,就是如何利用数据库管理系统、系统软件和相关的硬件系统,将用户的要求转化成有效的数据结构,并使数据库结构易于适应用户新的要法语的过程,这个过程称为数据库设计。确切的|兑,数榭库设计是指对于一个给定的应用环境.提供一个确定摄优数据模型与处理模式的逻辑设计,以及一个确定数据库存储结构与存墩方法的物理设计.建立起既能反映现实世界信息和信息联系,满足用户数摊需求和加工要求,义能被某个数据库管理系统所接受.同时能实现系统目标,并有效存取数据的数掘库。数据库已成为现代信息系统等计算机系统的基础与核心部分。数据库设计的好坏直接影响着整个系统的效率和质量。然而,由于数据库系统的复杂性和它与环境的密切联系,使得数据库设计成为一个困难、复杂和费时的过程”“。6.2数据库需求分析需求分析是系统歼发工作中的关键性l一作,直接决定了系统丌发的成败。通过对系统的需求分析确定系统必须完成的工作,从而对系统提Ⅲ完整、准确、清晰和具体的要求。用户的需求且体体现在各种信息的提供、保存、更新和查询等方面t这就要求数据库结构能充分满足各种信息的输出和输入。收集基本数据、数据结构以及数据处理的流程,组成一份详尽的数据字典,为后面的具体i5}计打F基础。分析调查有关资材管理的需求,得到系统的数据处理流程图,如图6l所示: 第6章数据库殴计n丽1........................rJ蚓61系统数据处理流利剀针对一般资材管理信息系统的需求,通过对资材调配工作过程的内容和数据流程分析.设计如下几点数据项和数据结构;(1)资材信息管理。包括的数据项有:供应商编号、供应商名称、资材名称、入库编号、资材规格、计量单位、数量、单价、入库时间、等项目。(2)资材入库管理。数掘项有:供应商编号、供应商名称、入库编号、资材编号、资村名称、资材规格、计嚣单位、数量、单价、入库闩期、经手人、备注等。(3)资材山库管理。包括的数据项有:出货编号、资材编号、资材名称、资材规格、计量单位、数量、单价、入库同期、备注、提货人、提货单位等。(4)资材盘点管理。包括的数据项有:盘点编号、盘点资材、资村规格、计量单位、数量、单价、盘点R期、备注、盘点员、有无异常情况等。63概念设计63.1概念设计的必要性在概念没计阶段-h没计人员从用户的角度看待数据及处理要求和约束,产生一个反映j{1]户观点的概念模式。然后再把概念模式转换成逻辑模式。将概念设计从蹬|l过程叫1独立"柬,至少有以F几个好处m’。 第6章数据库殴计1、备阶段的任务相对而占单一化,设计复杂程度大大降低,便于组织管理。2、不受特定的DBMS的限制,也独立于存储安排和效率方面的考虑,因而比逻辑模式更为稳定。3、概念模式不舍具体的DBMS所附加的技术细节,更容易为用户所理解,因而才有可能准确反映用户的信息需求Ⅲ1。6.32概念模型概念模型足剥现实世界进行抽象的L具。现实世界是复杂多变的。目前任何一种数据建模技术都不可能原样复制实在中存在的对象,只能抽取其局部特征,构造反映现实实体主要特征的数据模型。图6-2描述了数据抽象的基本过程。第一层抽象9—一卒—一I兰竺!IN62辑观对象的抽象过科概念模型是对现实世界的第一层抽象,也称信息模型。这一类模型中最著名的是实体联系模型,它按照用户的观点对数据建模,具有较强的语义表达能,J.概念清晰简单,易于理解,是数据库设计人员与用户之问交流的语言。第二层抽象直接面向数据库的逻辑结构,描述了数据之I剐的逻辑组台,被称为数据模型。例如网状模型、关系模型和层次模型等。这类模型有严格的形式化定义.便于计算机存储和运算。数据模型应满足三方向的要求:一是能比较真实地模拟现实世界的实体;是易于理解:三是便于在计算机中实现,并进行相关的运算。“。概念模型实际上是现实世界到计算机世界的一个中间层次。为了把现实世界中ffj具体事物拙琢组织为莱一数据库管理系统支持的数据模型,人1门常常首先将现实世界抽象为概念模型,然后将概念模型转换为数据模型。也就是说, 第6章数据库设计首先把现实世界中的客观对象抽象为某一种信息结构,这种信息结构并不依赖于具体的计算机系统及DBMS,而足依赖于概念模型,然后再把概念模型转换为某一DBMS支持的数据模型。使用概念模型描述现实实体涉及以下主要概念:1、实体:是客观存在并以属性区分其差异的具体事物。数据就是客观现实的描述。为了抽象地描述客观现实相同的事情,可以使用实体的概念。实体中的一个具体事情的出现,就是一个实体的实例。2、属性:是实体所具有的特性,每一特性都称为实体的属性,每一属性都有~个值域。3、宴体集:具有相同属性的实体集合称为实体集。4、t键:是能惟一标识一个实体的属性及属性值,主键也可称为关键字。5、联系:在现实世界中,实体与实体之例有各种联系,归纳起来,主要有三种情况,见图6—3所不:甲甲甲11:MM:N由由由凹63实体之间的联系一对一的关系。这是最简单的一种实体间的联系,它表示了两个实体集中的个体之间存在一种~对应的关系。一对多的联系。实体问存在的另~种联系是对多的联系。多对多的联系。实体间更多的是多对多的联系。4。 第6荜数据库设计63.3概念模型及其表示概念模型的表示方法很多,其中最为著名的是PPSChen于1976年提出的实体联系方法(Entity—RelationshipApproach)。泼方法用E—R图描述了现实世界的概念模型,称为E—R模型”“。E—R模型有四个基本成分:矩形表示实体,椭圆形表示实体属性,菱形表示联系,连线表示实体之[甘j以及属性之间的联系。矩形框、椭圆形椎、菱形框内要标注实体、属性和联系的名字,连线两头标注联系的类型是对一、对多还是多对多的联系。根据企业资村管理系统的数据库结构设计得到如下E.R模型:l,供应商一资材:一个供应商提供多种资材,资材主要集-中在某个领域,但是小刚的供应商可能提供相同的资材。匝※i>—回幽6—4供应商与资材E-R酗2仓库一资材:仓库需要存储大量的资材。臣※≥也幽65仓库与资材E.R幽3管理员~仓库:采用信息化管理,可以实现管理员管理仓库。匝丑<≥卜囵幽6-6管理员与仓库E-R幽4经理职员:经理可以领导多个职员。罡<>坷嘲6一T经理与姒具E.R蹦 第6章数据库设计5总体E—R罔设计图68总体E.R幽64数据库概念结构设计设计出能够满足用户需求的各种实体以及它们之间的关系,为以后的逻辑结构殴计打下基础。这些实体包含各种具体信息,通过相互之间的作用形成数据的流动。根据上面的设计规划出的实体有:职员、仓库、资材以及供应商。其中每一个实体都具有相应的属性:职员:属性有姓名、职务等。仓库:属性有仓库名称、管理员、地址等。供应商:属性有供应商编号、供应商名称、联系电话、业务联系人、传真等。资材:属性有资材编号、资材名称、资材规格、单价等。以卜实体之间的联系如下:库存量表示某种资材在某个仓库中的数量。一个仓库有多个管理员,个职员只能在某个仓库工作,仓库与管理员之『日|是一对多的关系。领导与职员之问是~对多的关系,经理可蛆领导多名职员。供应商、瓷材之间是多对多的联系,一个供应商供应多种资材,某一种资材可以从多个供应商处采购。依照实体以及实体之问的联系,浚资材管理的E—R模型如图69所示。 第6章数据库设计冈《炙§≥鑫剀69(a)实体及其属性目6—9(b)完整的资村管理E—R模砸 菇6章数据库设计进一步分析资材管理系统的E—R图,可以发现,实体所反映的是企业的“数据节点”,每一个节点m一系列属性值描述其特征。比如,资材实体是企业的一个数据节点,这个数据节点由资材编号、资材名称、资材规格、单价以及其他数据描述。而E.R模型中的联系,事实上对应于企业活动中的业务流程,通过这些流程所有的数据节点联系在一起,构成企业的数掘流。比如,供应商和资材之削的联系,实际上对应于企业的采购流程,每当企业根据生产计划采购某种资材的时候,采购流程启动,购买一定量的资材之后,企业的库存数据随之发生变化。E—R图将企业的数据和活动从纷繁复杂的企业经营活动中抽象出来,在此基础12,按照一定的数据模型,就可以构造企业的数据库结构和数据流1⋯。得到上面的数据项和数据机构以后,就可以设计出能够满足用户需求的各种实体以及它们之问的关系,为以后的逻辑结构设计打下基础。这些实体包含各种具体信息,通过相互之间的作用形成数据的流动。本资材管理信息系统根据上面的设计规划出的实体有:资材基本信息实体、资材入库管理实体、资材出库管理实体和资材盘点管理实体、资村借出管理实体、赉材归还管理实体。各个宴体具体描述,如图6-11、图612、罔6一13、图614、图6—1j、图616所示㈨1:目611资村基本信息实体吲 第6章数据库设计幽6—12瓷材入件管理实体幽幽613资材山库管理实体剀矧6—14资利稚点管理宴体幽 第6章数据库醴计劁615资材借山管理实体幽图6—16资材门还管理实体幽65数据库逻辑结构设计概念设计的结果是得到一个与DBMS无关的概念模式。而逻辑设计的目的是把概念设计阶段设训好的全局E—R模式转换成与选用的具体机器上的DBMs所支持的数据模型相符合的逻辑结构(包括数据库模式和外模式)。这些模式在功能上、完牲陛和致性约束及数掘库的·丌扩充性等方面均应满足用户的各种要求。对T二逻辑设计fni占.应首蝴DBMS,在指定的DBMs上进行逻辑结构设计㈨。 第6章数据库设计现在需要将上面的数据库概念结构转化为数据库系统所支持的实际数据模型.也就是数据库的逻辑结构。改资材管理信息系统数据库中的各个表格,其巾主要包括供应商信息表、资材入库管理信息表、资材出库管理信息表以及资材盘点管理信息表、资材借出管理信息表、资村归还管理信息表,其总体设计结果分别如下表6—1、表62、袭6-3和表6—4、表6j、表66所示。⋯[37。I袁6—1供应商信息表字段名称数据类型是否为空说明gys_ld文本否供戍商编呼时s二N鲥K文本否供随商名称gysLxr文本否联系人gysPhone文本否联系电话gys_Fa=x文本否传真gysMEdit文本否修改^gysMDateEl蝴,时间否修改日蝴gys_Remark备注是备注表6-2资材入库管理信息表字段名称数据类蚋是否为空说明数字否入库编母wzrkgLNumld文本否资材编号wzl.kgI_Name文本哲资材名称wzT_kgl_spee文本否资材规格wzrkgl—Gysld文本否供麻商编号wzrkgl-oysName文本否供应商名称wzrkgl—Unit文本否计越单亿wzrkg]Jum数字否数墙wzrkgl—Price货币否单价wzrkgl—Date日期/时间否入库日期wzrkglPeople文本否经手人w玳四—MEdit文本否修改人wzrkgl—.MDate日期/时间否修政日期wzrkglRem盯k备注是备注 第6章数据库设计表6-3资材山序管理信息表字段名称数据类型是否为空说明ID数字否出库编号一wzckgiNumld文车否资材编号wzekgl_Nanle文本否贷材名称Wzckgl—Spec文木否资材规格wzckgL』nlt文本否计量单位wzckgLNum数字否数蛄wzc蝇LPrice货币否单价wzckgLDme日期,时间否出库目划wzckglPeople文本否经手人wzekgl—MEdit文本否修政人wzckgl—MDate日期,时间否修改日期wzckgLThr文本否提货人wzckg[』HDW文本否提货单伉wzckgl—Remark备注是备注表6~4资材箍点管理信息表字段名称数据类删是否为空说明wzpdgJld文本否盘点编号wzpdgl』aille文本否盘点资材wzpdg|Spec文本否资材规格wzpdgJUnit文本否计擎单位wzpdgl—Num数字否数带wzpdg[_Money货币否金颡wzpdgl_People文本否盘点员wzpdglWZYC文本否有无异常wzp岵J_Date日蝴』十阃否盘点日捌wzpdglMEdit文本否修故人wzp电LMDjtle日M帅十阃否修政月蝴wzpdgl—Remark器注是备注 第6章数据库设计采65_矗材借山管理信息表字段名称数据类皑是否为空说明数字否借山编号wzjcgl—ld文本否资材编号wzjcgl—Ids文本否资材名称wzjcglName文本否资材规格wzjcgl—Unit文本否汁晕单位wzjcgl-Ntim数字否数菌wzjcg/Price货币否堆价wzjcglDate日删,时间否借川]蹦wzjcglPeople文本否经手人wzjcgl-Remark备注否备注wzjcglThr文本否提货人wzjcgl-THDW文本否提货单忙wzjcg/MEdit丈本否修改人wzjcgl—MDate日期月t问否修改日JOJ表6-6资材门还管理信息表字段名称数据类刑是否为空说明数字否91还编号wzghgIJhid文本否借货编号wzghg/Ids文本否资材编号wzghglJame文本否资材名称wzghgi-Num数字否门还数苗wzghglNoNum数字否朱还数量wzghglDate日期肘目否!}1还日期wzghgl—People文本否经f人wzghg[一Remark器注否备注wzghgl—Hhr文本否还货人wzghglMEdit文本否修故人wzghgl-MDate日划/时间否修[叟日删 兰!垦墨竺塑堡塑!!:竺壅垫——第7章系统的详细设计与实现71系统的功能模块设计与实现根据企业符理软件q,的符项功能,针对资材管理信息系统的需求,通过对资材调配工作过程的内容和数据流程分析,进行集中、分块t设计。其系统主耍功能模块小意图,如图7l所示:幽7—1系统土要功能模块示意幽(1)基本信息管理:供应商信息、仓库管理、期初库存设置。(2)资材信息管理:资材出入库管理、资村借出归还管理、资材盘点管理。(3)资材查|白J统训:资材出入库查询、资材借出归还查询、出入库资材闩统计、出入库现金年统计。 第7章系统的详细设计与实现(4)资材数榭报表:资材出库报表、资材库存报表。(5)系统维护:操作员管理、数据管理、同志管理、密码修改。7.11系统登录界面设计客户端应用程序主要起一个桥梁作用,它本身需要具有一定的安全保护措施,能够对静录用户的身份进行安全验证,保证数据库中的数据不受非法用户的破坏。所以,当用户准备运行该资材管理系统时,首先要进入的是用户登录模块。当Hj户输入的用户名与密码同数据库中的}己录相符,爿能够进入主程序,否则t会提示用户名或密码错误,禁止进入系统。其模块流程如图72所示:幽7—2系统登采模块流程幽 蔓!童墨竺堕堂塑堡i:皇圭堡——系统登录界面如图7-3所示:嗤73登录界面l划71.2系统主界面设计输入lF确的用户名和密码登陆成功后,进入中粮米业资材管理信息系统的主界面,该界面是系统的主体,其中包括系统的所有菜单和模块的建立,并通过该界面来宴现所有的功能模块,并实现系统的运作。系统主界而如图74所 ——笙!童墨竺塑堡塑堡盐兰窒垫圈74系统主界面图在此界面中设计了基本信息管理、资材信息管理、资材查询统计、资材数掘报表以及系统维护等菜单,各菜单结构如下:(1)基本信息菜单包括:仓库管理、供应商信息、期初库存设置。(2)资材信息管理菜单包括:资材入库管理、资材出库管理、资材借出管理、资材归还管理、资材盘点管理。(3)资材查询统计菜单包括:资材入库查询、资材出库查询、资材库存查询、资材借出查询、资材归还查询、出入库资材R统计、出入库现余年统计。(4)资材数据报表菜单包括:资材入库报表、资材库存报表。(j)系统维护菜单包括:操作员管理、密码修改、操作员权限管理、数据恢复、数据各份、数据清理、查看阿志、同志清理。72基本信息管理模块设计与实现基本信息管理模块中的仓库管理、供应商信息、期初库存设置,这都是作为系统软件和企业的最基本也是晟重要的模块,企业能够JF常运作离不歼这些信息的处理.基本信息管理模块示意图,如图7j所示:匡回【....———..............。——,J[—-=土=—7。倒⋯引d 第7章系统的详细设计与实现削7-5基本信息管理模块示意剧72’仓库管理界面设计仓库管理功能描述:打开仓库管理界面后,列表中有显示仓库所有字段对应的数据。列出所有资料后,并将仓库资料内容在仓库名称、管理员等控件中显示出柬。选择编辑后,将显示界面上仓库名称、管理员等控件的内容。并将光标焦点定位在仓库名称的文本框上。然后可以直接通过“编辑”来写入,并更新仓库名称和管理员、联系电话、地址、构建同期、备注。输入完整信息后,单击“保存”按钮,所填信息将写入数据库。保存是向数据表插入数据,编辑是更新数据表巾的数据。仓库管理界面如图7-6所示:i熙I烹j飘l黑I胡嚣j库再I般稿I关团l懈称P#{i。j)’出自肾。·。管赖陲矿一麟蝴1w一¨岍“地址卜8≈{2jⅡd§4昱=:¨*构睦日期鲁i芏“j‘}lMll_*蹦7—6仓库管理界面剧7.22供应商信息界面设计供应商信息功能描述:生成新增的供应商编号和供应商名称,以及联系人和联系电话、传真等。可以通过添加、删除、修改等功能对供应商信息进行更改,以添加为例,单击“添加”按钮,供应商编号将自动生成,既方便,也可以防止错误山现。然后根据J_|1户自己填写资料,资料填完后.单击“保存”按钮,则信息添加成功j1-写入数掘库中。供应商信息界面如图7~7所示: 第7章系统的详细设计与实现幽77供麻而信息界面幽723期初库存设置界面设计在软件第次使用时,让jli|户建立好基础档案,在进行仓库账目操作时,先进行期初设置,即将仓库当前库存写入系统。在以后的操作中,将每个会计期I训的盘点实数作为F个月的期初数据。并且能调出过往盘点及期初数据。期初库存设置界面如图7-8所示: 第7章系统的详细设计与实现幽78州衲库存设置界面刚7.3资材信息管理模块设计与实现资材信息管理模块是企业软件管理设计的三大主要模块之一,相对其它的曲人模块而言,资材信息管理模块设计的重要性和对设计严谨性的要求更高,库存数捌产小的灌乱将会直接影响到资村的进货和使用上的混乱,并日会容易造成公司决策和逗7-9所示幽?-9资材信息管理示意幽731资材入库管理界面设计当资材被采购员买回时,要先在资材会计那罩入库,之后由仓库管理员进行入库确认。、j入库确认操作完毕之后,数据库中的库存表中的数据爿增加并生成入库尊。资材入库模块的模块流程图,如图710所示: 第7荜系统的详细设计与实现凹7—10资材入席模块流样剀资材存入仓库的相应单据证明,记录资材的信息,包括资材入库的价格、计量单位、数量等,在陵仓库中能存放的最低数量和展人数量,以及供应商、经手人菩信息。在这罩将记录仓库将要存储的资材的基本信息。其中包括:供应商编号、供应商名称、资材名称、入库编号、资材规格、计量单位、数量、单价、入库时i训、等项目。虽然这些项目是资材基本的信息,但却相肖重要。在此界面添加后的信息将自动添加到资材入库报表、资材出库报表当中。资材入库管理界面如图711所示: 第7章系统的详细蹬计与实现幽7Il资材入席管理界面酗存此界而进行资材入库信息的添加,包括基本信息,入库信息和各注信息三个部分。基本信息的填写极为简单,根据用户自己填写,供应商编号、供应商名称、入库编号、资材名称、资材规格、计量单位、数量、单价、入库时间、等信息都将自动录入,其中入库同期默认为当前闩期,进一步方便了用户的填写。备注信息可以为空。肖所有项日填写完毕,单击“保存”按钮,信息将自动存八数据库中的资材入库信息表中。除了添加资材信息外,系统还提供查询、修改和删除功能。我将添加和删除两大丰要功能做在了同界面.主要都是为了在添加的同时可以直接删除多余的资材信息,这不只在设计中省却了一个界面,减少了软件大小.节约了系统资源,同时添加中,也能做删除数据,做到不重复,让人一目了然,大大的增加了软件的亲和力。 第7章系统的详细|殳讣与实现732资材出库管理界面设计资材出库管理同样也分为出库、保存、删除,无论足程序设计还是操作上都有些类似,差别只在于生成的出库资材只能显示存放在仓库巾的资材信息,而入库显示的是所有『fJ资材基本信息。资材出库管理界面如图712所示:削712资材出H:管理界面幽当各科室请领资材时,应由资材所在科室的管理员在出库管理子模块中提出资材领用申请。填写领用申请时,应先选择要资材所属资村分类.然后在库存中选择需要请领的资材,填写申请。申请提交给主管审批之后,山仓库在系统中进行出库核实操作,并同时打印出库啦。之后仓库管理员发放资材,各科室管理员按照出库单核实实物,在系统q】进行出库确认。当出库确认操作完毕之后,数据库中的请领资材爿从库存表中减少。 第7章系统的详细设计与实现733资材借出管理界面设计在公司Jl!常运作的过程中出现需求资材的情况下,需要向其他部门借出时,那么就要在该资材管理信息系统中使用资材借出管理功能,米记录该借出资材的信息。资村借m管理操作界而如图713所示:r鬻材譬砸髓~⋯一一11訾“2P”1涮借贷躺号:l费材蕾号:l资材名称:I计量单位:厂———习惜出数量:厂——一靳:厂——一借m日期:面瓦二ir]备注:广————一重型I堂l堡至I墨里l4Il’憎簧^l筐僦I酬713资材借山管理界面幽数据选择框进行动态智能化统计信息,使选择更方便。单击“添加”按钮即可填写借出资材相应的资材基本信息,借出信息填写,借货人、借货单位。也可以在此数据框中进行相应的删除信息。内容正确后,单击“保存”按钮,信息将自动写入出库数据表中。 第7章系统的详细设计与实现734资材归还管理界面设计资材借jf{管理‘_资材!J_=|j丕管理,}||}反,址求公司资材¨还情况。资材岍还管理界面如图7¨所示:幽714资材门还管理界面幽在此界而进行资村归还信息的添加,单击“添加”按钮,将所要归还的资材信恩填写完整,包括摹本信息、借货编号、资材名称、资材编号、归还数量、未归还数理、归还闩期、备注等信息以及还货人,并单击“保存”按钮.资材归还数据将自动记录数据库中,其中入库只期默认为当前同期,是进步方便了用户的填写;备注信息可以为空。7.35资材盘点管理界面设计资材盘点是对每一种库存资村进行清点数量、及登记盘点表的资材库存管理过程,兑U的主要是为了清查库存的实物是否和账面数相符,以及库存资材的状奄。每种资材都可以设定十n应的盘点周期,系统自动输出应盘点的资材项。盘点单用于对仓库资材定期或不定期进行盘点时作记录,据以核对账丽数量与 蔓!主墨竺塑堂塑!盐兰壅望————————————一实际库存数量的差异,以分析原因并做出调整处理。其模块流程图,如图715所示:幽7—15资材盘点模块流样I苎|资材盘点管理明细行列表的最后-行为空白行,就是用于增加新的明细行。在此界面进行盘点资材的添加、删除、修改。单击“添加”按钮,将填写盘点编号、盘点资材、资材规格、计量单位、数量、单价、盘点同期、备注等信息以及盘点员。当前显示资材盘点管理,』能对盘点单列表内的内容进行添加新的行。添加是向数据表插入数据,向数据表中插入盘点明细行数据。在资材盘点管理列 第7章系统的详细醴计与实现表中控件的最后新增加一行显目i新增盘点的所有资料,并将资材盘点单列表的当前行定位在最后一行。添加成功后,要出现提示信息“信息保存成功!”。删除则是对资材盘点中的信息进行删除处理,如果资材盘点管理列表的当前行没有明细行,则小能对明细行进行删除。要弹出提示信息,让用户选择是否进行删除,选择“取消”则退出删除处理,选择“确定”继续处理。将资材盘点尊明细行列表中的当前行从数据库中删除。修改是更新数据表中的数据,更新列裘中当前行显示的盘点编号、盘点资材、资材规格、计量单位、数量、竹价、盘点同期、备注等信息以及盘点员。更新数据成功后,要出现提示信息“信息修改成功!”。在有无异常情况一栏中,可下拉式菜单根据操作员自己选择“证常、报损、报益”,选择报损和报益后,右边可以直接填写报损或报益数掷;,并且可以根据酸功能很清楚的掌握公司的内部情况。单击“保存”按钮,盘点资材的情况将记录数据库中.奠中盘点阿期默认为当前同期,也是为了进一步方便了用户的填写,备注信息可以为空。资材盘点管理界面,如图716所示:酬7一16资材僦点管理界面吲 第7章系统的详细设计与实现7.4资材查询统计模块的设计与实现资材查询统计模块是一个良好的企业管理软件所必备的模块。查询模块提供了企业进行同常资材管理和监督的重要手段,其中单据查询和库存查询是查询模块的核心嚣|j分。单据是业务数据的载体,通过对单据的监督、汇总,可以准确地了解业务的进展情况,掌握企业中资材流动的趋向。及时了解库存情况,是科学制订生产计划的依据,可以提高企业管理的效率和精度。资材查询模块示意图,如图7一17所示:●。。。。。。。—‘。。。。。。。。。。。。。。—~J资材商询统计J资材入怍卉恂资材出库卉确资材库存卉向资材倩山布询资材n还砖响出入库现金芷统计出入库资村日统计凹717资材青询模块示意幽741资材查询界面设计在查询资材的时候,只要用户在查询栏中输入要查询的资材名称关键字则实现模糊查询。资材山库查询、资材借出查询、资材归还查询,所有查询模块的查询方式都遵循这一规则并实现资材的查询。资材入库查询界面如图7一18所示: 第7章系统的详细致计与实现q’R¨Ⅵ},啊’~~一⋯一⋯一⋯。—一’‘■l辅。’2琥l供。曙_耳f僻’张隅琉『÷’量苴佑l·II·请输^要盔曲I撇名称I幽7一18资村入库卉询界面I刘75资材数据报表模块的设计与实现7.5.1资材库存报表界面设计在哦明细表巾,将出现所有库存信息,用户根据需要,对数搬资料进行查询,得出结果后单击打印,即町于】印所需要的数据表。资材库存报嵌界面如图719所示: 兰!童墨竺塑壁塑坠生兰皇型幽719资村库存报表界面蚓6系统维护模块设计与实现系统维护模块是企业管理软件所必备的模块。它一般应具备系统管理员的息设霄、系统本身信息的描述与设置。本系统的维护模块可分为:操作员管、密码修改、操作员权限设置、数据备份、数据恢复、数据清理、垒看同志个部分。系统维护模块示意图,如阁720,系统维护模块流程图,如图7—2l示: ——笙!里墨竺盟堂型!!:皇兰丝创7—20系统维护模块示意斟幽7—2l系统维护模块流料幽761数据清理界面设计数据清理功能描述:清除数据库中所有表信息,该功能需要输入正确的用户名和密码爿能进入数据清除界面,进行对数据的更改。数据清理界面如图722所示: 第7章系统的详细垃计与实现幽7~22数据淌理界面幽76.2操作员管理界面设计操作员管理,它~般应具备添加新用户、设黄用户权限和修改用户密码等功能。在使用管理软件时,因企业内人员的分工不同,每个人对管理软件的使用权限也不闸。~般由系统管理员(具有最高使用权限)进行新用户的添加,同时设簧新用户对系统的使用权限。使用系统的每个用户都可以修改自己的登录密码,以防止K时『日j使用同一个密码而被其他非法人员记住。操作员管理界面如图7—23所示:图7—23操作员管理界面幽76.3密码修改界面设计被授权f|勺用户可以在此修改各自的密码。如果原束的密码输入错误或新密码与验证码小同,系统就会报错。与用户管理窗n的设计不同,所有能够谨录到本系统的用广1,都有权限修改自己的用户密码。当辟j户不小心泄露了自己的56 笫7章系统的详细殴计与实现密码.可以在此进行修改,以防止他人窃取公司的商业机密或破坏本系统中存放的数据。此窗口也设汁了密码验证的功能,防止因手误而输错新密码。密码修改界面如图724所示:H724密码修故界面圈7.6.4操作员权限设置界面设计鸯陆本系统的具有用户管理权限的管理员,可以添加、删除_;4==系统的管理员、并设置或修改柑鹿的操作权限:对于不只有用户管理权限的片4户,系统的相应功能菜单变为灰色,鼠标状态为不能单击。操作员权限设置界耐如图72j酗7—25撵作员权限设越界面图 第7章系统的详细设计与实现7.6.5查看日志界面设计查看川志功能拙述:可以在看系统自最近一次初始化以后,所有用户操作统统的情况,包括管理员姓名、操作时间和操作类型。对于公司的管理会有很大帮助。查看闩志界面如图7—26所示:操作员姓名赳鲁锋趔鲁漳赵鲁罐趔鲁捶赵鲁锤赳鲁肆日姗十月操作凳型J‘退出系统逞女耥系统登录退出毳蜻退出系境退出幕统i±矬录暹出幕兢系鲭跫录暹出菘螗幽726卉看日忐界面幽7.7系统的测试77.1系统的测试计划按照软件工程的思想,任何软件丁F式投入运行前,必须进行测试以保证软件的正确性、容错性、可扩展性及运行速度等等。在该系统交付使用前,我们对该软件系统的所有功能模块进行了详细测试,测试的目的在于寻找问题、纠正错误、提高系统技术能力,使系统早『]投入运行””。系统删试分别采用软件T程巾的“白盒法”(测试时了解系统的内部逻辑)及“黑盒法”(测试时不丁解系统的内部逻辑.根据输入内容和输出结果对系统做出判断)。对=j=_非计算性功能,测试时看系统是否能够完成与业务相应的处理5B 第7章系统的详细殴计与实现T作⋯’。系统测试准备,准备系列的合法数据以及一些非法数据录入,找出软件的漏洞及缺陷所在。系统测试内容,针对登录模块,同时以管理员和普通用户的身份交错测试,以检验其过滤性。对系统的各项功能模块输入各种类型的数据进行数据校验m’。7.7.2系统的测试项目进行以下项只功能的测试:I数据查询,进入查询窗口,在这早可以根据不同的选项填入不同的查询信息,浏览查询结果。2.数据添加,进入添加窗口,先按“精加”按钮,然后在相应的输入文本框中输入要添加的数据,输入完毕后按“保存”按钮完成数据录入工作。3数据删除,进入删除窗11。首先要选择需要删除的一条i己录,确认之后,点击“删除”按钮完成删除信息。4设置片j户权限,进入操作员管理,设置珐用户的操作权限。73系统测试的结果系统经过反复测试,确认该资材管理信息系统的主要功能正确可靠 第8章结论与腱望第8章结论与展望本资材管理信息系统是为了满足江西米业资材库需要而丌发的,在系统实现过程中,出于安全的需要,选择了客户机用及服务器体制,采用VisualBasic开发语苦和Access数据库平台,用到的平台、工具都是非常成熟的技术。该毕业设计经过系统的编制与调试,已基本上满足了我公司的资村管理需要,但是在使用过程中,难免会出现这样或那样的问题,还有待于在实际工作中去检验和进步宽善。资材管理的需求和目前软件的发展趋势基本束源于实践,软件需要适用于各种企业。随着计算机技术的发展、企业人员计算机水平的不断提高,更重要的是企业领导对信息化建设的更加重视,在资材管理工作中的应用还要加以研究,相信以后会有越来越多,更好的软件产生。 致谢本文是在王映龙教授的细心指导和热心帮助下完成的。通过王老师的指导,使我顺利完成学术论文,还感受到了那种脚踏实地的工作作风,孜孜以求的敬业精神以及诲人不倦的美好品德。通过开发这个资材管理信息系统,巩固了以前所学的知识,提高了应用能力。对我来说,这些都是些无比珍贵的财富,我将水远铭记在心并不断学习。在此,对老师表达诚挚的敬意和衷心的感谢!同时,还要感谢学院的各位老师和负责人,在校期I"q,得到了各位老师的指导和帮助,使我的课题和论文顺利完成。6学生:赵鲁锋2011年2月 参考文献[1]汉清计算机I.作宅,((VisualBasic6.0数据库开发实例》[M]机械I:业出版}十.20043[2]何旭洪{VisualBasic数据席开发实例导航》[M]人K邮电出版社,20051l[3]孙健鹏{VB数据库开发实例解忻》[M]机械l、世出版社,20053[4]千汉新{visualBasic科序改计》[M]科学山版社.20047[5]际惟斌《VisualBasic6.0开发指南》[M]清华人学出版朴,20041[6]张彝葆《VB数据库系统设计与开发》[M]清华大学出版社.20059[7]Buczek{Access2002数据库开发即时麻HJ》[M]人民邮电山版社,20053【8JVisualBasic6HarryMDeitel.PaulJDeitel,TemRNieto[MJ电子I:业山版}十200410[9]秦斌等VisualBasic6.0数据库系统开发!o麻H{[M]中国水利水电山版社0006I[10]潇湘【.作窀{Access2002中文版从入fJ到精通》[M]人K邮Lb出版补,200110[I门刘烨等一种库存管理&计在企业管理信息系统中的麻川口]科技进步0对策,20038[12]车厂明等怍存管理系统评价研究口]物流科技,2004iI[1。]际p,钱玮,唐毅等MIS开发相关技术研究[J]计算机I科与科学.2003,6[14]邹承林,F爱松小碰MIS中的JJJ户权限管理[J]电脑开发与席川,20040[15]VisualBasic6.0牲序殴计与开发技术求是科技[M]人K邮电出版社.20049[16]E思科技一铺{iJf发中心,VisualBasic6.0数据席麻川开篾[M]电子l业山版i十.20038[17]采擒豹等管理信息系统通川奇淘【具的设计与实现口]计算机I稗与戍朋,20059[18]美CantuU下辉等泽visualbasic6.0从入『J剑精通[M]l乜于l:ik山版社200310[19]刘艺visualbasic6.0面向对象编样思想[M]机械I:业出版}L.20049120JMadlynBohl.MariaRynnfToolsfoStmcturedandObject.odentedDesign:AnIntroductiontoProgrammingLogic(SixthEdition))),邓劫生译[M]清华大学山版社.20039[21]栗跃《软件开发项目管理》[M]上海交通人学出版辛f_,20058[22]于馨迪,天忠良《网络数据库》[M]清华人学出版社、北京交通人学出版扼20049[23]毛国君《高级数据库原理与技术》[M]人吣邮lU出版丰工.20047[24]车乐连资材管理系统的设计‘o实现[J]人琏理【:人学,20054[2朝黄梯矗,李军管理信息系统导硷[M】北京机械I:业“}版社,20048[26]郭跷嘴,李存斌VisualBasic高级编稗搜其项目麻川开艘[M]J匕京中国水利水电出版利,20037[27]李维面向对蒙丌发实践之路(visualbasic6.0版)(BORLAND资深顾问并名visualbasic6.0专家车维鹾新力怍)[M]电子I业出版}I-,20054[28]谭小只,刘国庆.李光明等VisualBasic60数据库编样思想与实践[M]北京:冶金【。业出版朴,2004g[29]刘瑞新等VisualBasjc程序殴计教科[M]北京:电f-』业出版社.20063 参考文献130]刘韬等VisualBasic数据库系统开发实例导航[M]北京:人【t邮电出版{{=.20046[31j赵斯思等VisualBasic数据库编科技术与实例[M]北京人K邮电山版礼.20044[32]SteveTeixelm.XavlverPacheco并.龙劲松,干瑜,谢尚ls洋visualbasic6.0开笈人员指南m]机械1.业Ⅲ版社.2003133]NationalInstituteofStandardsandTechnology(NIST)ComputerSecurityDivisionSystemsandNetworkSecurityGroup,InformationTechnologySecurityAssessmentFramework20054)6134]Roger.Jennings2006VisualBasic6.0数据库开发人员指南[M]机械I。业出版朴[30]FrancescoBalena(美)2004VisualBasic6.0编}g技术人全[M]J匕京机械1业山版社136』AbelsonM2006Datalosspreventionandusefulutilities,『J1AmJOnhodDentofacialOnhopM扎I17(3)367-369[37]ShawMHeterogeneousDesignIdiomsforSoftwareArchitectureProceedingsoftheSixthInternationalWorkshoponSoftwareSpecificationandDesign,IEEEComputerSociety,SoftwareEngineeringNotes.2003,10】59p-165pf38]术擒豹等管理信息系统通川卉啕1.具的设计与实现口]计算机l群与席川,2005年.36(5):98p—100D[39]刘源供戊链库存管理的问题10策略-J]邹州航空i:业管理学院学报.20053[40j郭智被,严洪森ERP硐lBPR在资材管理中的结合麻川[J]I。业控制汁算机,2005I[41]钱庆生,魏雪松等ERP系统中物料J4:存管理系统的实现与研究[J]制造业白动化,2003[42]陈赞成等仓库库存管理信息系统的分析‘。设计[J]全国第五膈计算机辅助生产管理学术会|义论文集,200310[43]李雁翎、陈光Access2000基础与麻Ⅲ[M]清华人学出版朴,20037[“]障兜章季1,性需求F的母有库存控制策略的研究[J]哈尔滨l牲人学学报,20044[45]张福平等基rASP的新Ⅱq库存管理系统[M]现代制造l州,20054[46]刘情,周学叫.韩安源等VisualBasic企业办公系统开发实例[M]人【t邮电“j版20035[47]恤俊电i编V1sualBasic课程设计与开发案例[M]清华人学出版;ir|-,20048[48]辔片等I:业企业库存管理信息系统的设计与实现[门华南理】:人学学报(自然科学版),2004IO[49]卢青等分布式库存管理系统及其模块的研究。_设计[J]微电子学。o计葬机,2005l[50]StephenRSchach并,哀兆山曾译软件I‘挫[M]机械J:业{n版丰十,2002[5I]RogersPressman著,黄柚素,梅宏译软们l程实践者的研究方法[M]机械1业山版社,2003[52]DouglsEComer若.徐良贤.张卢坚,兄海通等泽计算机网络与互联网lM]电fl:业出版利.2002 拌序设计代码系统登录设计代码程序设计代码PrivateSubcommandICliekOOnErrorResltmeNextDImMPasswordAsStringIfTem2Text=”Admin”AndTextlltm=”123”Then胁mainStatusBarlpanelsItem(2)Text刨当前操作员:Admln”Nanlel=Text2TextUnfoadMefmmalnShowElseAdodc】RecordSource=”select+fmmxIenlerwhereMNallle=⋯&Text2Tem&⋯“AdodclRefreshIfAdodclRecordsetRecordCoum>0ThenMPassword=AdodclRecordsetFields(”MP拈sword”、JfT蹦IJText=MPasswordThen椭mainStatusBarlPanelsItem(2)Text=”当前操作受:“+AdodclRecordsetFields(”MName”1NlimeI=Text2Tem仔mmainShowOpen(AppPath&”\系统日。占ini“)ForInputAs#lDoWhileNotEOⅣl、LineInput#lInlextTStr=TStr+Intext+Chr(13)+Chr(10、LoopClose#1TStr=TStr+”“十Namel+”’。+Format(Now,”yYYY—mm{ldhh:mm:ss”)+””+”系统登录”+Chr(13)+Chr(10)Open(AppPath&”、系统El,占ini”)ForOutputAs#jPrml#J.TSlrClose#lUnloadMeElseMsgBox“密码不止确请您确认J亓重新输入”¨_‘资材管理信息系统”TexllText=⋯’TextlSetFocusEnd】fEIseMsgBox”对不起没有此】Lj户的信息“..”资材管理信息系统”Texl2Text=’。’。’remITe”””EndIfEndlfEndSub 型堕!生丛堕——资材入库管理设计代码PrivateSubCmdAddClick()Forl=0To5Tex“mText=””NextiAdodclRecordSource=“select+fromxtwzrkglorderbyID”AdodclRefreshIfAdodclReeordsetRecordCoum>0ThenAdodclRecordsetMoveLastStrNum=Val(AdodclRccordsetFields(”lD”¨+1SelectCaseLen(Trim(StrNum))Cosel&n≈mp=”00000”C赫e2SirRmp=”0000”Cuse3SwTemp=’’000。’Case4mrTe"”00”Case5StrTemp=’⋯0C8se6女n≈mp=“”EndSelectTextl(o)Text=”J”&Trim(StrTemp)&Trim(Str(StrNum))Else丁ex⋯们Text=”J00000I”StrNum=1EndIfText2SetFocusCmdsaveEnabled=1heCmddelEnabled=FalseEndSubPrivaleSubCmddel-Ctick()IfAdodelRecordsetEOF=FalseThenc=MsgBox(”您确认要删除该记录吗?”,17.”删除提示信息”)【fc=vbOKThenAdodelRecordsetDeleteAdodclRefreshCa¨mainadoRsOpen”select4fromxt-kcxxwherekcNm⋯+Textl(1)Text+”+andkcSpec⋯十Texll(2)Text+⋯andkc—Unit=⋯+CombolText+⋯andkePrice2”&val(Textl(4)Text)&””adoCon.adOpenKeysetadLockOptimistieIfadoRsRecordCount>0nlenDimSNHmAslnkgerSNum=Val(adoRsFields(”kcNuttl”))一Val(Textl(3)Text)SeladoRs=adoConExecute(”UPDATExtkcxxs盯kc_Yum=”。+Str(SNum)+⋯wherekcName=⋯+Texl】(1).Text+⋯andkcSpec5”’十Textl(2)Text十”1andkcUnit2”。+CombolText十”。andkePrice=“&Val(TextI(4)Text)&””)Endlf 样序殴计代码adoConCloseEIemp2ICa|IioinRZForI=OTo5TextImTexl-””NextlCmddelEnabled=FalseEndlfElseMsgBox”当前数据庠中已经没有可删除的记录”.64,”提示信息”End【fCallTRefreshEndSubPrIrateSubCmdexitClick(、UnloadMeEndSubPrivateSubCmdsaveClickf)AdodclReeordSouree2”select+fromxtwzrkglwhereID2”+Trim(Str(StrNum)1十””AdodclRefresh】fAdodcIRecordsetRecordCount>0ThenMsgBox”陵信息已经存冉·.信息保存不成功“,64”保存信息提1PCal|TRefreshEIsec=MsgBox(“您确认要保存该信息吗'”,33,”保存信息提示”)lfc=vbOKThenIfTextl(1)Text=””OrTextl(3)Text=。”’OrTextl(4)Tem=””ThenMsgBox”资利数挝、单价或名称不能为空值■48”1;j:存信息提示”ElseIfNotlsNumeric(Textl(3)Text)OrNotIsNumeric(TextI(4)Text)ThenMsgBox”输入的资材数蚺或单价必须为数债刑数据“,48.”保存信息提示”ElseCallmainNumld=Val(Mid(TextI(0)Text,2,Len(Textl(O)Text)))Prices=Val(Textl(3)Text)+Val(Textl(4)Text)SetadoRs;adoConExecute(”insertiQtoxtwzrkg】(ID,w玎kglNumldwzrkgl—Name,wzTkgLoysld,wzrkglGysName.w玎kgl—Spec.wⅡkgLUnit,wzrkgl_Num,wzrkglPrice.wzrkgl—Money.wzrkgl—Date,wzrkglVaar,wzrkgl—Month,wzrkgl—People.wzrkglRemark)values(”&StrNum&”,“’&TextI(O)Text&”’,”’&Textl(1)Text&⋯。“+&Text2Text&⋯⋯&Text3TexI&1”,“’&Text】(2)Text&”’,“’&CombolText&⋯,⋯&Textl(3)Text&”’.“’&Textl(4)Texl&”+.”&Prices&”,⋯&Slr(DTPiekerlValue)&”’“’&Trim(Str(DTPickerIYear))&”’,⋯&Trlm(Str(DTPickerlMonth))&”。,”’&Namel&⋯,”。&Temlf5)Text&⋯11adorsOpen’。selecl+fromxtkcxxwherekcName=⋯1Textl(I)Text+”。andkcSpec='”+Text】(2)Text+⋯andkcUnit=“’+CombolText+⋯andkcPrice。’&Val(Text】(4)Text)&⋯’.adoCon,adOpenKeyset,adLockomImjstIclfadoRsRecordCount>0ThenDimSNumAs【ntegerSNum2Val(adoRsFields(”kc_Num“))+Val(TextI(3)Text)SetadoRs=adoConExecute(¨UPDATExtkcxxSETkcNum-”’+Slr(SNum、+⋯wherekc—Name。”+Textl(1)Text+”7andkc_spec。”+Textl(2)Text+⋯andkcUnit;⋯十Comb01Text+⋯andkcPriceo’&Val(Textl(4)Text)&””) 烈序设计代码EiseAdodcl_RecordSource=“select‘fromxtkcxxorderbykcId”AdodcIRefreshlfAdodclRecordselRecordCounl>0ThenAdodclReeordsetMoveL越tStrNum‘Val(AdodclReeordsetFields(”ke—Id”))+lSetadoRs2adoConExecute(”insertintoxt—kcxxvalues(”&StrNum&”⋯&Textl(0)Text&”’,”’&Text⋯)Text&”’”’&Texll(2)Text&”’”。&CombolText&⋯,”’&TextI(3)Text&”1,”。&Textl(4)Text&”。,⋯&Str(DTPickerlValue)&”。”)”)ElseStrNtim=ISetadoRs2adoConExecute(”insertintoxt_kCxxvalues(“&StrNum&”.”。&Textl(0)Text&”’”’&Textl(1)Text&⋯⋯&Textl(2)Text&⋯”。&CombolText&”。.⋯&TextIc3)Text&”‘,”。&Textl(4)Text&⋯,”。&Str(DTPickerlValue)&⋯,”)”)EndffEndIrMsgBox”信息保存成功”.“,”保存信息提示”CmdsaveEnabled=FaIseCa】|TRefreshadoConCloseEndIfEnd【fElseEndlfEndIfCa|lTRefreshEndSubPrivateSubCombolKoyDown(KeycodeAsInteger.ShiftAsInteger)【fKeyCode=13ThenTcxtl(3).SetFocusEndlfEndSubPrivateSubDataGridlC1ick(1Ca|IJionBackCmddelEnabled=THeCmdsaveEnabled=False【fAdodelRecordsetRecordCount)OThenTemps2AdodclRecordsetFields(“wzrkglNiim”)EndIfEndSubPrivateSubDTPickerl—KeyDown(KeycodeAsInteger.ShiftAsInteger)IfKeyCode;13ThenTextlf5).getFocusEndIfEndSubPrivateSubText2KeyDown(KeycodeAsInteger.shlnASInteger)lfKeyCode=l3Then№一TgysxxShow№一TgYsxxLefi=3800m—FgysxxTop=2300mTgysxxDataGridlSeffocus 稗序设计代码End【fEndSubPrivateSubJionBack()DlmSLenAsIntegerlfAdodclRecordsetReco—Counl)OThenStrNum=Val(Adodc】RecordselFields(”wzrkgl—Numld”)SLen=Len(Trim(StrNum))SelectCaseSLenC鼬elStrTemp=’’00000’’Case2RrTelrip=”O000”Case3StrTemp=”OOO”Case4StrTemp=’’00”Case5StrTemp=”0”Case6StrTenap=””EndSelectOnErrorResumeNexiTextl(O)nm;Adod01Recordse(1)Textl(¨Text=Adod01Recordset(2)Texl2Text=AdodclRecordset(3)Texl3Texl=AdodolReco—set(4、Textlf2、Text=AdodclRecordset(5)Comb01Text=AdodclRecordset(61Te州(引Text=AdodclReco坩set(7)Textl(4)Text=AdodclRecordset(8)DTPickerl、hlue-AdodcIRecordselfl01Textl(5)Text=AdodclRecordsel(”wzrkglRemark“)EndIfEndSub资材入库查询设计代码PrivateSubForm—Load()AdodclConnectIonStrlng=”Provider=MicrosoftJetOLEDB4O;DataSouse=”&AppPath&”、db-wzglmdb;PersistSecurityInfo。False”Adod01RecOⅢSo㈣=”select+fromxtwzrkgl”EndSubPrivateSubTexll_change()onErrorResumeNextAdodclRecordSource=”select+fromxtwzrk】wherewzrkgLNamelike’%”+TextIText+“%”。AdodclRe『|reshEndSubPrivateSubForm—Unload(Ca】1celAsInteger)№mainEnabled=1rue 拌序设计代码EndSub数据清理设计代码PrivateSubCommandlCIickOCommandlEnabfed=FalseDimr5lAsADODBRecordselSetnI=NewADODBRecordsetDimcnnlAsADODBConnectionSetcnnl=NewADoDBConnectioncnnlOpen”Provider-MicrosoftJetOLEDB40;DataSource=”&AppPath&”Ⅵbwzglmdb:PersistSecurityInfo=False”DimeonnterAsIntegerDimsql、~orkarca(200)AsStringProgressBarlVisible=TrueProgressB盯lMax=UBound(workarea)ProgressBarlValue2ProgressBarlMinForconnter=LBound(workarea)ToUBound(work盯ea)workare“coNnterl=”i1itialvalue”&coBnterProgrcssB盯IValue。eonnterlfCbeckIVa】lie=1Thensa|=”deletextwzrkglfromxtwzrkgl”SetBl=cnnIExecute(sql)End【r【fCheck2Value=】Fhensql=’’deletemwzckglfromxt_wzckgl。1SetrsI=ennIExecute(sqI)EndIfIfCheck3Value=IThensqI=”deletextkcxxfromxtkcxx”Set6I=cnnIExecute(sqllEnd【f【fCheck4Value=lThensq】=”deletextenternomxtenter“SetrsI=CllnIExecute(sql)EndIf】fCheck5Value=IThensql=”deletextwzjcglfromxLwzjcgll’Setrsl=cnnjExecute(sqllEndlf【fCheck6Value_IThensqI=”deletem—wzghglfromxt_wzghgl”SetrsI=c⋯IExecute(sqllEndlf】fCheck7Value=IThensql=。1deletextwzpdglfromxtwzpdgl‘。SetrsI=cnnlExecute(sqllEndIf【rCbeck8Valuc:IThen 利序殴计代码sql2”delelexl』ysxxfromxⅧ$xx“Setn1=cnnlExecme(sql)EndIfNextconrlterProgressBarlValue2ProgressBarIMincnnlCloseChecklValue=0Check2Value=0Check3Value=0Check4Value=0Cbeck5Value=0Cbeck6、mlue=0Cheek7Value=0Check8Value=0MsgBox”仞甜、{七成功完成f”__48,“初始化信息提示”Command】Enabled=TrueEndSub密码修改设计代码PrivateSubCommandlC1lok(1Callmain【fTe川Texl=””0r"rext2Texl=””0rText3TexII””0rText5Texl=””ThenMsgBox”输入不能山空⋯,48,”提示信息”ElseAdodclRecomSource=”select+fmmxtenterwhereMPassword=”’&Yextl丁em&⋯andMNamc=⋯+Text5Tem十””’Adode】Refresb】fAdodclRecordsetRecordCouNt>0ThenIfYexn丁extoTexl3TextThenMsgBox”两次输入的密码不-致,请您确认厉重新输入”,48,”提示信息”Text2Texl_””Tcxt3Texl=⋯‘Texl2SetFocusElsesnadoRs=adoCollExecute(”UPDATExIen[erSETMPassword=”。+Text3Text+⋯whereMN肝”’+Text5Texl+⋯”)AdodclRefreshMsgBox”密码修故成功,请您记住新密码”,,”信息提示”UnloadMeEndIrElseMsgBox“没有此J{J户的信息,请您确认后重新输入”,48,”信息提示”TcxtlText;⋯’Texn丁em=””Text3Text=⋯Text5Texl=””Text5SetFocusEndIfEndIr 科序没计代研adoConCloseEndSubPrivateSubCommand2C¨ck(1UnloadMeEndSubPrivateSubFomlLoad()AdodclConnectIonRrlng=”Provider-MierosoftJetOLEDB40;DataSouse2”&AppPath&”、db—wzglmdb;PerslstSecurityInfo。False”AdodcIRecordSource=”select+fromxtenter¨AdodclRefreshEndSub用户注册设计代码PrivateSubCommandlC1ich(1】fTex¨Texl=“”Ornxl2Tem=⋯’OrText3Texl_””ThenMsgBox“输入的川户注册信息≈:完仝!⋯,”提示信息”ElseAdodclRecordSource=”selecl+fromxtenlerwhereMN矾e_⋯+Tex¨+⋯“。AdodclRefreshIfAdodclRecordsetRecordCount>0ThenMsgBox”该川户寰已经存在,诗您更换其他HJ户名⋯,48”提示信息“1htlText=⋯’Text2Text=’’。‘TexoText=⋯。Text4Text=⋯‘TemlSetFocusElse】fTex口Text=TexHnmThellAdodclRecordSource=”selecl+fromxtenterorderbyMld”Adodcl_RefreshIfAdodclRecordsetRecordCount>0ThenAdodclRecordsdMoveLastTem5Text-Val(AdodelRecordsetFields(”M—Id”))+1ElseText5Text=lEndlfCallmainSetadors=adoConExecut“”insertillloxtelllervalues(”&Text5&”⋯&Textl&“‘”’&Text2&”:”+&Texl3&”i。Oi’0’。’0:’O:r0:’O__。O_.。0。.’0:’0:。O’,。O’,’0’’0。,’0’.∞’.。0:。0:’O’’O。’0’)“)MsgBox”注册成功!!__'48,”H{户注册信息提示”adoCo/1CloseTextlText=””TexnText=“”"rext3Text=。”‘Text4Text=⋯’UnloadMeElseMsgBox”历次输入的密码不致,请您确认j亓巫新输入”,48,”川户注册信息提示” 科序设计代码Tem3Tem=”“Text4Text=。⋯Text3SetFoeusEnd【fEndlrEndSubPrivateSubCommand2C】ick()lfComb01Text=Name】ThenMsgBox”小能删昧当前川户名”.48,”提示信息”Elsea=MsgBox(”您确认要删除该川户吗?”,17,“删除川户信息提示”1Ifa=vbOKThenAdodclRecordSouse=”select+fromxtartierwhereMNamed”+Combo】Ten+””’Adodc{Re什cshlfAdodclRecordsetRecordCount>0ThenAdodclRecordsetDcleteMsgBox”川户信息删除成功”,64.”删除川户信息提示”UnloadMeElseMsgBox”当前数据席中没有可删除的H{户信息”,,叫言息提不”EndIfEndJfEndlrEndSubPrivateSubCommand3cIiek(1UnloadMeEndSubIfomionIValue=lThenFrame2Visible=TreeFrameIVisible=FalseCommandlVisible=TrueCommand2Visible=FalseElseIfOption2Value=IThenFramelVislble=TrueFrame2Visible=FalseCommand2visible=TrueCommandlVisible=FalseElseEnd【fEndSubPrivateSubFormLoad()AdodclConnectionSmng=”Provider-MicrosoftJHOLEDB40;DataSource=¨&AppPath&”Ⅵbwzglmdb;PersistSecurityInfo-False”Optionl.Value=TrueAdodclRecordSource=”select+fromxtenterorderbyMld”AdodclRefrcshIfAdodclRecordsetRecordCount>0ThenDoWh{IeAdodclRecordsetEOF;FalseComb01Add[tern(AdodclRecordsetFields(”MNalrte”11 榉序设i-t代码AdodcIRecordsetMoveNexlLoopEndIfEndSub操作员权限设置代码PrivateSubCmdsqClick(1CaI|mainAdodclRecordSource=”select+fromxtenter”AdodclRefreshIfAdodclReeordsetRecordCoHnl>0Thenc=MsgBox(-.确认要将所选权限的信息赋给该操作员l屿,”,33.”提示信息”)Ifc=vbOKThenSetadoRs=adoconExecute(”uPDATExt_enlerSET【112⋯十S}r(CbeckJValue)+”:[2]=⋯+Str(Cheek2Value)+⋯,[312”’+Sir(Cheek3Value)+“’.f4]2⋯+StKCbeck4Value)+”._[51=。”&一St“Check5Value)+“1.161=⋯十Str(Check6Value)+”1.【7】2”’十St“Check7Value)+⋯.【81=⋯+Str(Check8Value)+⋯,【9】=”。+Str(Check9Value)十⋯.【10】_”’+Str(Checkl0Value)十”’『1I】I”’&Str(CheckllValue)+”’,f】2]竺“’十StffCheekl2Value)+”’.【l3】_11’+Str(Checkl3Value)十”’,『14卜”。十Str(Chechl4Value)+”’,【15】5“++Str(Checkl5Value)+”+.【16】_”’+S”(Checkl6Value)+⋯,[17】-⋯&一Str(Checkl7Value)+”1_[18】_”’+St“Checkl8Value)+”’,【191_”’+Str(Checkl9Value)+⋯[201=⋯+Str(Check20Value)+⋯,【21]=“’+Str(Cheek21Value)十”+whereMN衅”’+ListView】Selecledltem+”⋯1MsgBox”成功授权叭48”信息提Ⅺi”CmdsqEnabled=FaIseElseEndIfadoConCloseEndSubPrivateSubFormLoad()AdodclConnecIlonStri"“Provider-MicrosoftJetOLEDB4O;DataSource=”&AppPath&“\dbwzglmdb:PersistSecurityInfo-Fatse。’AdodclRecordSource=”select+fromxtenter”a=TextlTextAdodclRecordSource=”select’fromxtenter”AdodclRefreshlfAdodclRecordsetRecordCount>0ThenListViewlEnabled;meListVJewlListltemsCIearAdodclRecordsetMoveFirstDoWh{leAdodclRecordsetEOF;Falsekey=TexllTcxtSetltmX=ListVIew】ListItemsAdd(..key.1)AdodclRecordselMoveNextLoopOnErmrResumeNext F{序设计代码AdodcIRecordSource=”select+fromⅪenterwhereMN哪e_“1+ListVJewlSelectedltem+AdodelRefreshJfAdodcfRecotdse(RecordCount>0Th酣CbecklValue=AdodelReeordsetFields(”l”1check2Value=AdodelReeordsetFields(⋯2‘1Check3Value=Adodc】RecordsetFields(⋯3’、Check4Value_AdodclRecordsetFieldsf”4”1Check5Value=AdodcIRecordsetFieId““5”ICheck6ValHe=AdodelRecordsnFields(⋯6。1Check7Value=AdodelRecordsetFields(”7”1Check8Value=Adodc】RecordselFields(⋯8‘、Check9Va】tie=AdodclRecordsetFields(⋯9’、Checkl0Value=AdodcIRecordsetFields(”10”)Cbeck】1、,altie=AdodclRecordsetFields(”11”1Cbeckl2Val—AdodcIRecord$eiFieldsPl2”、Cbeck似valHe=AdodclRecordsetFields(”⋯1Checkl4Value=AdodclRecordsetFields(”14”1Checkl5Value=Adodcl_RecordsetFields(”14“1Checkl6Value=Adodcl_RecordsetFieldsf”16”、Checkl7Value=AdodcIRecordselFields【¨17”1Checkl8Value=AdodclRecordsetFields(”18”1Checkl9Value=AdodclRecordsetFields(”19“1Check20Value=AdodclRecordsetFields(”20”1Check21Value=AdodclRecordsetFields(”2l”1ElseEnd】fElseListViewlEnabled=FaiseEnd【fEndSub查看El志设计代码PrivateSubFonnLoad()D而lnlextAsStrlngRichTextBoxlLeft=0RichTextBoxITop=0Open(AppPath&”、系统日忠ini”1ForInputAs#lDoWhlleNotEOFfI、LineInput#I【ntextRichTextBoxlText=RiehTextBoxJText+Jntext+Chs(13)4-Chs(J0’LoopC}ose#IEndSubPrivateSubFormUnload(CanceIAsInteger)枷mainEnabled=TrueEndSub
此文档下载收益归作者所有