基于VB的办公事务管理系统的设计.docx

1、基于VB的办公事务管理系统的设计分类号 _密 级 _2008届本科毕业生毕业论文 题目： 基于VB的办公事务管理系统 作者姓名 郑 晓 龙 指导教师 余 鋆 学科专业 计算机科学与技术 系 别 计算机与信息科学学院 学 号 1 基于VB的办公事务管理系统的设计郑晓龙 梁春燕 杨建昌 （计算机与信息科学学院 2004级本科一班 甘肃庆阳 745000）摘 要：在世界经济形势、管理思想和经济技术都在不断发展的形势下，各种先进的管理思想与管理手段竞相争辉，各种信息化管理软件百家争鸣。办公事务管理系统作为一个可视化管理软件，在处理局部或一些小型公司的办公事务管理作业中具有方便、灵活、实用、易操作等特点

2、，能够赢得市场的青睐。办公事务管理系统的设计采用VisualBasic软件作为系统的界面、功能开发工具，数据库部分采用Microsoft公司的Access2000数据库进行开发。该管理系统的完成能够基本实现办公事务管理的规范化、自动化。办公事务系统根据公司内部的每天都必须管理的各个事务进行了详细的管理，其中包括：文件管理、财产管理、会议管理、值班管理、事故管理、提案管理、车辆管理等。关键词：Visual Basic；数据库；程序；办公事务管理中图分类号：TP311.00 1 可行性研究几乎每个大、中型的公司都有财产、文件、值班、事故、公用财产使用等方面的问题，就其中一个方面举例来说，如车辆管理

3、，如果每个公司都用手工给每个人员记录车辆的使用情况，等人员用完后在记录一次，更复杂的情况是在车辆的使用中发生事故，还要详细记录车辆发生事故的地点对方的姓名及其电话，车辆的损坏程度等都要做出相应的记录。可手工抄写有时很容易出错。若将数据输入计算机，需要花费时间，但根据这些数据由计算机计算剩余的资源及对它的结算的速度很快。数据一次输入可以多次使用。例如通知的时候可以输入一份发送给每个用户。1.1 技术可行性根据我们掌握的知识，合理建立数据库、利用vb开发工具开发数据库管理应用系统来实现办公事务管理在技术上是可行的。如果开发软件给定的时间比较短，应采用自上而下的模式开发以保证开发的任务完成。在系统第

4、一次正式运行时开发者要全程在场，以便能及时发现问题、解决问题。1.2 经济可行性开发办公事务管理系统，以后每年都可以使用该软件，用计算机进行事务管理省时、省力、不易出错，很有必要性。2 需求分析根据日常办公事务中出现的问题以及用户需求，办公事务管理系统必须完成文件管理、财产管理、会议管理、值班管理、事故管理、提案管理、车辆管理七大功能。其中文件管理包括行文管理、往来信函管理、客户投诉管理、报表发送管理；财产管理包括财产登记、财产维修、财产投保、财产增减四大部分；车辆管理主要包括车辆登记、车辆使用、车辆事故录，这四部分要求可以逐条浏览记录；可以插入、删除或修改某条记录，并能将结果返回到数据库中；

5、可以通过给定条件查询相关记录，并对记录进行输出，输出时不仅通过vb的表格控件进行显示，还应将查询结果输出至excel表格。财产管理、会议管理、值班管理以及提案管理要求以表格的形式显示数据库表中所有记录；可以插入、删除或修改某条记录，并能将结果返回到数据库中；可以通过给定条件查询相关记录，并对记录进行输出，要求通过vb的报表控件打印输出。系统管理模块主要用于对系统的用户进行管理，可以添加新用户、删除一个已经存在的用户；可以为用户修改密码，并可以通过此模块退出系统。3 系统设计3.1 系统总体架构 图3.1 系统结构功能图3.2 数据库设计基于需求分析阶段所做的操作，可以确定在此系统中涉及的表有行

6、文管理数据表、信函管理、报表管发送管理表、客户投诉管理表、车辆登记表、车辆使用表、财产登记表、车辆事故表、财产投保表、财产维修表、财产增减表、会议管理表、值班管理表、提案管理表、事故管理表、系统管理表。4、功能实现4.1 登陆窗体设计及实现办公事务管理系统面向两类用户，一类是普通职员，也就是普通用户，此类用户可以通过此管理系统来浏览各数据表的内容，能够通过一定的条件来查找需要的记录，还可以对自己的密码进行管理；另一类就是系统管理员，这类用户不仅具有普通用户的所有权限，并且可以对数据表进行更新操作，对后台数据库进行管理，并且还可以对所有用户进行管理。因此在设计时用相应的权限来标识用户的身份，并且

7、根据权限的不同来确定用户属于哪类用户，能进行什么样的操作。界面设计及实现代码如下(如图4.1)图4.1代码： Dim cnt As Integer 记录确定次数Private Sub Command1_Click()Dim sql As StringDim rs_login As New ADODB.RecordsetIf Trim(txtuser.Text) = Then 判断输入的用户名是否为空 MsgBox 没有这个用户, vbOKOnly + vbExclamation, txtuser.SetFocusElse sql = select * from 系统管理 where 用户名=

