企业管理系统.docx

《企业管理系统.docx》由会员分享，可在线阅读，更多相关《企业管理系统.docx（18页珍藏版）》请在第一文库网上搜索。

1、企业管理系统目录摘要（2）第一章绪论（4）1. 1摘要背景（4）1.2开发工具的选择（4）第二章系统需求与分析（5）2.1 总体需求调查（5）1 .1.1企业的管理功能（5）2 .1.2系统目标调查（5）2.2系统数据流程分析（5）第三章系统设计（6）3.1系统总体结构图（8）第四章全面设计（9）4.1界面设计（9）4.2修改与删除用户与密码（12）4.3删除修改界面（15）4.4系统数据库设计结果（15）随着信息技术的不断进展，我们对数据与业务的要求越来越高，因此对应聘人员的各类信息进行数字化与网络化的管理也成为必要。一个完善的应聘人员档案管理不仅有利于企业对应聘人员信息的统计与管理，且有利

2、于提高应聘人员信息查询速度。该系统分为账户管理模块，应聘人员档案添加、查询、修改模块，专业、民族增删模块，数据的导入、导出模块。本次设计任务是通过开发一个数据库企业管理系统，使用VB6.0与ACCeSS等软件为开发工具；对应用领域进行调查分析；参考各类资料与进行数据库编程实践。通过我们一个小组三个人的共同努力，已经基本上成功地实现了设计任务书的要求。使得设计的数据库系统能够实现通常数据库的管理。我们研究了数据库的查询优化问题.论文要紧介绍了本课题的开发背景，所要完成的功能与开发的过程。全文由系统设计、设计工具选择与简介、系统功能的实现等几部分构成。文中所设计的“企业管理系统”是使用ViSUa1

3、Basic6.0中文版作为开发工具，后台数据库则使用AeCeSS2003。“企业管理系统”为工作人员提供信息咨询等服务。信息录入项目齐全、完整、系统。系统灵活使用表格对各类信息分门别类,构成企业管理系统，能够方便地查询、阅读、修改、与使用。在对企业管理系统各个方面进行调研后，在完成管理系统的设计与实现的基础上,写下这篇论文。第一章绪论1.1 摘要背景企业管理系统使原本手工操作的复杂性、繁琐工作在电脑键盘弹指之间就可轻松完成。1.2 开发工具的选择数据库系统的开发，作为后台的Access是一个非常理想选择。数据库是MIS中的重要支持技术,在MIS开发过程中，如何选择数据库管理是一个重要的问题,目

4、前，数据库产品较多，每种产品都具有各自的特点与适用范围，在本系统中要紧使用Access作为后台工作,本系统选用的数据库语言，该开发工具具有很多长处。Visua1Basic是一种可视化的、面对对象与条用事件驱动方式的结构化高级程序设计，可用于开发Windows环境下的种类应用程序。它简单易学、效率高,且功能强大，能够与Windows的专业开发工具SDK相媲美，在Visua1Basic环境下，利用事件驱动的编程机制、新颖易用的可视化设计工具，能够高效、快速地开发出Windows环境下功能强大、图形界面丰富的应用软件系统。运用VB在加上Access作为其后台，会使系统更加完善。第2章需求分析2.1

5、总体需求调查2.1.1 企业的管理功能生产管理、采购管理、销售管理、人事管理、库存管理、财务管理。如图1.1企业组织结构图2.1.2系统目标使用现有的软硬件及科学的管理系统开发方案，建立企业管理系统，实现企业管理的计算机自动化。系统应符合企业管理制度，并达到操作直观、方便、有用、安全等要求。本系统不但能够节约您的时间，而且会使您事半功倍。2.2系统数据流程图系统的数据是要达到数据的准确性，数据流程分析是系统分析中的基础环节。企业管理系统的数据流程如图(2-1)数据流程图系统设计图12业务流程图第四章系统实现第4章全面设计4.1界面设计员工信息-11X1员工信息录入姓名：I请输入姓名工作时间：联

