课程设计报告

课程设计报告第I页共I页 1 2 2 3 3 6 8 8 8 课程设计报告第1页共27页方式管理文件档案，这种管理方式存在着许多缺点,如：效率低、保密性差，另外时间一长，将产生大量的文件和数据,这对于查找、更新和维护都带来了不少的困难，而且用作了打字机。这是长期以来困惑人们的一大问题[2]。现在人们够极大地提高企业人事管理的效率,也是企业的科学化、正规化管理，与世界接轨的重课程设计报告第2页共27页拟采用的开发平台为Windows平台，系统所采用的开发工具为VISUALBASIC6.0和课程设计报告第3页共27页必要的条件。可行性的含义不仅包括可能性，还包括必2.1初步调查业对自己员工的情况也开始使用计算机进行自课程设计报告第4页共27页2.2可行性研究可行性是指在当前组织内外的具体条件下，这个信息位的高度重视，人事信息管理系统在国内基本以上的应用计算机及开发管理信息系统的公司和单位均开发并运课程设计报告第5页共27页利用其提供的各种面向对象的开发工具，开发了这套企业人事要求不高，目前市场上的一般计算机软硬件资源均能满足系统开发要求。其中中的经济价值，这个经济价值也是当前的企业所期望看到的。人事管理工作覆盖面广,课程设计报告第6页共27页务变动情况,考核培训结果,专业技术工作及主要业绩以及针对这些数据进行的各类统计报表的制作和综合分析等。对如此多的数据、信息的管理、开发及运用,都必须在规3.1业务流程分析门门↓户3.2数据流程分析数据流程分析就是把数据在现行系统内部的流动情况抽象出来，舍去了具体组织机构、员课程设计报告员第7页共27页员员员员3.3数据字典数据字典是关于数据的信息的集合，也就是对数据流图中包含的所有元素的定义的集合。为了对设计了传统中的各个元素作出详细的说明，有必要建立数据字典。数据字典的主要内容是对数据流程图中的数据项，数据结构，数据流，处理逻辑，数据存储和外部实体等六个方面进行具体的定义。课程设计报告第8页共27页组成：职工编号，职工性别，职工年龄，民族，婚姻状况，家庭电话，电子邮箱，手机，籍贯，地组成：编号，员工号，成员姓名，关系，出生日期，工4.1功能结构设计根据系统的总体要求及设计思想，结合上面的分析，设计得出的人事信息系统模块。民族档案民族档案文化程度编号文化程度编号基础档案工资管理密码修改公司信息单位设置系统参数数据备份数据还原课程设计报告基础档案工资管理密码修改公司信息单位设置系统参数数据备份数据还原关于系统系统帮助第9页共27页关于系统系统帮助企业人事管理系统登录用户管理用户登录课程设计报告第10页共27页查询管理员工基本信息，工查询管理员工基本信息，工N4——登录用户权限管理，密码修改登录用户权限管理，密码修改N<><>4—<>系统使用帮助，关于系统信<>系统使用帮助，关于系统信息N退出4.2数据库设计课程设计报告第11页共27页设计数据库时应考虑到用户各方面的需求，包课程设计报告第12页共27页课程设计报告第13页共27页4.3代码设计），其中“工作单位识别码”是各子公司各部门在全集团内唯一标识符，由四位数字组成。前两位数课程设计报告第14页共27页4.4输入输出设计课程设计报告第15页共27页系统始于最佳的输入系统。根据输出信息的要求，输入设计课程设计报告第16页共27页课程设计报告第17页共27页4.5系统配置设计课程设计报告第18页共27页DirectX9图形支持，WDDM驱动程序，至少128MB图形内存²,PixelShader2.0和份和恢复等功能，操作简单明了，与Access和Excel联合办公紧密，方便人事管理部门课程设计报告第19页共27页3.黎连业.管理信息系统设计与实施.清华大学出版社，4.张晓黎.VisualBasic+SQLServer数据库应用系5.张德.人力资源开发和管理.清华大学出版6.许树柏.实用决策方法—层次分析原理.天津大学出版社10.单薇.利用模糊综合评价实现企业水平的量化分析.数学的实践和认识，2002（第32），课程设计报告第20页共27页1系统的登录PrivateConstGWL_EXSTYLE=(-PrivateDeclareFunctionPrivateDeclareFunctionSByValnIndexAsLong,ByValdwNewLongAsLong)AsPrivateSubcmdDL_ClEndIfIfzhuan(txtPass.Text)=IIf(Trim(IsNull(rs.Fields("pagCzyqx=rs.Fields(EndIfPrivateSubForm_Initial课程设计报告第21页共27页CallInitCommonContrMe.Shape1.Left=Me.LMe.Shape1.Height=Me.ScaleHe'-------------------------------------------Ret=GetWindowLong(Me.hWndRet=RetOrWS_EX_LAYERED'------------------------------------------Ifrs.RecordCount>0ThenEndIfIfAlpha>255ThenEndIf课程设计报告第22页共27页2基础档案查询PrivateConstGWL_EXSTYLE=(-PrivateDeclareFunctionPrivateDeclareFunctionSByValnIndexAsLong,ByValdwNewLongAsLong)AsPrivateSubcmdDL_ClEndIfIfzhuan(txtPass.Text)=IIf(Trim(IsNull(rs.Fields("pagCzyqx=rs.Fields(EndIf课程设计报告第23页共27页PrivateSubForm_InitialCallInitCommonContrMe.Shape1.Left=Me.LMe.Shape1.Height=Me.ScaleHe'-------------------------------------------Ret=GetWindowLong(Me.hWndRet=RetOrWS_EX_LAYERED'------------------------------------------Ifrs.RecordCount>0ThenEndIf课程设计报告第24页共27页IfAlpha>255ThenEndIf3用户管理PrivateSubCheck1_Click(IndexAsInEndIfIfMe.cmdBC.Caption="新增"ThenEndIfNextrs!pass=zhuan("1234Next课程设计报告第25页共27页NextEndIfNextPrivateSubcmdSC_ClEndIfEndIf课程设计报告第26页共27页Me.cmdSC.Enabled=NextPrivateSubForm_InitialCa