信息管理课程设计-人事管理系统开发.doc

课程设计题 目：人事管理系统开发学生姓名：学院名称：管理学院专 业：市场营销学 号：班 级：08营职2班人事管理系统的开发1 需求分析在当今社会，随着企事业单位规模的扩大，职工人数的不断增加，职工的调进调出等日常事务，使人事管理工作越来越复杂。在计算机广泛普及的今天，人事管理可以信息化，以减轻管理人员的工作，提高工作效率。为此我就选择了用VFP开发一个小型的人事管理系统。1.1数据分析 经过调查，人事管理工作的业务数据主要包括职工个人档案、部门信息、职工工作业绩评价。职工个人档案登记每个职工的个人信息，包括姓名，部门，性别，出生日期，学历，职称，政治面貌，身份证号，工作时间，照片等项。部门信息反映了一个单位包含的部门名称。职工工作业绩评价登记职工在何时因何原因被评价的信息，包含姓名，评价日期，工作业绩，业务水平，考核等级等项。1.2功能分析 人事管理系统主要是对职工个人信息，工作业绩评价进行管理和数据的统计，要求实现的功能如下：（1） 部门的管理：能够添加、删除、修改部门信息。（2） 民族信息的管理：能够添加、删除、修改民族信息。（3） 职工信息的管理：包括职工个人信息的添加、修改、删除、查询和打印。（4） 职工工作业绩评价的管理：包括职工工作业绩评价信息的添加、修改、删除、查询和打印。（5） 统计报表：包括统计各种职称的人数、各部门的人数。（6） 系统功能：包括修改密码、退出系统、关于本系统。本系统使用内置的登陆用户，不许修改用户名。由以上分析可得出人事管理系统功能模块图：人事管理系统功能模块图帮助统计输出工作评价管理职工信息管理系统关于本系统打印工作评价表打印档案报表统计部门人数统计职工人数查询评价信息编辑评价信息查询职工信息编辑职工信息编辑基础信息退出系统修改密码职称代码民族代码部门代码人事管理系统2 数据库设计 本系统需要用天部门表，民族表，职称表，职工档案表，工作评价表，用户账号表6个数据表，它们的表名分别命名为dept,nation,prof,employee,appraise,user。由于在职工档案中需要填写所在部门，因此将部门进行编码。部门表用来记录一个单位内各部门的代码及名称，其内容是相对不变的。表1 部门表（dept、dbf）字段名类型宽度说明部门编号字符型4主索引字段，索引名为bmbh部门名称字符型20表2 民族表（nation 、dbf）字段名类型宽度说明民族编号字符型3主索引字段，索引名为mzbh民族名称字符型12职工档案表存放每个职工的个人信息，它收集了关于职工的足够多的信息。表3 职称表（prof 、dbf）字段名类型宽度说明职称编号字符型3主索引字段，索引名为zcbh职称名称字符型12工作评价表存放了何时评价职工工作业绩的信息，可以记录年度考核或其他奖惩情况。表4 职工档案表（emploee .dbf）字段名类型宽度说明职工编号字符型7主索引字段，字段名为zgbh姓名字符型10部门编号字符型4普通索引字段，索引名为bmbh性别字符型2出生日期日期型8籍贯字符型14专业字符型20学历字符型10民族编号字符型3普通索引字段，索引名为mzbh婚姻字符型4身份证号字符型18电话字符型14住址字符型30政治面貌字符型10参加工作时间日期型8调入时间日期型8职称编号字符型3职务字符型12普通索引字段，索引名为zcbh原工作单位字符型40简历备注型4照片通用型4备注备注型4表5 工作评价表（appraise .dbf）字段名类型宽度说明评价编号字符型10主索引字段，字段名为pijh职工编号字符型7普通索引字段，索引名为zgbh部门编号字符型4普通索引字段，索引名为bmbh评价日期日期型8工作业绩备注型4业务水平备注型4考核等级字符型6其他1备注型4其他2 备注型4备注备注型4表6用户帐号表(user .dbf)字段名类型宽度说明USERNAME字符型12用户名USERPASSWD字符型12密码为了防止非管理人员运行本系统，采用登陆方法判断用户是否法。3.创建项目和数据库由于本系统是一个应用系统，包含各种类型的文件。因此采用VFP的项目管理器来管理整个系统的创建，可使开发工作条理化、系统化。3.1建立应用系统项目首先，建立一个存放项目文件的文件夹，如E：/人事管理系统，此外，在该文件夹下建立人个子文件夹，用于存放本系统的数据库文件，数据表和索引文件。其次，在VFP中将该文件夹如E：/人事管理系统设置为默认目录。具体步骤为：在VFP主窗口中单击“工具”菜单下的“选项”命令，在弹出的“选项”对话框中选择“文件位置”选项卡，如图（1）。选中“默认目录”选项，单击“修改”按钮，在弹出的“更改文件位置”对话框中选择要设置的默认目录，单击“确定”按钮，返回上一界面。然后单击“设为默认”，单击“确定”。 最后建立项目文件。在VFP主窗口中选择“文件”菜单中的“新建”命令，弹出“新建” 窗口，在“文件类型”中选择“项目”，然后单击“新建” 按钮，弹出“创建” 窗口，选择保存路径，输入项目文件名“Personnel_MIS”,单击”保存“按钮。3.2建立数据库和数据库表打开项目文件Personnel_MIS，在其项目管理器中选择“数据”选项卡中的“数据库”， 单击“新建”，建立一个数据库，保存在data文件中。在Personneldb数据库中创建上述6个表结构，设置每个表的索引字段。4.建立主程序一个应用系统往往由若干个表单，程序，报表，菜单，数据库，查询等组成。运行应用系统时首先执行的是主文件，由主文件调用其他菜单，表单，实现系统的各项功能。如图：显示系统封面退出系统调用主菜单进入本系统合法吗？用户登陆NO YES主文件可以是程序，表单，或者菜单。这里将主文件设置为一个程序文件main.prg，其主要功能是设置系统参数值，显示工具栏，调用封面表单，开始循环事件控制。在Personnel_MIS项目管理器的“代码”选项卡中新建一个程序文件main.prg，其代码如下：Close AllClear AllSet Talk OffSet Century OnSet Safety OffON ERROR Messagebox(Message(),0,"警告") &&全局变量说明：g_username用户名Public g_usernameWITH _SCREEN &&设置VFP主窗口属性 .Visible= .F. .NAME= '人事管理' .CLOSABLE= .F. .HEIGHT =600 .WIDTH =800 .WINDOWSTATE =2 .CAPTION ='人事管理系统' .ICON ='047.ico'ENDWITHSET CLASSLIB TO mytoolbar.vcx &&设置工具栏bar1 =CREATEOBJECT('mytoolbar')bar1.LEFT = 0bar1.TOP = 0bar1.SHOWDo Form f_welcome &&显示系统封面表单Read Events &&开始循环事件控制Set Sysmenu To Default &&恢复VFP默认的系统菜单5.建立封面表单和登陆表单5.1建立系统封面表单在Personnel_MIS项目管理器的“文档”选项卡中新建一个表单文件f_welcome.scx,其表单界面如图：系统封面表单的功能是用来显示一个欢迎界面，经过2秒钟后打开登录窗口。在该表单添加3个标签控件、两个计时器控件。表单及其控件的主要属性设置如表1-7所示。（1）计时器控件Timer1的功能是使标签Label1文字颜色每隔50毫秒随机变化一次。其Timer1事件代码如下：R= Int ( Rnd()*255 )G= Int ( Rnd()*255 )B= Int ( Rnd()*255 )Thisform.Label1.Forecolor=; Rgb( R,G,B )表1-7 系统封面表单及其控件的主要属性设置对象属性属性值说明Form1AutoCenter.T.-真表单居中BorderStyle2-固定对话框ShowWindow2-作为顶层表单TitleBar0-关闭不显示窗口标题WindowType1-模式Label1Caption欢迎使用人事管理系统Label2Caption版权所有（C） 2004Label3Caption制作人：徐辉Timer1Interval50Timer2Interval2000（2）计时器控件Timer2的功能是过2秒钟后调用登录表单flogin，显示登录窗口。其Timer事件代码如下：Thisform .ReleaseDo Form FLogin5.2建立登录表单创建用户登录表单文件flogin. scx，其表单界面如图1-5所示。在该表单Form1中添加2个标签、2个文本框、2个命令按钮。该表单及其控件的主要属性设置如图：（1）表单的数据环境：user表。（2）建立表单属性n，用来记录“确定”按钮被单击的次数。建立方法是选择“表单”菜单的“新建属性”命令，在弹出的“新建属性”窗口的“名称”文本框中输入n，单击“添加”按钮，再单击“关闭”按钮。然后在“属性”窗口中将n的初值设为0。表8 登陆表单及其控件的主要属性设置对象属性属性值说明Form1Always OnTop.T._真Auto Center.T._真Border Style2固定对话框Caption.F.禁止窗口关闭按钮Closable.F.关闭控制菜单图标Control Box.F.禁止最大化按钮Max Button.F.禁止最小化按钮Min Button.F.Show Window2-作为顶层表单Labell1Caption用户名Labell2Caption登陆Cmd OKCaption密码Cmd CancelCaption取消（3）“登录”（ CmdOk ）按钮的Click事件代码如下：select user thisform .n=thisform.n+1 locate for alltrim(username)=alltrim(thisform.text1.value) if found() and alltrim(userpasswd); =alltrim(thisform.text2.value) gusername=thisform.text1.value thisform.release do mainmenu.mpr Screen.Visible=.T. else if thisform.n,<5 MessageBox Thisform.text1.setfovus Else MessageBox thisform. release quit endifendif该按钮的功能是判断用户输入的用户名和密码是否存放在USER表的内容相同，如果相同，则进入系统，如图1-6所示，否则弹出警告窗口。若用户连续5次输入错误的用户名或密码，则退出系统。（4）“取消”（CmdCancel）按钮的功能是弹出确认窗口，如果单击“是”按钮，则释放表单，并退出系统。其Click事件代码如下：ans =Message Boxif ans = 6thisform.release QuitElse thisform.text1.setfocusend if6.建立主菜单在PersonnelMIS项目管理器的“其他”选项卡中选择“菜单”，新建一个菜单文件main-menu. Manx，其主要菜单包括系统，职工信息管理，工作评价管理、帮助等。系统的全部操作由菜单来完成，各主菜单的一级子菜单极其执行命令如下表9所表示表9系统 菜单极其执行命令主菜单一级子菜单结果命令或过程系统修改密码命令Do form-change-passed子菜单退出过程Yn=message Box(“确定退出本系统？”，4+32，“人事管理系统”)If yn=6 Clear Close all Clear events quitend if主菜单一级子菜单结果命令或过程职工信息管理编辑基础信息命令Do form f-edit-basic工作评价管理编辑职工信息Deform-edit employee查询职工信息编辑职工工作评价查询职工工作评价Do form帮助关于命令Do form f-about me7建立工具栏类为了方便操作系统给该类设计器添加5个命令按钮，并将各按钮的Caption属性值分别设置为“基础信息”、“职工信息”、“工作评价信息”、“查询职工信息”、“退出”，如图所示。将Tool Tip Text属性值分别设置为“编辑基础信息”、“编辑职工信息”、“编辑工作评价信息”、“查询职工信息”、“退出系统”。该工具栏的相关事件代码如下：“基础信息”按钮的Click事件代码为：Do Form f-edit-basic 职工信息按钮的Click事件代码为：Do Form f-edit-employee工作评价信息按钮的Click事件代码为：Do Form f-edit- apprise查询职工信息按钮的Click事件代码为：Do Form f-query- employee“退出”按钮的Click事件代码为：Yn=messagebox（“确定退出本系统?”,4+32，“人事管理系统”）if yn=6 clear thisform.release clear events quit endif在工具栏的Iint事件中添加下列代码，指定自定义工具栏停放在窗口顶部。this.Dock（0）建立好的工具栏效果图参见图所示的工具栏。 8、建立职工档案相关的表单8.1建立编辑基础信息表单在Personnel- MIS项目管理器的“文档”8.2建立编辑职工信息表单在Personnel_MIS项目管理器中，新建一个表单文件f_edit_employee.scx,表单界面如图：