8、& txtuser.Text & rs_login.Open sql, conn, adOpenKeyset, adLockPessimistic If rs_login.EOF = True Then MsgBox 没有这个用户, vbOKOnly + vbExclamation, txtuser.SetFocus Else 检验密码是否正确 If Trim(rs_login.Fields(1) = Trim(txtpwd.Text) Then userID = txtuser.Text userpow = rs_login.Fields(2) rs_login.Close Unload M

9、e frmxinxi.Show Else MsgBox 密码不正确, vbOKOnly + vbExclamation, txtpwd.SetFocus End If End IfEnd Ifcnt = cnt + 1If cnt = 3 ThenUnload MeEnd IfExit SubEnd SubPrivate Sub Command2_Click() Unload MeEnd SubPrivate Sub Form_Load()Dim connectionstring As Stringconnectionstring = provider=; data source=db1.md

10、bconn.Open connectionstringcnt = 0End Sub4.2 信息界面设计在登陆成功后，应该进入一个信息显示界面，在显示界面中显示系统的相关设计信息，要求以动态字幕进行显示。主要用到了vb中的时钟控件，通过对该控件相关属性的设置来实现相应的功能。4.3 主界面设计在进入主界面以后，在主界面上以菜单的形式来管理各大模块。其中一级菜单有文件管理、财产管理、会议管理、值班管理、事故管理、提案管理、车辆管理以及系统管理。其中文件管理、车辆管理、财产管理和系统管理包含二级菜单，把它们所包含的功能模块又作成相应的菜单项，点击菜单项后进入的界面用vb中的选项卡实现。在选中一个一级

11、菜单以后可以通过do-case语句可以判断你选中了哪个菜单项，然后判断应对数据库中哪一张表进行操作。以文件管理为例，文件管理包含行文管理、信函管理、报表发送管理和客户投诉管理四个菜单项（如图4.3）： 图4.3.1当单击其中的任一项都可打开如图示的界面（图 图4.3.2然后编写代码，来判断应对哪个数据表进行操作。Private Sub cmdsearch1_Click()Select Case SSTab1.Tab Case 0 Unload Me frmsearch1.Show Case 1 Unload Me frmsearch2.Show Case 2 Unload Me frmsear

12、ch3.Show Case 3 Unload Me frmsearch4.ShowEnd SelectEnd SubPrivate Sub Form_Load()Dim sql As StringIf userpow = guest Then Frame2.Enabled = FalseEnd IfSelect Case select_menu Case xingwen SSTab1.Tab = 0 Case xinhan SSTab1.Tab = 1 Case baobiao SSTab1.Tab = 2 Case kehu SSTab1.Tab = 3End Select打开行文管理数据库

13、sql = select * from 行文管理rs_xingwen.CursorLocation = adUseClientrs_xingwen.Open sql, conn, adOpenKeyset, adLockPessimisticIf rs_xingwen.EOF = False Then rs_xingwen.MoveFirst viewdata_xingwenEnd If其中，会议管理、值班管理、事故管理没有下级菜单，单击这些菜单项，直接打开页面进行操作。5 测试以行文管理测试设计5.1 对主要数据进行测试测试项目测试步骤发文号发文日期份数保密年份测试结果1空发文号不能为空20

14、11空请按照yyy-mm-dd输入发文日期30111994-10-24空份数请输入数字40111994-10-24a空保存年份请输入数字50111994-10-2410空60111994-10-24102增加成功52 对主要功能测试修改功能测试：在数据库中已存储了001-011号文件，可以对它们进行查询，删除和修改等功能。对011号文件进行修改，修改项目有发文日期，保存年份和份数。6 编译并打包发布6.1 编译过程描述： 对于教复杂的程序，出现错误总是不可避免的。VB提供了程序调试工具，通过设置断点、观察变量和过程跟踪等手段，可以帮助程序设计人员来排除程序中出现的错误。程序中的错误可分为编译错

15、误、运行错误和逻辑错误三种类型。6.2 发布过程描述：VB有两中发布过程：接生成可执行文件，在VB的文件菜单中就可以生成。有Package&Deppioyment中就可以生成了。在安装文件时，需要把文件打包发行。参考文献1 梁伟,苏瑞.Visual Basic 管理信息系统项目开发实践 M.北京：科学出版社，20052 闵敏,吴凌娇. Visual Basic 程序设计实用教程M.北京:机械工业出版社，20053 龚沛曾,陆慰民,杨志强. Visual Basic 程序设计教程(6.0版)M.北京: 高等教育出版社,20004 龙厚斌,姜继红.Access 2003中文基础教程M.北京:人民邮

16、电出版社,20065 史济民,顾春华,李昌武,苑荣.软件工程-原理、方法与应用M.北京：高等教育出版社，2002仅供个人用于学习、研究；不得用于商业用途。For personal use only in study and research; not for commercial use.Nur fr den persnlichen fr Studien, Forschung, zu kommerziellen Zwecken verwendet werden.Pour l tude et la recherche uniquement des fins personnelles; pas des fins commerciales. , , . 以下无正文