阳泉水泵厂的固定资产设备管理系统的设计与实现毕业论文模板.doc

计算机系本科毕业（设计）论文课题名称阳 泉 水 泵 厂 固 定资 产 设 备 管 理 系 统 设 计 和 实 现专 业计 算 机 科 学 和 技 术姓 名学 号指导老师二零壹零年六月目录1 引 言11.1 课题起源及意义11.2 本人关键工作11.3 论文组织和结构22 需求分析32.1 用户功效需求32.2 技术可行性分析32.3 数据流图33 概要设计53.1 功效模块图53.2处理步骤设计63.3数据库设计83.4 系统开发环境134 具体设计144.1 借入归还管理模块设计144.2 移动管理模块设计144.3 维修管理模块设计144.4 折旧管理模块设计154.5用户管理模块设计155 系统实现165.1公共模块165.2借出归还模块实现165.3移动模块实现175.4维修模块实现185.5折旧模块实现196系统测试216.1 测试方法216.2 测试内容216.3 测试结果217 结束语22致 谢23参考文件24阳泉水泵厂固定资产及设备管理系统设计和实现摘 要：本课题开发设备管理系统利用Visual Basic 6.0平台，结合SQL Server 数据库。经过整合设备管理知识，用以实现资产设备借入借出、移动、折旧、维修等一系列功效。叙述了该系统设计思想和系统功效需求、数据库设计和系统各功效模块设计等。对各功效模块中关键技术实现进行介绍，如ADO控件技术、关键模块功效实现算法。关键词： Visual Basic 6.0 SQL Server 资产设备Abstract：Development of equipment management system issues using Visual Basic 6.0 platform, combined with SQL Server database. Integrated device management expertise to achieve equity borrowing and lending of equipment, mobile, depreciation, maintenance and a series of functions. Elaborate design of the system and the main functions of the system requirements, database design and system design of each functional module. Of each function module introduces the main technical implementation, such as ADO control technology, mainly for realization of algorithms.Key Words: Visual Basic 6.0 SQL Server equipment management 1 引 言1.1 课题起源及意义固定资产代表着一个企业在市场竞争中实力。早期管理固定资产方法全部是手工记帐形式，既费时又费力，这种管理模式已不能适应竞争日趋猛烈国际化竞争环境。本系统是管理企机关固定资产和设备信息化管理软件，使用本系统能够帮助企机关处理单位内部固定资产多种管理问题，而且愈加方便企业领导集团具体了解自己企业内部固定资产变动情况。1.2 本人关键工作学习Visual Basic6.0软件应用，为深入开发系统打好基础。经过分析研究任务书要求，和实地调研，对系统进行深入需求分析，设计资产设备管理系统关键功效，把其分为了七大模块：借入归还管理模块、移动管理模块、维修管理模块、折旧管理模块、用户管理模块、系统管理模块和信息管理模块。其中借入归还管理模块包含借入归还设备信息查询和登记等；移动管理模块和维修管理模块分别对资产设备移动和维修情况信息查询、登记及打印等；折旧管理模块包含对资产设备折旧信息查询、登记、打印等。用户管理模块包含用户增加、删除及用户本身密码修改；系统管理模块包含系统初始化、数据清理、自定义项设置等。在以上工作基础上，对系统进行具体设计和实现系统全部功效，最终进入论文撰写阶段，完成系统设计和论文撰写工作。1.3 论文组织和结构第一章：引言。介绍资产设备管理系统开发背景和现实状况，和本人研究工作；第二章：需求分析。分别对需求和可行性进行了分析；第三章：概要设计。介绍资产设备管理系统需要实现功效模块和开发环境和数据库设计；第四章：具体设计。对系统功效进行了具体介绍；第五章：系统实现。对系统各个功效实现进行说明介绍；第六章：系统测试。对系统各个功效部分进行了测试。2 需求分析需求分析是介于系统分析和软件设计阶段之间关键桥梁。首先，需求分析以系统规格说明和项目计划作为分析活动基础出发点，并从软件角度对它们进行检验和调整；其次，需求规格说明又是软件设计、实现测试直至维护关键基础。良好分析活动有利于避免或尽早发觉早期错误，从而提升软件生产率，降低开发成本，改善软件质量。2.1 用户功效需求1、固定资产及设备借出归还管理：管理固定资产及设备借出、归还情况具体信息；2、固定资产及设备移动管理：企业内部固定资产及设备可能发生移动情况，比如，财务科电脑移到人事科。这种资产设备变动情况就需要在企业单位内部管理中做一笔资产变动情况具体统计，这能够经过固定资产及设备移动管理模块来实现；3、固定资产及设备维修管理：对固定资产设备维修情况做具体统计；4、固定资产设备折旧管理：依据多种折旧算法，管理企业内部固定资产及设备折旧情况；5、固定资产设备信息管理：对企业拥有固定资产设备具体统计。2.2 技术可行性分析开发一个中小型固定资产及设备管理系统，包含到技术问题不会太多，关键用到技术就是数据库和一门可视化开发编程语言。在这方面，数据库关键是用来存放数据，就现在主流数据库来看，能够考虑采取Microsoft SQL Server或Oracle。Oracle是一个安全、可靠而且支持面向对象设计数据库系统，同时Oracle又有海量存放特点。然而，相对于Microsoft SQL Server而言，Oracle易用性和可维护性相对差一点，而且Oracle成本相对较高，不适合于中小企业使用。所以，我们选择了现在比较流行Microsoft SQL Server数据库系统；在前台开发编程方面，本系统采取Microsoft企业Visual Basic 6.0作为关键开发工具。2.3 数据流图在设计系统过程中，用数据流图来刻画数据流和转换信息。它用简单图形记号分别表示数据流、转换、数据源和外部实体，数据流图是软件系统中各个处理子功效和它们之间数据流动图形表示。经过对系统分析初步得到系统顶级DFD，图2.1所表示。用户名+密码查对信息固定资产设备管理系统管理员查对正确管理员图2.1 顶级数据流图用户名+密码查对信息查对正确系统管理核对管理员管理员 图2.2 第一层数据流图系统管理选择功效模块借出归还管理操作移动管理操作折旧管理操作维修信息管理操作借入归还表息表移动信息表维修信息表折旧信息表 图2.3 第二层数据流图3 概要设计3.1 功效模块图系统功效模块图3.1所表示。固定资产及设备管理系统资产借出归还管理资产移动管理资产维修管理资产折旧管理用户信息管理资产设备信息管理系统管理辅助功效报表信息管理 图3.1 固定资产及设备管理系统功效模块图经过对水泵厂需求分析，针对水泵厂现在设备管理现实状况和对系统总体分析，能够粗略地抽象出管理系统功效模块，图3.1所表示。模块关键功效设计以下：1、借出归还管理模块： 用于录入企业借入及归还情况，查询固定资产设备设备借入和归还历史。2、移动管理模块：在移动管理模块中，用于录入企业固定资产设备移动情况，查询资产设备移动历史及部门维护。3、维修管理模块：在维修管理模块中，用于企业固定资产设备维修情况登记、浏览、打印及企业资产设备维修情况历史查询。 4、折旧管理模块：对企业固定资产设备折旧信息历史查询及依据不一样折旧算法进行登记、打印折旧信息。 5、报表管理模块：对借出归还、移动、折旧、维修情况进行报表打印。 6、用户信息管理模块：关键是对操作该系统使用者进行管理，即用户管理。包含用户增加和删除、用户本身密码修改。 7、系统管理模块：包含系统初始化、数据清理、自定义项设置。8、辅助管理模块：针对模块中需要进行资产折旧、净值等计算设计了计算器。9、固定资产设备信息管理模块：包含录入、删除、修改、打印、查询企业固定资产设备信息。3.2处理步骤设计3.2.1 系统操作步骤 系统操作步骤图3.2所表示。移动管理维修管理借出归还管理信息管理折旧管理系统登录界面登 录打 印 移 动 信 息 单打 印 维 修 状 况打 印 折 旧 状 况 表打 印 资 产 信 息 表处理结束YN图3.2系统操作步骤3.2.2数据增加步骤添加信息时，编号字段由系统自动生成，且不能修改，其它信息由用户输入，以后对数据进行正当判定，正当则写入保留至数据库，不正当则重新输入数据。数据增加步骤图图3.3所表示。否是自动生成编号是否正当写入数据库结束开始输入数据图3.3 数据增加步骤图3.2.3 数据修改步骤在修改信息时，先选中一条待修改统计，然后直接输入数据，判定正当性，正当则保留至数据库，不正当重新输入。数据修改步骤图图3.4所表示。否是选择需要修改统计输入数据是否正当写入数据库结束开始图3.4 数据修改步骤图3.2.4 数据删除步骤当用户选定一条统计时，单击删除按钮，会提醒用户是否确定删除，假如确定删除，然后删除数据库相关内容。数据删除步骤图图3.5所表示。是选择需要删除统计是否删除否开始更新数据库结束图3.5 数据删除步骤图3.3数据库设计3.3.1数据库SQL Server介绍 系统采取SQL Server 数据库，SQL Server是由Microsoft开发和推广关系数据库管理系统（DBMS）,它最初是由Microsoft、Sybase和Ashton-Tate三家企业共同开发，并于1988年推出了第一个OS/2版本。 SQL Server多年来不停更新版本,SQL Server 是Microsoft企业于推出最新版本。 SQL Server 特点：1用户机/服务器体系结构。 2图形化用户界面，使系统管理和数据库管理愈加直观、简单。 3丰富编程接口工具，为用户进行程序设计提供了更大选择余地。 4SQL Server和Windows NT完全集成，利用了NT很多功效。SQL Server也能够很好地和Microsoft BackOffice产品集成。 5含有很好伸缩性，可跨越多个平台使用。 6对Web技术支持，使用户能够很轻易地将数据库中数据公布到Web页面上。 7SQL Server提供数据仓库功效，这个功效只在Oracle和其它更昂贵DBMS中才有。3.3.2 ADO技术概述ADO Data 数据控件是ActiveX外部控件，它用途和外形全部和Data控件相同，也含有【向前】和【向后】按钮和一个易于使用界面， ADO Data数据控件是经过Microsoft Activiex数据对象（ADO）来快速建立数据源连接数据绑定控件，应用程序经过 ADO Data控件和数据提供者连接，数据提供者能够是任何符合OLEDB规范数据源。ADO Data数据控件经过属性实现了对数据源连接，创建连接表时，能够采取以下连接方法之一：一个字符串，一个OLEDB文件或一个ODBC数据源名称（DSN）。当使用DSN时无需更改控件任何其它属性。ADO Data控件功效：连接一个当地数据库或远程数据库；打开一个指定数据库表或定义一个基于结构化查询语言（SQL）查询、存放过程或该数据库中表视图统计集合；将数据字段数值传输给数据绑定控件，并在这些控件中显示或更改这些数据字段数值；添加新统计，或依据显示在数据绑定控件中数据更改来更新一个数据库。3.3.3数据库概念设计固定资产及设备管理系统E-R图图3.6所表示。 1n11资产设备编号维修日期资产设备名称维修费用配件名称维修情况故障原因数量参考移动信息资产设备编号资产设备名称配置移出部门移入部门移动时间数量型号维护信息 参考折旧信息资产设备名称资产设备编号净残值折旧方法净值估计使用年限折旧额折旧率归还数量借用人人归还日期借出数量借出部门部门部门借入归还资产设备信息1参考参考生产厂家数量1nn用户管理用户名密码备注净值型号单价金额资产设备编号具体配置配置估计使用年限1n 图3.6 固定资产及设备管理系统E-R图 3.3.4数据库逻辑设计本系统数据库关键有4张数据表组成，分别是固定资产借出归还数据表Table_INOUT、 固定资产移动数据表Table_ZCYD、固定资产维修数据表Table_ZCWX和固定资产折旧信息表Table_ZCZJ。下面分别介绍一下这几张数据表逻辑结构设计。如表3.1、3.2、3.3、3.4所表示。表3.1借出归还数据表（Table_INOUT）字段名称字段类型字段大小主键是否为空资产设备编号Char10否是资产名称Char30否是型号Char10否是配置Char10否是借出数量Char10否是借出部门Char50否是借用人Char50否是借出日期Char30否是归还日期Varchar50否是归还数量Char10否是未还数量Char10否是 表3.2 固定资产移动数据表（Table_ZCYD）字段名称字段类型字段大小主键是否为空资产设备编号Char18否是资产设备名称Char10否是型号Char10否是配置Char10否是数量Char8否是移动时间Datatime8否是移出部门Char50否是移入部门Char50否是表3.3 固定资产维修数据表（Table_ZCWX）字段名称字段类型字段大小主键是否为空资产设备编号Char18否是资产设备名称Varchar50否是型号Varchar50否是配置Varchar50否是数量Float8否是送修日期Datetime8否是故障原因Varchar60否是维修日期Datetime8否是维修情况nchar30否是配件名称Varchar50否是维修费用Float8否是表3.4固定资产折旧信息表（Table_ZCZJ）字段名称字段类型字段大小主键是否为空资产设备编号Decimal9否是资产设备名称Char30否是型号Char10否是数量Char30否是配置Char10否是折旧方法Char20否是资产原值Char10否是折旧年限Char10否是折旧率Char10否是折旧额Char10否是选择Char10否是3.4 系统开发环境硬件环境：处理器 Intel Core Duo T5800，主频2.0G；内存2G；显存256M；硬盘250G；网卡10M/100M自适应以太网卡。软件环境： Windows Vista Home Basic操作系统；SQL Server数据库软件；Visual Basic6.0程序设计语言。4 具体设计4.1 借入归还管理模块设计借入归还管理用于管理企业借入归还情况，关键由三个功效模块组成，其各个模块实现功效以下：1、借出登记：实现资产设备借出登记情况。输入对应资产设备编号即可进行登记。2、归还登记：实现资产设备归还情况。输入对应资产设备编号即可进行登记。3、历史查询： 能够让用户根据任何条件查询，如资产设备名称、资产设备编号、型号、归还数量等。图4.1所表示是资产设备借出归还管理开发步骤图。固定资产Private Sub Command9_Click() 资产移动信息保留 Set adoCon = New ADODB.Connection adoCon.Open Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=Data_MRSOFT;Data Source=MRVBCall mainDim aa As IntegerIf Combo4.Text = ThenMsgBox 请输入移出部门, , 提醒ElseIf Text6.Text = ThenMsgBox 请输入移入部门, , 提醒ElseIf Text15.Text = ThenMsgBox 请输入移动数量, , 提醒Else If Val(Trim(Text15.Text) Val(Trim(Text7.Text) Then MsgBox 固定资产移动数量不能大于实际固定资产总数,请您重新输入, 32, 通用固定资产设备管理系统 Text15.Text = Text15.SetFocus Else Set adoRs = adoCon.Execute(insert into Table_ZCYD values( & Text2 & , & Text3 & , & Text4 & , & Text5 & , & Text15 & , & DTPicker1 & , & Text6 & , & Combo4 & ) Text7.Text = Val(Text7.Text) - Val(Text15.Text) Set adoRs = adoCon.Execute(UPDATE Table_ZCXX SET 数量= + Text7.Text + where 资产设备编号= + Text2.Text + ) aa = Val(Adodc2.Recordset.Fields(数量) - Val(Text15.Text) Set adoRs = adoCon.Execute(UPDATE Table_ZCXX SET 移动数量= + Text15.Text + ,数量= + Str(aa) + where 资产设备编号= + Text2.Text + ) MsgBox 数据保留成功!, , 提醒 Adodc1.Refresh Combo4.Text = Text6.Text = End IfEnd IfadoCon.CloseEnd Sub借出登记归还登记打印凭证单图4.1 资产设备借入归还管理开发步骤图4.2 移动管理模块设计资产移动打印凭证单固定资产Private Sub Command9_Click() 资产移动信息保留 Set adoCon = New ADODB.Connection adoCon.Open Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=Data_MRSOFT;Data Source=MRVBCall mainDim aa As IntegerIf Combo4.Text = ThenMsgBox 请输入移出部门, , 提醒ElseIf Text6.Text = ThenMsgBox 请输入移入部门, , 提醒ElseIf Text15.Text = ThenMsgBox 请输入移动数量, , 提醒Else If Val(Trim(Text15.Text) Val(Trim(Text7.Text) Then MsgBox 固定资产移动数量不能大于实际固定资产总数,请您重新输入, 32, 通用固定资产设备管理系统 Text15.Text = Text15.SetFocus Else Set adoRs = adoCon.Execute(insert into Table_ZCYD values( & Text2 & , & Text3 & , & Text4 & , & Text5 & , & Text15 & , & DTPicker1 & , & Text6 & , & Combo4 & ) Text7.Text = Val(Text7.Text) - Val(Text15.Text) Set adoRs = adoCon.Execute(UPDATE Table_ZCXX SET 数量= + Text7.Text + where 资产设备编号= + Text2.Text + ) aa = Val(Adodc2.Recordset.Fields(数量) - Val(Text15.Text) Set adoRs = adoCon.Execute(UPDATE Table_ZCXX SET 移动数量= + Text15.Text + ,数量= + Str(aa) + where 资产设备编号= + Text2.Text + ) MsgBox 数据保留成功!, , 提醒 Adodc1.Refresh Combo4.Text = Text6.Text = End IfEnd IfadoCon.CloseEnd Sub因为移动管理模块和借入归还管理模块类似，所以这里只关键说一下部门维护窗体，含有增加部门和删除部门功效。图4.2所表示是资产设备借出归还管理开发步骤图。图4.2 资产设备移动管理开发步骤图4.3 维修管理模块设计 维修管理模块用于管理固定资产设备维修情况，用户能够对固定资产设备维修情况进行登记、查询，同时也能够打印维修情况报表。使用户能够立即、直观了解到维修情况。图4.3所表示是资产设备维修管理开发步骤图。资产维修打印凭证单固定资产Private Sub Command9_Click() 资产移动信息保留 Set adoCon = New ADODB.Connection adoCon.Open Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=Data_MRSOFT;Data Source=MRVBCall mainDim aa As IntegerIf Combo4.Text = ThenMsgBox 请输入移出部门, , 提醒ElseIf Text6.Text = ThenMsgBox 请输入移入部门, , 提醒ElseIf Text15.Text = ThenMsgBox 请输入移动数量, , 提醒Else If Val(Trim(Text15.Text) Val(Trim(Text7.Text) Then MsgBox 固定资产移动数量不能大于实际固定资产总数,请您重新输入, 32, 通用固定资产设备管理系统 Text15.Text = Text15.SetFocus Else Set adoRs = adoCon.Execute(insert into Table_ZCYD values( & Text2 & , & Text3 & , & Text4 & , & Text5 & , & Text15 & , & DTPicker1 & , & Text6 & , & Combo4 & ) Text7.Text = Val(Text7.Text) - Val(Text15.Text) Set adoRs = adoCon.Execute(UPDATE Table_ZCXX SET 数量= + Text7.Text + where 资产设备编号= + Text2.Text + ) aa = Val(Adodc2.Recordset.Fields(数量) - Val(Text15.Text) Set adoRs = adoCon.Execute(UPDATE Table_ZCXX SET 移动数量= + Text15.Text + ,数量= + Str(aa) + where 资产设备编号= + Text2.Text + ) MsgBox 数据保留成功!, , 提醒 Adodc1.Refresh Combo4.Text = Text6.Text = End IfEnd IfadoCon.CloseEnd Sub 图4.3 资产设备维修管理开发步骤图4.4 折旧管理模块设计折旧管理模块用于对水泵厂固定资产设备进行管理，它包含功效有查询、登记、打印。用户能够依据3种不一样折旧方法，计算固定资产设备折旧额。图4.4所表示是资产设备维修管理开发步骤图。打印凭证单资产维修固定资产Private Sub Command9_Click() 资产移动信息保留 Set adoCon = New ADODB.Connection adoCon.Open Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=Data_MRSOFT;Data Source=MRVBCall mainDim aa As IntegerIf Combo4.Text = ThenMsgBox 请输入移出部门, , 提醒ElseIf Text6.Text = ThenMsgBox 请输入移入部门, , 提醒ElseIf Text15.Text = ThenMsgBox 请输入移动数量, , 提醒Else If Val(Trim(Text15.Text) Val(Trim(Text7.Text) Then MsgBox 固定资产移动数量不能大于实际固定资产总数,请您重新输入, 32, 通用固定资产设备管理系统 Text15.Text = Text15.SetFocus Else Set adoRs = adoCon.Execute(insert into Table_ZCYD values( & Text2 & , & Text3 & , & Text4 & , & Text5 & , & Text15 & , & DTPicker1 & , & Text6 & , & Combo4 & ) Text7.Text = Val(Text7.Text) - Val(Text15.Text) Set adoRs = adoCon.Execute(UPDATE Table_ZCXX SET 数量= + Text7.Text + where 资产设备编号= + Text2.Text + ) aa = Val(Adodc2.Recordset.Fields(数量) - Val(Text15.Text) Set adoRs = adoCon.Execute(UPDATE Table_ZCXX SET 移动数量= + Text15.Text + ,数量= + Str(aa) + where 资产设备编号= + Text2.Text + ) MsgBox 数据保留成功!, , 提醒 Adodc1.Refresh Combo4.Text = Text6.Text = End IfEnd IfadoCon.CloseEnd Sub图4.4 资产设备折旧管理开发步骤图4.5用户管理模块设计用户管理模块是每个系统全部应该含有，关键是对操作该系统使用者进行管理，即用户管理。包含用户增加和删除、用户本身密码修改。图4.8为用户管理模块功效图。系统管理模块用 户 增 加用 户 删 除用户密码修改图4.8 用户管理模块功效图5 系统实现5.1公共模块在开发软件时，为了提升程序代码重用，能够将多个程序窗体共用代码放在数据模块中。这么不仅能够提升代码实施效率，也使代码愈加简练，更轻易维护。在本系统中，将数据连接代码放在数据模块中，全部窗体全部能够使用数据模块中数据连接。该数据模块代码以下：Public adoCon As New ADODB.ConnectionPublic adoRs As New ADODB.RecordsetPublic Sub main()Set adoCon = New ADODB.ConnectionadoCon.Open Provider=MSDASQL.1;Persist Security Info=False;User ID=sa;Data Source=MRSOFTEnd Sub5.2借出归还模块实现 借出归还模块能够登记资产设备借出信息和归还信息，而且能够查询和打印已存在资产设备借出和归还信息。借入归还窗体图5.1所表示：