6、系电话：奖惩情况：民族：F生专科究士士大本研硕博确定.登入登入取消-111进入退出4.1.1系统启动界面设计图1-4图1-4是本系统的初始界面，事实上现的是用户登陆系统。Stringname=txtName.getText().trim();Stringpass=String.va1ueOf(txtPassword.getPassword();if(name.equa1s()JoPtiOnPane.showMessageDia1og(this,用户名警告，JOptionPane.WARNING_MESSAGE);txtName.requestFocus();return;)if(pass.eq

7、ua1s(,)JoPtionPane.showMessageDia1og(this,密码警告，JOPtiOnPane.WARNING_MESSAGE);txtPassword.requestFocus();return;1*创建UserTab1e类的对象*/UserTab1euser=newUserTab1e();user.setUserName(name);user.setUserPassword(pass);if(1oginBusiness.UserIsRight(User)MainFrmmainfrm=newMainFrm();MainFrm.setFrameMidd1e(mainfrm

8、);mainfrm.setVisib1e(true);this.dispose();)e1seJOPIionPaneshowMessageDia1og(this,用户名或者密码错误！，”警告”,JOptionPane.WARNING_MESSAGE);boo1eanret=fa1se;Connectioncon=nu11;PreparedStatementprsm=nu11:Resu1tSetrs=nu11;*存储sq1语句*/Stringsq1=se1ectuserNaine,UserPasswordfromUserTab1ewhereuserName=?andUserPassword=?1

9、;con=ConnectionManager.getCon();与数据库取得连接try(prsm=con.reareStatement(sq1);预编译sq1语句rsm.setString(1,user.getUserName();rsm.setString(2,user.getUserPassword();rs=prsm.executeQuery();if(rs.next()ret=true;SyStem.out.print1n(查询成功!,);1catch(SQ1Exceptionex)System.out.print1n(UserTab1eDao类中的CheCkUSero方法出错了+ex

10、.getMessage();fina11yConnectionManager.c1oseRet(rs);ConnectionManagenc1osePre(Prsm);ConnectionManagenc1oseCon(Con);returnret;4.1.2主界面的设计图1-5图1-5为系统的主界面其用菜单编辑器完善了主界面的菜单。PrivateSubForm_1oad()mzg1.Hided1jm.ShowEndSubPrivateSubsfg1_C1ick()mzg1.Hideyfg1.Show显示登陆药房管理系统EndSub4.1.3医院药房管理系统界面图1-6该界面显示了本系统要实现

11、的药品信息保护、查询等功能。PrivateSubwh_C1ick()Form3.Show显示药品进销存信息的添加、修改、删除功能界面EndSubPrivateSubForm6.Showcx_C1ick()显示药品进销存信息与有关金额的查询功能界面EndSubPrivateSubnote_C1ick()She11notepad.exe,z,1此为方便于管理者的记事本辅助功能EndSubPrivateSubjsq_C1ick()She11z,ca1c.exezz,1此为方便于管理者的计算器辅助功能EndSubPrivateSubtjyh_C1ick()Form9.Show显示添加用户界面EndSu

12、bPrivateSubggmm_C1ick()Form8.Show显示更换密码界面EndSub4.2修改与添加用户与密码4.2.1添加用户输入用户名、密码、确认密码点确认就能够了非常容易实现。PrivateSubCommand1_C1ick()*此代码说明用户添加完用户名与密码后进*行确认的功能*IfText1Text=OrText2.Text=ThenMSgBOX请输入用户名或者密码E1seIfText2.Text=Text3.TextThenForm9.Adodc1.Recordset.AddNewForm9.Adodc1.Recordset.Fie1ds(,zuserz)=Text1.T

13、extForm9.Adodc1.Recordset.Fie1ds(zzpasswd/z)=Text2.TextForm9.Adodc1.Recordset.UpdateMsgBox用户添加成功Text1.Text=”Text2.Text=Text3.Text=Form9.Adodc1.RefreshE1se:MSgBOX两次输入的密码不一致，请重新输入Text2.Text=Text3.Text=EndIfEndIfEndSubPrivateSubCommand2_C1ick()Un1oadMeEndSubPrivateSubForm_1oad()1eft=(ScreemWidth-Width)

14、/227Top=(Screen.Height-Height)/2EndSub4.2.2修改密码当用户改完原密码与用户口令后进行确认的代码：PrivateSubCommand1_C1ick()OnErrorResumeNextAdodc1.Recordset.MoveFirstAdodc1.Recordset.Finduser=&username&IfAdodc1.Recordset.Fie1ds(zzpasswd,z).Va1ue=Text1.TextThenIfText2.Text=Text3.TextThenAdodc1.Recordset.Fie1ds(z,passwdz,).Va1ue=Text2.TextAdodc1.Recordset.UpdateMSgBoX密码修改成功！，VbInfOrnIatiOn,信息”Text1.Text=”Text2.Text=Text3.Text=E1seMsgBox新密码与验证码不一致！，VbCritica1,错误”Text1.Text=Text2.Text=Text3.Text=28E1s