计算机毕业设计12Delphi+ACCESS人事管理系统
- 格式:doc
- 大小:5.33 MB
- 文档页数:47
根据Access创建人事管理数据库介绍本文档旨在说明如何利用Access软件创建一个功能齐全的人事管理数据库。
人事管理数据库可以帮助组织轻松管理员工信息、福利和培训记录等重要数据。
通过Access的功能,我们可以快速建立一个自定义的人事管理系统。
步骤1. 创建新数据库1. 打开Access软件并点击“创建新数据库”.2. 输入数据库名称,并选择保存位置.2. 设计数据表1. 在数据库中点击“表格”选项卡.2. 点击“新建”以创建一个新的数据表.3. 输入表格名称,并定义需要的字段.4. 为每个字段选择合适的数据类型,如姓名、职务、薪资等.5. 在每个字段中添加必要的验证规则,如有效日期范围、数字范围等.3. 设计关系1. 在数据库中点击“数据库工具”选项卡.2. 点击“数据库关系”以打开数据库关系视图.3. 拖动相应的表格到视图中,以建立表格之间的关系.4. 定义每个关系的类型,如一对一、一对多等.4. 创建查询1. 在数据库中点击“查询”选项卡.2. 点击“新建查询”以打开查询设计视图.3. 选择需要查询的表格和字段.4. 设定查询条件和排序规则.5. 运行查询并查看结果.5. 设计表单1. 在数据库中点击“表单”选项卡.2. 点击“新建表单”以打开表单设计视图.3. 选择需要显示的字段和布局.4. 设定表单样式和格式.5. 添加合适的按钮和控制元素,如更新、删除、保存等.6. 设计报表1. 在数据库中点击“报表”选项卡.2. 点击“新建报表”以打开报表设计视图.3. 选择需要显示的字段和布局.4. 设定报表样式和格式.5. 添加页眉、页脚及页码等元素.总结通过上述步骤,您可以利用Access软件轻松创建一个人事管理数据库。
这个数据库将为您提供一个有效、可定制的解决方案来管理员工信息和相关数据。
祝您使用愉快!。
学生综合管理系统设计人:摘要本文档根据学校对我们的毕业设计的系统的要求,对系统进行了分析设计,得到了本文档.修改历史目录第一章概述 (1)第二章功能模块 (2)2.1 功能模块概述 (2)2.1.1学生管理(StudentManage) (2)2.1.2成绩管理(ResultManage) (3)2.1.3系统管理(SystemManage) (3)第三章系统架构 (5)3.1 显示层 (5)3.1.1主界面 (6)3.1.2学生管理子模块 (6)3.1.3成绩管理子模块 (7)3.1.4系统管理子模块. (7)3.2 业务逻辑层 (8)3.2.1学生管理(studentmanage) (8)3.2.2成绩管理(resultmanage) (8)3.2.3系统管理(systemmanage) (9)3.3 数据操作层 (9)第四章数据字典 (10)第五章程序结构 (12)第六章界面设计 (16)6.1 主界面 (16)6.2 学生管理 (17)6.3 成绩管理 (18)6.4 系统管理 (18)6.5 学生资料报表 (19)6.6 学生成绩报表 (20)第七章总结 (21)7.1 关键技术问题及其解决 (21)7.2 系统评价 (21)第八章系统部分源程 (23)第九章参考文献 (42)第一章概述本文档根据毕业设计所提出的项目要求,对项目进行了分析,产生了本设计文档.本设计文档描述了,项目的需要完成的功能,系统总体结构.系统中具体的操作类,以及相关的数据字典.根据毕业设计说明书所提出的项目要求,我们定义了项目的需求:1.系统管理学生资料以及学生成绩,并可以查询\打印相关的报表.2.学校实行的学分制.3.学生每一个学期可以自由的选择自己想学习的课程.4.每学期的课程没有相同课程.作为一个毕业设计的研究项目,我们省略了与项目主要功能无关的其它数据.系统采用了DELPHI+ACCESS开发.有效的利用DELPHI的快速RAD程序开发能力,高效的完成程序的开发.系统在分析过程中,采用了ROSE分析设计工具,本文档中所有的图形都用ROSE完成.第二章功能模块ClassManageCurriculumManage2.1 功能模块概述系统主要包括了三大模块的功能,分别是学生管理,成绩管理,以及系统管理.2.1.1 学生管理(StudentManage)2.2.1.1 学生资料录入(StudentInput)接收管理员录入的学生资料,并且检查资料的合法性,将资料保存到数据库中.2.2.1.2 学生资料修改(StudentEdit)接收管理员录入的需修改的学生资料,并且检查资料的合法性,将资料更新到数据库中.2.2.1.3 学生资料查询(StudentSearch)接收管理员录入的查询内容,从数据库中检索学生的资料,并且显示出来.2.2.1.4 班级学生列表(StudentList)管理员选择班级,列出该级的学生资料.2.1.2 成绩管理(ResultManage)2.2.1.1 成绩录入(ResultInput)接收管理员录入的成绩,将成绩保存到数据库中.2.2.1.2 成绩修改(ResultEdit)接收管理员录入的需修改的成绩,将成绩更新到数据库中.2.2.1.3 学生成绩列表(ResultListByStudent)管理员选择一个学生以后,列出这个学生所有的成绩.2.2.1.4 学生需补考的成绩列表(FailtResultListByStudent)管理员选择一个学生以后,列出这个学生所有需要补考的成绩清单.2.2.1.5 班级需补考的成绩列表(FailtResultListByStudent)管理员选择一个班级以后,列出这个班级所有的补考成绩清单.2.2.1.6 学生选课(CurriculumSelectByStudent)管理员录入选择本学期选择要学习的课程.2.1.3 系统管理(SystemManage)2.2.1.1 班级管理(ClassManage)管理员设置班级的信息.包括对班级资料进行的增\删\改.2.2.1.2 课程管理(CurriculumManage)管理员设置课程的信息.包括对课程进行的增\删\改.第三章系统架构3.1 显示层显示层主要实现对于操作数据的显示,以及管理员相关的操作界面的实现.显示层包括了主界面,学生管理子模块,成绩管理子模块,系统管理子模块.3.1.1 主界面主界面主要显示系统的功能菜单以及相关的功能按钮.3.1.2 学生管理子模块StduentListFormStudentSearchFormStudentInputForm学生管理子模块包括了学生列表界面,学生资料修改界面,学生资料录入界面,以及学生资料查询界面.从学生列表界面,可以进入到学生资料录入界面和学生资料修改界面,以及学生资料查询界面.3.1.3 成绩管理子模块ResultListFormResultSearchForm成绩管理子模块包括了成绩列表界面,成绩修改界面,成绩录入界面,以及成绩查询界面.从成绩列表界面,可以进入到成绩录入界面和成绩修改界面,以及成绩查询界面.3.1.4 系统管理子模块.AboutFormClassManageForm CurriculumManageForm 系统管理子模块包括了班级管理界面和课程管理界面,以及系统关于的界面.3.2 业务逻辑层3.2.1 学生管理(studentmanage)学生管理模块主要负责根据显示层学生管理子模块录入的相关信息,调用数据操作层,完成相关的操作.主要的功能有:学生资料录入, 学生资料修改, 班级学生资料列表,学生资料查询3.2.2 成绩管理(resultmanage)成绩管理模块主要负责根据显示层成绩管理子模块录入的相关信息,调用数据操作层,完成相关的操作.主要的功能有:成绩录入,成绩修改,学生成绩列表,学生补考成绩列表,学生选课.3.2.3 系统管理(systemmanage)成绩管理模块主要负责根据显示层系统管理子模块录入的相关信息,调用数据操作层,完成相关的操作.主要的功能有:班级管理,课程管理.3.3 数据操作层数据操作层,主要负责与数据库的连接以及操作数据库的相关数据表.DataCount对象负责与数据库建立连接.其它的对象对数据库中的表一一对应,完成对数据库中相关的数据表的操作.第四章数据字典上图显示各个数据表的内容,数据类型以及各个数据表中间的关联关系. 以下详细说明各个表中的字段第五章程序结构1.总体结构2.模块结构显示层显示层主要实现对于操作数据的显示,以及管理员相关的操作界面的实现.显示层包括了主界面,学生管理子模块,成绩管理子模块,系统管理子模块.主界面主界面主要显示系统的功能菜单以及相关的功能按钮.学生管理子模块StduentListFormStudentSearchFormStudentInputForm学生管理子模块包括了学生列表界面,学生资料修改界面,学生资料录入界面,以及学生资料查询界面.从学生列表界面,可以进入到学生资料录入界面和学生资料修改界面,以及学生资料查询界面.成绩管理子模块ResultListFormResultSearchForm成绩管理子模块包括了成绩列表界面,成绩修改界面,成绩录入界面,以及成绩检索界面.从成绩列表界面,可以进入到成绩录入界面和成绩修改界面,以及成绩检索界面.系统管理子模块.AboutFormClassManageForm CurriculumManageForm 系统管理子模块包括了班级管理界面和课程管理界面,以及系统关于的界面.报表打印报表打印模块直接在主界面上有一个下拉接单,点击下接菜单可以进入学生资料打印和学生成绩打印.业务逻辑层学生管理(studentmanage)学生管理模块主要负责根据显示层学生管理子模块录入的相关信息,调用数据操作层,完成相关的操作.主要的功能有:学生资料录入, 学生资料修改, 班级学生资料列表,学生资料查询成绩管理(resultmanage)成绩管理模块主要负责根据显示层成绩管理子模块录入的相关信息,调用数据操作层,完成相关的操作.主要的功能有:成绩录入,成绩修改,学生成绩列表,学生补考成绩列表,学生选课.系统管理(systemmanage)成绩管理模块主要负责根据显示层系统管理子模块录入的相关信息,调用数据操作层,完成相关的操作.主要的功能有:班级管理,课程管理.报表打印学生资料打印学生资料打印模块主要负责制作所有学生资料的报表,并且可以实现预览,选择不同的打印打印等功能.学生成绩打印学生资料打印模块主要负责制作所有学生成绩的报表(成绩按照班级\学生\课程排列),并且可以实现预览,选择不同的打印打印等功能.数据操作层数据操作层,主要负责与数据库的连接以及操作数据库的相关数据表.DataConnect对象负责与数据库建立连接.其它的对象对数据库中的表一一对应,完成对数据库中相关的数据表的操作.第六章界面设计6.1 主界面6.2 学生管理6.3 成绩管理6.4 系统管理6.5 学生资料报表6.6 学生成绩报表第七章总结7.1 关键技术问题及其解决3.访问本地数据库,以及访问的安全处理1)系统采用delphi自带的 ADO数据库连接控件,连接到数据库.2)系统在连接本地数据库时,采用了相对路径.保持了软件的灵活性.使软件不需要安装,只需要拷贝整个目录到任意路径就可使用.3)系统对采用的access数据库设置了密码.保存了除系统以外的人不能随意访问本数据库.4)考虑到可能破解exe文件查找到数据库的密码(因为连接字符串中需要设置密码),所以系统采用aspack对系统进行了加密压缩处理.进一步加强了系统的安全性.4.简单直观的界面设计1)系统在界面设计去除了过多的弹出窗口设计.将所有的界面集中在主界面显示操作.使操作非常的简洁直观.2)系统在设计时,对主要操作按钮以及输入框都进行了说明.当鼠标移动到相关的操作按钮以及输入框时,说明自动显示.3)系统为了方便用户输入,都对系统进行了tab次序定位.当用户输入数据时,输入完一个,只需按tab键,自动的按需要输入的数据的次序.依次得到焦点.5.程序运行效率的考虑1)为了有效提高系统的运行效率,我们尽量的使用了delphi自带的控件,没有采用其它的第三方控件.2)在进行数据库设计了,为了提供数据读取速度.尽量的减少了数据库的多级关联.采取了适当的数据沉冗.7.2 系统评价1.功能评价3)系统采用ROSE设计工具,采用了UML建模的方式进行系统的分析和设计,符合国际软件工程的方式.4)系统采用了delphi+access的快速开发方式.高质快速的完成了软件开发.5)系统采取了一定的安全处理措施,安全有效的保存了系统数据的安全性.6)系统在进行数据库设计时,尝试使用了中文作为字段名.取得成功.改变了以往只使用英文作为字段名的习惯.并且与DELPHI结合能够.进一步的提高系统开发速度.2.可扩充性系统采用了DELPHI开发,可以在系统源代码的基础上快速的添加其它的功能模块.3.可能存在的问题及改进意见系统由于是一个简单的项目,没有充分的考虑实际学生管理中的一些情况.在软件实用性方面还有待进一步的改进.建议系统在下次开发时,进一步的深入学校教学当中,采集实际的学生管理和成绩管理中所遇到的一些情况.进一步改进软件.加强软件的实用性.第八章系统部分源程1.(部分)程序清单,要加注释//---------------------------------------------------// 功能描述: 程序主模块,包括了本系统所有的业务逻辑的代码// 作者:// 开发时间: 2003-07-12//---------------------------------------------------unit Unit_Main;interfaceusesWindows, Messages, SysUtils, V ariants, Classes, Graphics, Controls, Forms, Dialogs, ImgList, ComCtrls, ToolWin, Menus, StdCtrls, unit_dm, Grids, DBGrids, Buttons, ExtCtrls, Mask, DBCtrls, DB, Unit_bb2;typeTForm1 = class(TForm)MainMenu1: TMainMenu;N1: TMenuItem;N2: TMenuItem;ToolBar1: TToolBar;ImageList1: TImageList;ToolButton2: TToolButton;ToolButton6: TToolButton;ToolButton7: TToolButton;ToolButton8: TToolButton;ToolButton9: TToolButton;PageControl1: TPageControl;ts_student: TTabSheet;ts_cj: TTabSheet;ts_sm: TTabSheet;ts_bb1: TTabSheet;GroupBox1: TGroupBox;Label1: TLabel;dbe_curri_name: TDBEdit;Label2: TLabel;dbe_curri_xf: TDBEdit;Bevel1: TBevel;sb_curri_insert: TSpeedButton;sb_curri_edit: TSpeedButton;sb_curri_delete: TSpeedButton;sb_curri_save: TSpeedButton;sb_curri_canel: TSpeedButton;GroupBox2: TGroupBox;Label3: TLabel;Label4: TLabel;Bevel2: TBevel;sb_class_insert: TSpeedButton;sb_class_edit: TSpeedButton;sb_class_delete: TSpeedButton;sb_class_save: TSpeedButton;sb_class_canel: TSpeedButton;dbe_class_name: TDBEdit;dbe_class_xf: TDBEdit;DBGrid2: TDBGrid;DBGrid1: TDBGrid;Label5: TLabel;dbe_student_no: TDBEdit;Label6: TLabel;dbe_student_name: TDBEdit;Label7: TLabel;dbcb_student_sex: TDBComboBox;Label8: TLabel;dbcb_student_class: TDBLookupComboBox; Bevel3: TBevel;Label9: TLabel;dbe_student_yb: TDBEdit;Label10: TLabel;dbe_student_address: TDBEdit;sb_student_insert: TSpeedButton;sb_student_edit: TSpeedButton;sb_student_delete: TSpeedButton;sb_student_save: TSpeedButton;sb_student_canel: TSpeedButton;Panel1: TPanel;GroupBox3: TGroupBox;DBGrid3: TDBGrid;DBLookupListBox1: TDBLookupListBox; sb_student_search: TSpeedButton;ed_student_search: TEdit;Panel2: TPanel;GroupBox4: TGroupBox;GroupBox5: TGroupBox;DBLookupListBox2: TDBLookupListBox; GroupBox6: TGroupBox;DBGrid5: TDBGrid;DBGrid4: TDBGrid;sb_cj_insert: TSpeedButton;sb_cj_delete: TSpeedButton;sb_cj_edit: TSpeedButton;Bevel4: TBevel;sb_cj_save: TSpeedButton;sb_cj_canel: TSpeedButton;Label11: TLabel;Label12: TLabel;dbe_cj_xf: TDBEdit;Label13: TLabel;dbcb_cj_bk: TDBComboBox;dblcb_cj_name: TDBLookupComboBox;N3: TMenuItem;ToolButton10: TToolButton;PopupMenu1: TPopupMenu;N4: TMenuItem;N5: TMenuItem;ts_bb2: TTabSheet;Panel3: TPanel;ts_about: TTabSheet;Label14: TLabel;Label15: TLabel;Bevel5: TBevel;Label16: TLabel;Label17: TLabel;procedure sb_curri_insertClick(Sender: TObject); procedure sb_curri_editClick(Sender: TObject); procedure sb_curri_saveClick(Sender: TObject); procedure sb_curri_canelClick(Sender: TObject); procedure sb_curri_deleteClick(Sender: TObject); procedure sb_class_insertClick(Sender: TObject); procedure sb_class_editClick(Sender: TObject); procedure sb_class_deleteClick(Sender: TObject); procedure sb_class_canelClick(Sender: TObject); procedure sb_class_saveClick(Sender: TObject); procedure sb_student_deleteClick(Sender: TObject); procedure sb_student_insertClick(Sender: TObject); procedure sb_student_editClick(Sender: TObject);procedure sb_student_saveClick(Sender: TObject);procedure sb_student_searchClick(Sender: TObject);procedure N3Click(Sender: TObject);procedure FormCloseQuery(Sender: TObject; var CanClose: Boolean);procedure sb_student_canelClick(Sender: TObject);procedure sb_cj_insertClick(Sender: TObject);procedure sb_cj_editClick(Sender: TObject);procedure sb_cj_deleteClick(Sender: TObject);procedure sb_cj_saveClick(Sender: TObject);procedure sb_cj_canelClick(Sender: TObject);procedure ToolButton9Click(Sender: TObject);procedure ToolButton2Click(Sender: TObject);procedure ToolButton7Click(Sender: TObject);procedure N4Click(Sender: TObject);procedure N5Click(Sender: TObject);procedure ToolButton6Click(Sender: TObject);procedure N2Click(Sender: TObject);procedure DBLookupListBox1Click(Sender: TObject);procedure Panel3Click(Sender: TObject);procedure DBLookupListBox2Click(Sender: TObject);procedure DBGrid5DblClick(Sender: TObject);private{ Private declarations }public{ Public declarations }procedure set_curri_state(state:String);procedure set_class_state(state:String);procedure set_student_state(state:String);procedure set_cj_state(state:String);end;varForm1: TForm1;implementationuses Unit_About, Unit_bb1;{$R *.dfm}//---------------------------------// 功能描述: 进入课程新增模块//---------------------------------procedure TForm1.sb_curri_insertClick(Sender: TObject); begindm.adot_curri.Insert;form1.set_curri_state('open');end;//--------------------------------------------------// 功能描述: 设置课程管理表单的不同录入状态// 参数说明: state = 'open' 将表单设置为录入状态// state = 'close' 将表单设置为查看状态//--------------------------------------------------procedure TForm1.set_curri_state(state:String);beginif state = 'open'thenbeginform1.dbe_curri_name.Enabled:=true;form1.dbe_curri_xf.Enabled:=true;form1.sb_curri_insert.Enabled:=false;form1.sb_curri_edit.Enabled:=false;form1.sb_curri_delete.Enabled:=false;form1.sb_curri_save.Enabled:=true;form1.sb_curri_canel.Enabled:=true;end;if state = 'close'thenbeginform1.dbe_curri_name.Enabled:=false;form1.dbe_curri_xf.Enabled:=false;form1.sb_curri_insert.Enabled:=true;form1.sb_curri_edit.Enabled:=true;form1.sb_curri_delete.Enabled:=true;form1.sb_curri_save.Enabled:=false;form1.sb_curri_canel.Enabled:=false;end;end;//--------------------------------------------------// 功能描述: 设置班级管理表单的不同录入状态// 参数说明: state = 'open' 将表单设置为录入状态// state = 'close' 将表单设置为查看状态//--------------------------------------------------procedure TForm1.set_class_state(state:String);beginif state = 'open'thenbeginform1.dbe_class_name.Enabled:=true;form1.dbe_class_xf.Enabled:=true;form1.sb_class_insert.Enabled:=false;form1.sb_class_edit.Enabled:=false;form1.sb_class_delete.Enabled:=false;form1.sb_class_save.Enabled:=true;form1.sb_class_canel.Enabled:=true;end;if state = 'close'thenbeginform1.dbe_class_name.Enabled:=false;form1.dbe_class_xf.Enabled:=false;form1.sb_class_insert.Enabled:=true;form1.sb_class_edit.Enabled:=true;form1.sb_class_delete.Enabled:=true;form1.sb_class_save.Enabled:=false;form1.sb_class_canel.Enabled:=false;end;end;//--------------------------------------------------// 功能描述: 设置学生管理表单的不同录入状态// 参数说明: state = 'open' 将表单设置为录入状态// state = 'close' 将表单设置为查看状态//--------------------------------------------------procedure TForm1.set_student_state(state:String); beginif state = 'open'thenbeginform1.dbe_student_name.Enabled:=true;form1.dbe_student_yb.Enabled:=true;form1.dbe_student_no.Enabled:=true;form1.dbe_student_address.Enabled:=true;form1.dbcb_student_sex.Enabled:=true;form1.dbcb_student_class.Enabled:=true;form1.sb_student_insert.Enabled:=false;form1.sb_student_edit.Enabled:=false;form1.sb_student_delete.Enabled:=false;form1.sb_student_save.Enabled:=true;form1.sb_student_canel.Enabled:=true;end;if state = 'close'thenbeginform1.dbe_student_name.Enabled:=false;form1.dbe_student_yb.Enabled:=false;form1.dbe_student_no.Enabled:=false;form1.dbe_student_address.Enabled:=false;form1.dbcb_student_sex.Enabled:=false;form1.dbcb_student_class.Enabled:=false;form1.sb_student_insert.Enabled:=true;form1.sb_student_edit.Enabled:=true;form1.sb_student_delete.Enabled:=true;form1.sb_student_save.Enabled:=false;form1.sb_student_canel.Enabled:=false;end;end;//--------------------------------------------------// 功能描述: 设置成绩管理表单的不同录入状态// 参数说明: state = 'open' 将表单设置为录入状态// state = 'close' 将表单设置为查看状态//--------------------------------------------------procedure TForm1.set_cj_state(state:String);beginif state = 'open'thenbeginform1.dblcb_cj_name.Enabled:=true;form1.dbe_cj_xf.Enabled:=true;form1.dbcb_cj_bk.Enabled:=true;form1.sb_cj_insert.Enabled:=false;form1.sb_cj_edit.Enabled:=false;form1.sb_cj_delete.Enabled:=false;form1.sb_cj_save.Enabled:=true;form1.sb_cj_canel.Enabled:=true;end;if state = 'close'thenbeginform1.dblcb_cj_name.Enabled:=false;form1.dbe_cj_xf.Enabled:=false;form1.dbcb_cj_bk.Enabled:=false;form1.sb_cj_insert.Enabled:=true;form1.sb_cj_edit.Enabled:=true;form1.sb_cj_delete.Enabled:=true;form1.sb_cj_save.Enabled:=false;form1.sb_cj_canel.Enabled:=false;end;end;//---------------------------------// 功能描述: 进入课程修改模块//---------------------------------procedure TForm1.sb_curri_editClick(Sender: TObject);beginif dm.adot_curri.RecordCount>0 thenbegindm.adot_curri.Edit;form1.set_curri_state('open');end;end;//---------------------------------// 功能描述: 保存课程修改模块//---------------------------------procedure TForm1.sb_curri_saveClick(Sender: TObject);beginif form1.dbe_curri_name.Text = '' thenbeginapplication.MessageBox('请输入课程名称','提示信息',MB_OK);form1.dbe_curri_name.SetFocus;exit;end;if form1.dbe_curri_xf.Text = '' thenbeginapplication.MessageBox('请输入课程所占的学分','提示信息',MB_OK);form1.dbe_curri_xf.SetFocus;exit;end;trydm.adot_curri.Post;dm.adot_curri.UpdateRecord;dm.adot_curri.Refresh;exceptend;form1.set_curri_state('close');end;//---------------------------------// 功能描述: 放弃课程修改//---------------------------------procedure TForm1.sb_curri_canelClick(Sender: TObject);begintrydm.adot_curri.Cancel;dm.adot_curri.Refresh;form1.set_curri_state('close');exceptend;end;//---------------------------------// 功能描述: 进入课程删除模块//---------------------------------procedure TForm1.sb_curri_deleteClick(Sender: TObject);beginif dm.adot_curri.RecordCount>0 thenbeginif application.MessageBox('你确认要删除这门课程吗','警告信息',MB_YESNO)=ID_YES thenbegintrydm.adot_curri.Delete;dm.adot_curri.UpdateRecord;dm.adot_curri.Refresh;exceptend;end;end;end;//---------------------------------// 功能描述: 进入班级新增模块//---------------------------------procedure TForm1.sb_class_insertClick(Sender: TObject);begindm.adot_class.Insert;form1.set_class_state('open');end;//---------------------------------// 功能描述: 进入班级修改模块//---------------------------------procedure TForm1.sb_class_editClick(Sender: TObject);beginif dm.adot_class.RecordCount>0 thenbegindm.adot_class.Edit;form1.set_class_state('open');end;end;//---------------------------------// 功能描述: 进入班级删除模块//---------------------------------procedure TForm1.sb_class_deleteClick(Sender: TObject);beginif dm.adot_class.RecordCount>0 thenbeginif application.MessageBox('你确认要删除这个班级吗','警告信息',MB_YESNO)=ID_YES thenbegintrydm.adot_class.Delete;dm.adot_class.UpdateRecord;dm.adot_class.Refresh;exceptend;end;end;end;//---------------------------------// 功能描述: 放弃班级修改模块//---------------------------------procedure TForm1.sb_class_canelClick(Sender: TObject);begintrydm.adot_class.Cancel;dm.adot_class.Refresh;form1.set_class_state('close');exceptend;end;//---------------------------------// 功能描述: 保存班级修改//---------------------------------procedure TForm1.sb_class_saveClick(Sender: TObject);beginif form1.dbe_class_name.Text = '' thenbeginapplication.MessageBox('请输入班级名称','提示信息',MB_OK);form1.dbe_class_name.SetFocus;exit;end;if form1.dbe_class_xf.Text = '' thenbeginapplication.MessageBox('请输入毕业学分','提示信息',MB_OK);form1.dbe_class_xf.SetFocus;exit;end;trydm.adot_class.Post;dm.adot_class.UpdateRecord;dm.adot_class.Refresh;exceptend;form1.set_class_state('close');end;//---------------------------------// 功能描述: 进入学生删除模块//---------------------------------procedure TForm1.sb_student_deleteClick(Sender: TObject);beginif dm.adot_student.RecordCount>0 thenbeginif application.MessageBox('你确认要删除这个班级吗','警告信息',MB_YESNO)=ID_YESthenbegintrydm.adot_student.Delete;dm.adot_student.UpdateRecord;dm.adot_student.Refresh;exceptend;end;end;end;//---------------------------------// 功能描述: 进入学生新增模块//---------------------------------procedure TForm1.sb_student_insertClick(Sender: TObject);begindm.adot_student.Insert;form1.set_student_state('open');form1.dbe_student_no.SetFocus;end;//---------------------------------// 功能描述: 进入学生修改模块//---------------------------------procedure TForm1.sb_student_editClick(Sender: TObject);beginif dm.adot_student.RecordCount>0 thenbegindm.adot_student.Edit;form1.set_student_state('open');end;end;//---------------------------------// 功能描述: 进入学生修改模块//---------------------------------procedure TForm1.sb_student_saveClick(Sender: TObject);beginif form1.dbe_student_name.Text = '' thenbeginapplication.MessageBox('请输入学生姓名','提示信息',MB_OK);form1.dbe_student_name.SetFocus;exit;end;if form1.dbe_student_no.Text = '' thenbeginapplication.MessageBox('请输入学号,学号只能是唯一的','提示信息',MB_OK);form1.dbe_student_no.SetFocus;exit;end;if form1.dbcb_student_sex.Text = '' thenbeginapplication.MessageBox('请选择性别','提示信息',MB_OK);form1.dbcb_student_sex.SetFocus;exit;end;if form1.dbcb_student_class.Text = '' thenbeginapplication.MessageBox('请选择考生班级','提示信息',MB_OK);form1.dbcb_student_class.SetFocus;exit;end;trydm.adot_student.Post;dm.adot_student.UpdateRecord;dm.adot_student.Refresh;exceptend;form1.set_student_state('close');end;//---------------------------------// 功能描述: 进入学生查询模块//---------------------------------procedure TForm1.sb_student_searchClick(Sender: TObject);beginif form1.ed_student_search.Text = '' thenbeginapplication.MessageBox('请输入查询的学号','提示信息',MB_OK);form1.ed_student_search.SetFocus;exit;end;trydm.adot_student.Locate('学号;姓名',V arArrayOf([form1.ed_student_search.Text]),[loPartialKey]);exceptend;end;//---------------------------------// 功能描述: 退出系统模块//---------------------------------procedure TForm1.N3Click(Sender: TObject);beginclose;end;//---------------------------------// 功能描述: 提醒是否退出系统模块//---------------------------------procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);beginCanClose:=false;if application.MessageBox('你确定要退出吗?','提示信息',MB_YESNO)=ID_YES thenbeginCanClose:=true;end;end;//---------------------------------// 功能描述: 放弃学生修改模块//---------------------------------procedure TForm1.sb_student_canelClick(Sender: TObject);beginform1.set_student_state('close');end;//---------------------------------// 功能描述: 进入成绩新增模块//---------------------------------procedure TForm1.sb_cj_insertClick(Sender: TObject);begindm.adot_cj.Insert;dm.adot_cj.FieldV alues['学号']:=dm.adot_student.FieldV alues['学号'];dm.adot_cj.FieldV alues['班级']:=dm.adot_student.FieldV alues['班级名称'];form1.set_cj_state('open');form1.dblcb_cj_name.SetFocus;end;//---------------------------------// 功能描述: 进入成绩修改模块//---------------------------------procedure TForm1.sb_cj_editClick(Sender: TObject);beginif dm.adot_cj.RecordCount>0 thenbegindm.adot_cj.Edit;form1.set_cj_state('open');end;end;//---------------------------------// 功能描述: 进入成绩删除模块//---------------------------------procedure TForm1.sb_cj_deleteClick(Sender: TObject);beginif dm.adot_cj.RecordCount>0 thenbeginif application.MessageBox('你确认要删除这项成绩吗','警告信息',MB_YESNO)=ID_YES thenbegintrydm.adot_cj.Delete;dm.adot_cj.UpdateRecord;dm.adot_cj.Refresh;exceptend;end;end;end;//---------------------------------// 功能描述: 保存成绩修改模块//---------------------------------procedure TForm1.sb_cj_saveClick(Sender: TObject);beginif form1.dblcb_cj_name.Text = '' thenbeginapplication.MessageBox('请选择课程名称','提示信息',MB_OK);form1.dblcb_cj_name.SetFocus;exit;end;if form1.dbe_cj_xf.Text = '' thenbeginapplication.MessageBox('请输入课程所得的学分','提示信息',MB_OK);form1.dbe_cj_xf.SetFocus;exit;end;if form1.dbcb_cj_bk.Text = '' thenbeginapplication.MessageBox('请选择是否需要补考','提示信息',MB_OK);form1.dbcb_cj_bk.SetFocus;exit;end;trydm.adot_cj.Post;dm.adot_cj.UpdateRecord;dm.adot_cj.Refresh;exceptend;form1.set_cj_state('close');end;//---------------------------------// 功能描述: 放弃成绩修改//---------------------------------procedure TForm1.sb_cj_canelClick(Sender: TObject);beginform1.set_cj_state('close');end;//---------------------------------// 功能描述: 打开学生管理//---------------------------------procedure TForm1.ToolButton9Click(Sender: TObject); beginform1.ts_student.Show;end;//---------------------------------// 功能描述: 打开成绩管理//---------------------------------procedure TForm1.ToolButton2Click(Sender: TObject); beginform1.ts_cj.Show;end;//---------------------------------// 功能描述: 打开系统设置//---------------------------------procedure TForm1.ToolButton7Click(Sender: TObject); beginform1.ts_sm.Show;end;//---------------------------------// 功能描述: 预览学生资料报表//---------------------------------procedure TForm1.N4Click(Sender: TObject);begin//ts_bb1.Show;//form_bb_1.ShowModal;form_bb_1.ADODataSet1.Refresh;form_bb_1.QuickRep1.PreviewModal;end;//---------------------------------// 功能描述: 预览学生成绩报表//---------------------------------procedure TForm1.N5Click(Sender: TObject);beginform_bb_2.ADODataSet1.Refresh;form_bb_2.QuickRep1.PreviewModal;end;//---------------------------------// 功能描述: 退出系统//---------------------------------procedure TForm1.ToolButton6Click(Sender: TObject);beginclose;end;//---------------------------------// 功能描述: 关于..//---------------------------------procedure TForm1.N2Click(Sender: TObject);beginform1.ts_about.Show;aboutbox.ShowModal;end;//---------------------------------// 功能描述: 学生管理中,按班级检索学生//---------------------------------procedure TForm1.DBLookupListBox1Click(Sender: TObject);beginif dblookuplistbox1.SelectedItem <> '' thenbegintrydm.adot_student.Close;dm.adot_mandText:='select * from 学生where 班级名称= '''+ dblookuplistbox1.SelectedItem + '''';dm.adot_student.Open;exceptend;end;end;//---------------------------------// 功能描述: 显示所有的学生//---------------------------------procedure TForm1.Panel3Click(Sender: TObject);begintrydm.adot_student.Close;dm.adot_mandText:='select * from 学生';dm.adot_student.Open;exceptend;end;//---------------------------------// 功能描述: 成绩管理中,按班级检索学生//---------------------------------procedure TForm1.DBLookupListBox2Click(Sender: TObject);beginif dblookuplistbox2.SelectedItem <> '' thenbegintrydm.adot_student.Close;dm.adot_mandText:='select * from 学生where 班级名称= '''+ dblookuplistbox2.SelectedItem + '''';dm.adot_student.Open;dm.adot_cj.Close;dm.adot_mandText:='select * from 成绩where 班级= '''+ dblookuplistbox2.SelectedItem + '''';dm.adot_cj.Open;exceptend;end;end;//---------------------------------// 功能描述: 成绩管理中,按学生检索成绩//---------------------------------procedure TForm1.DBGrid5DblClick(Sender: TObject);beginif dm.adot_student.RecordCount>0 thenbegintrydm.adot_cj.Close;dm.adot_mandText:='select * from 成绩where 学号= '''+ dm.adot_student.FieldV alues['学号'] + '''';dm.adot_cj.Open;exceptend;end;end;end.第九章参考文献Delphi7 开发人员指南作者:(美)Steve Teixeira定价:¥138.0出版社:机械工业出版社出版日期:2000-07-01Delphi 7入门与提高作者:东方人华吕伟臣定价:¥46.0出版社:清华大学出版社出版日期:2003-06-01UML与Rational Rose 2002从入门到精通作者:(美)Wendy Boggs Michael Boggs定价:¥50.0出版社:电子工业出版社出版日期:2002-07-01马上学会Access2002作者:江高举刘致仪定价:¥27.0出版社:中国铁道出版社出版日期:2001-09-01中文版Access 2000应用及实例集锦作者:毛一心定价:¥44.0出版社:人民邮电出版社出版日期:2002-06-01。
目录目录........................................... 错误!未指定书签。
第一章:绪论1.1课题背景管理信息系统(ManagementInformationSystem),在强调管理,强调信息的现代社会中它变得越来越普及。
MIS是一门新的学科,它跨越了若干个领域,比如管理科学、系统科学,运筹学、统计学以及计算机科学。
在这些学科的基础上,形成信息收集和加工的方法,从而形成一个纵横交织的系统。
1.1.1管理信息系统的发展历史信息作为生产力中最活跃的因素,很早就在人类经济生活中发挥着不可替代的作用,但把信息纳入企业经营管理系统中高效处理和应用是在计算机发明以后的50年代末。
目前人们所提到的管理信息系统,通常是指以计算机为工具,对管理信息进行收集、存贮、检索、加工和传递,使其应用于组织机构及企业管理领域的“人-机系统”,该系统是70年代初“后工业经济”时代的产物,在企业管理信息系统在其发展的初期,是单一的人—机系统,系统功能简单,效率低,对管理的作用有限。
进入20世纪80年代末,随着计算机网络和通信技术的大力发展,企业管理信息系统进入网络化的发展时期。
世界发达国家已建立起了完善的先进的管理信息系统体系,在其社会经济发展领域中发挥着巨大的作用。
管理信息系统的开发方式管理信息系统的开发方式主要有独立开发方式、委托开发方式、合作开发方式、购买现成软件方式等4种。
这4种开发方式各有优点和不足,需要根据使用单位的技术力量、资金情况、外部环境等各种因素进行综合考虑和选择。
不论哪种开放方式都需要有单位的领导和业务人员参加,并在管理信息系统的整个开发过程中培养、锻炼、壮大该系统的维护队伍。
1.2课题研究的目的与意义信息社会的高科技,商品经济化的高效益,使计算机的应用已普及到经济和社会生活的各个领域。
计算机虽然与人类的关系愈来愈密切,还有人由于计算机操作不方便继续用手工劳动。
为了适应现代社会人们高度强烈的时间观念,宾馆管理系统软件为管理人员带来了极大的方便。
摘要数据库系统是计算机应用领域中使用最广泛的技术之一,它为我们提供了一种把与我们的工作和生活紧密相关的信息集合在一起的方法,还有在某个集中的地方存储和维护这些信息的方法。
数据库应用系统的开发是Delphi程序设计的重要组成部分,在Delphi中创建数据库程序,其过程和方法如同创建其他类型的Delphi应用程序一样简单、快捷。
而Microsoft SQL Server 2000是一个面向二十一世纪的高性能的关系型数据库管理系统,是微软.NET战略的重要一环。
在此的“人事管理系统”,是基于C/S(客户机/服务器)开发模式,用SQL Server 2000作为数据库开发平台,以Delphi为访问程序开发工具,利用面向对象编程的先进方法,开发的一个实用程序。
企业人事管理系统主要用于员工个人资料的录入、职务变动的记录和管理。
使用人事管理系统,便于公司领导掌握人员的动向,及时调整人才的分配,以获取最大的经济效益。
本文具体阐述了本应用系统的开发工具、开发思想和开发方法。
有不足之处,请多多见谅。
【关键词】数据库系统数据库管理系统人事管理系统【论文类型】应用研究Personnel Management System Edited In Delphi6ABSTRACT Database system, which supplies not only a kind of way we organize the information that have something to do between our work and our daily lives but a certain way we store and maintain those information in one position, has been considered the one of the most widely used technologies in the field of computer application. The research to the database application is an essential proportion of the Delphi program design, as the period of the initialing other type of Delphi program, it is also very simple and swift to do the same with database application. However Microsoft SQL Server 2000is the advanced relation database management system oriented to the 21 century, which seems to be the important chain for the Microsoft “.NET”program. Personnel management system that I‟ve been working at is such a practical application which is based on the CS (client /server)design pattern, with Delphi as its designing language.The corporation personnel management system is mainly used for storing employee…s personal files, conversion and management for the change of the positions. It is so convenient for the boss to control the personnel case that he can make adjustment in time to max the profit.The article talks about the tools, methods, and way of designing. There must be mistakes, thanks for reading.【Key words】Database System Database management SystemPersonnel Management System【Type of Thesis】Applied Research摘要 (1)第1章 Delphi数据库编程 (5)1.1 Delphi的数据库特性和功能简介 (5)1.1.1 Delphi的数据库特性 (6)1.1.2 Delphi可以访问的数据源(DataSource) (7)1.2 数据访问部件 (7)1.3 数据控制部件 (9)1.4 数据库访问技术 (10)第2章人事管理系统的总体分析与设计 (12)2.1 系统功能分析 (12)2.2 系统功能模块的设计 (12)2.3 数据库设计 (13)2.3.1 数据库需求分析 (13)2.3.2 数据库概念结构设计 (14)2.3.3 数据库逻辑设计 (14)第3章数据库的建立 (16)3.1 SQL Server 简介 (16)3.2 创建数据库 (17)3.3 SQL Server 2000 数据库表的创建和管理 (18)3.4 连接ODBC数据源 (21)第4章系统各功能模块设计 (24)4.1 主窗口的创建 (24)4.1.1 菜单的创建 (24)4.1.2 设置菜单主要属性 (24)4.1.3 给主窗口添加图像 (25)4.1.4 添加代码 (26)4.2 系统登录窗口的创建 (27)4.2.1. 系统登录窗口的窗体设计 (27)4.2.2 系统登录窗口的代码设计 (28)4.3 增加新员工模块的实现 (29)4.3.1 增加新员工模块的窗体设计 (29)4.3.2 增加新员工窗口的代码设计 (31)4.4 人事变动模块的实现 (32)4.4.1 人事变动窗口的窗体设计 (32)4.4.2 人事变动窗口的代码设计 (34)4.5 简单查询模块的创建 (35)4.5.1 简单查询模块的窗体设计 (35)4.5.2 简单查询窗口的代码设计 (36)4.6 模糊查询模块的创建 (37)4.6.1 模糊查询窗口的窗体设计 (37)4.6.2 模糊查询窗口的代码设计 (38)4.7 员工信息修改模块的实现 (40)4.7.1 员工信息修改窗口的窗体设计 (40)4.7.2 员工信息修改的代码设计 (42)4.8 员工信息删除模块的实现 (43)4.9 关于窗口的创建 (43)第5章系统的调试和运行 (44)结束语 (45)第1章 Delphi数据库编程1.1 Delphi的数据库特性和功能简介计算机软件的开发分为两个不同的体系,其中一个体系是使用传统的程序设计语言(如Pascal、Basic和C等)开发数据控制、数值运算等软件,围绕它们的重点是算术、数据结构以及今年产生的面向对象技术。
2.1系统需求和功能设计一个人事管理系统,使系统满足以下需求和功能1)根据企业人事管理的需要,对企业以及企业中员工的信息进行添假删除等操作,并能对人事档案进行浏览,对人事资料进行查询,对人事资料进行统计。
为企业的人事管理提供一个便利的管理系统。
2)、系统功能包括:a系统管理(设置用户和退出系统)。
b基础数据管理(民族档案设置,职工类型设置,文化程度设置,政治面貌设置,部门类别设置,工资类别设置,职称类别设置,职务类别设置)。
c人事档案管理(人事档案浏览,人事资料查询,人事资料统计)。
数据库管理(数据库的备份与恢复)。
2.2.2数据结构1)数据结构名称:用户名和密码信息组成:用户名,密码,是否管理员2)数据结构名称:民族档案设置组成:民族编号,民族名称3)数据结构名称:职工类型设置组成:职工类型编号,职工类型名称4)数据结构名称:文化程度设置组成:文化程度编号,文化程度名称。
5)数据结构名称:政治面貌设置组成:政治面貌编号,政治面貌名称6)数据结构名称:部门类别设置组成:部门类别编号,部门类别名称7)数据结构名称:工资类型设置组成:工资类型编号,工资类型名称8)数据结构名称:职称类别设置组成:职称类别编号,职称类别名称。
9)数据结构名称:职务类别设置组成:职务类别编号,职务类别名称10)数据结构名称:职工信息组成:职工编号,职工性别,职工年龄,民族,婚姻状况,家庭电话,电子邮箱,手机,籍贯,地址,毕业学校,职称,入职时间,职称类别,部门类别,职务类别。
11)数据结构名称:职工的家庭成员组成:编号,员工号,成员姓名,关系,出生日期,工作单位,担任职务,政治面貌3.设计方法和步骤采用自底而上的设计方法。
先自顶向下地进行需求分析,对人事管理系统的需求进行逐步细化;然后再自底而上地设计概念结构,最终将各个局部应用的概念结构集合成为全局概念结构。
3.2系统数据流程图或E-R图通过对局部应用的选择,逐一设计出分E-R图,并对各个分E-R图进行合并,生成初步E-R图,消除不必要的系统冗余,可以得出以下人事管理系统E-R图。
**学院毕业设计(论文)基于ACCES高校人事管理系统姓名:指导教师:专业名称:所在系部:20世纪以来,社会生产力迅速发展,科学技术突飞猛进,人们进行信息交流的深度与广度不断增加,信息量急剧增长,传统的信息处理与决策的手段已经不能使用社会的需要,信息的重要性和信息处理问题的紧迫性空前提高了,面对着日益复杂和不断发展,变化的社会环境,特别是企业间日趋激烈的竞争形势,我们需要开发和收集新的信息工具。
对于一个学校,大量教师信息难以通过传统的方法进行管理,这就迫切需要利用计算机来帮助学校管理者来处理教师信息的日常管理,教师管理系统是管理系统的一个典型用例!管理信息系统是一个集信息技术,经济管理理论,统计学与运筹学,数据库技术为一体的综合性系统,是一个资金技术密集型,劳动密集型、智力密集型的项目。
我国拥有广阔的市场和丰富的人才资源,有几十年的技术积累和经验积累,有一定的后发优势。
管理信息系统的创新工作既不能妄自菲薄,更不能夜郎自大,要抓住当前网络经济掀起的有利时机,以实现我国信息技术和信息产业的跨越式发展,更好的发挥信息产业对国民经济增长的拉动作用。
关键字:发展科技信息积累AbstractSince the 20th cen tury, the rapid develop of social productive forces, scie nee and tech no logy, excha nge of in formati on is the depth and scope of in creas ing the volume of information rapid growth, the traditional information processing and decision-making tools have not the needs of the community, the importanee of information and information processing problems urgency unprecedentedin crease in the face of in creas in gly kee n competiti on among en terprises situation a pers ona or an en terprise to survive in moder n society ,and developme nt ,we must have sufficie nt in formatio n and powerful in formati on gatheri ng and process ing tools For a school, a lot of information to teachers through tradition means; This urge nt n eed for using computer tech no logy to help school man agers to deal with the day-to-day man ageme nt of in formatio n systems cases.Man ageme nt In formatio n System is a collectio n of in formatio n tech no logy, econo mic man ageme nt theory, statistics and research, dates in tegrati on tech no logy for the in tegrated system is a capital-a nd tech no logy-i nten sive and labor- in ten sive, in tellectual-inten sive project, Chi na has a vast market and abundant huma n resources tech ni cal accumulati on and decades of accumulated experie nee, a certa in adva ntages, MIS innovation can not sell, not self- astray, We should seize the current favorable opport un ity to n etwork economy. Chin a's in formati on tech no logy and to achieve a leap forward of the information industry, give berries play to the information in dustry to stimulate econo mic growth.Keywords: develop tech no logy in formatio n gatheri ng目录摘要.................................................................... 2.. ABSTRACT ............................................................................................................. 3.. 第1章前言.............................................................. 5..1.1课题目的与意义 (5)1.2国内外研究现状 (5)1.3研究内容 (6)第2章系统开发相关技术及工具............................................ 7.2.1 ACCESS (7)2.2. Visual Basic 简介 (8)第3章系统需求分析...................................................... 9.3.1项目背景 (9)3.2任务概述 (9)3.3可行性分析 (10)第4章系统概要设计 (1)14.1 系统结构描述 (11)4.2系统各功能模块 (13)4.2.1登录启动模块 (13)4.2.2登录界面模块 (14)第5章系统详细设计..................................................... 1.65.1系统建立 (16)5.1.1管理信息系统的发展简介 (16)5.1.2系统数据库的发展简介 (17)5.1.3 E-R 图 (18)5.2数据库访问技术 (18)5.3 程序部分代码 (20)5.3.1登录代码实现 (20)5.3.2密码修改代码实现 (20)第6章结论 (22)参考文献 (22)致谢 (23)第1章前言1.1课题目的与意义在企业向网络时代的转变过程中,如何实现信息管理的数字化、网络化已成为各个部门急待解决的关键问题。
Delphi的人事管理系统的设计
Delphi的人事管理系统的设计本结构的优点在于:
(1)系统构造灵活本系统软硬件平台独立,客户机的平台可以是各种档次的微机。
用户以往对系统的投资,包括软、硬件及网络设备都可以驻留在新客户/服务器系统中。
(2)数据存放灵活系统中的数据除可驻留在服务器上之外,对于客户端频繁使用的非共享数据也可作为本地数据库驻留在客户端。
(3)集中式数据监控管理存放在服务器中的共享数据由数据库服务器对他们进行统一管理,容易保证数据的安全性、一致性和完整性。
(4)扩充升级方便灵活客户/服务器结构的扩充升级可通过增加计算机扩充前台应用程度的功能来实现。
本系统这种前后台任务分离的结构使得前台的应用程序不依赖于后台的软硬件平台。
随着管理水平和计算机技术的不断发展,系统功能必将逐步提高,系统可随之不断扩充和升级。
(5)开放式平台开放式平台有利于加速系统的开发,服务器数据库拥有强大的数据管理功能,开发者可在前台利用各种基于图形的开发工具进行应用程序的开发。
[2]
1.2 功能需求
要求系统具有以下功能:
A 具有良好的操作界面。
B 人事档案模块能够自由增加、修改及删除信息。
C 建立数据库备份机制,并提供数据发恢复功能。
D 支持数据的模糊查询机制。
E 自动计算员工工资,并自动生成员工工资报表。
F 实现员工岗位调动操作、员工离职和复职操作。
G 系统退出。
1.3 系统的运行需求。
毕业设计(论文)—基于delphi企业人事管理系统中文摘要摘要企业人事管理系统主要是为了企业管理者能够更好的管理人力资源与合同信息而开发的管理软件,本系统主要适用于中小型企业的管理人员,根据中小型企业的人事管理需求,该系统采用模块化开发,主要包括了员工信息管理、部门管理、工资信息管理,应聘信息管理等模块。
其中,员工信息管理模块主要实现新员工登记、员工信息浏览、员工离职与调动;部门管理是添加与删除部门;工资信息管理是对员工工资的记录,包括奖励与处罚,个税等项目.应聘信息管理是为了管理应聘人员的基本信息。
本文首先阐述了该系统的开发背景、意义;其次介绍了相关的开发工具及技术基础;接着对系统的需求进行了分析,并提出了具体的设计方案和数据库模型;然后展现了整个系统的具体实现,包括数据库的设计和连接,各功能模块的实现;最后对该软件进行了严格的测试。
系统采用Delphi 7。
0作开发平台,SQL Server 2000作数据库管理系统,采用ADO数据访问方式。
系统符合中小型企业人事管理的要求,能够帮助其切实提高工作效率.关键词:人事管理,Delphi7.0,SQL server 2000,ADO- I -英文摘要AbstractPersonnel management system is a developed management software mainly for corporate managers to better manage human resources andcontracts information management, the system is mainly applicable to managers of medium-sized and small enterprises。
The system uses modular development to satisfy the Personnel management needs。
人事资源管理系统摘要人力资源管理系统是一个典型的信息管理系统MIS,本系统是一个为适应当前各个行业对人力资源信息管理的迫切需求而设计开发的软件系统,其开发主要包括后台数据库的建立和维护以及前端应用程序的开发两个方面,经过分析和比较,我们决定使用VFP 数据库开发工具,利用其提供的各种面向对象的开发手段,尤其是数据窗口这一能方便而简洁操纵数据库的智能化对象首先在短时间内建立系统应用原型,然后,对初始原型系统进行需求迭代,不断修正和改进直到形成用户满意的可行系统。
经过分析如此情况我们使用Visual Basic 数据库等开发工具利用其提供的各种面向对象的开发工具尤其是数据窗口这一能方便而简洁操纵数据库的智能化对象首先在短时间内建立系统应用原型然后对初始原型系统进行需求迭代不断修正和改进直到形成用户满意的可行系统.关键词:信息管理、人事管理、人事管理系统Summary Buying and selling management system is development two aspects that typicalinformation management system MIS its development includes primarily thebackstage database establishes with support and the head applies the developmenttwo aspects of the procedure.Establish the data consistency to the former requestis strong with the complete the that data safety good database.But request thelatter very much the applied procedure functioncomplete easy usage etc.characteristics. Through the analysis such circumstance we use the DELPHI databaseetc.development tool make use of its every kind of the tool of development that providethat face to the object particularly is intelligence that data window way this oncanning be convenient but Chiens manipulates the database turn the objectestablish in the in a short time first system application prototype then startto the beginning prototype system proceeding need on behalf revise continuouslywith improve really arrive to become the customer satisfied can A system. 目录第一章概述--------------------------------------------------31、本课题的来源-------------------------------------------32、本论文的目的、内容及作者主要贡献-----------------------3第二章开好发工具的选择-----------------------------------4第三章系统调研及可行性分析------------------------------81、系统调研-----------------------------------------------------82、可靠性分析概述----------------------------------------------83、技术可行性分析----------------------------------------------9第四章系统分析---------------------------------------------111、系统需求分析-------------------------------------------112、数据流程图---------------------------------------------11第五章系统总体设计--------------------------------------121、功能描述----------------------------------------------122、系统操作流程图----------------------------------------13第六章系统详细设计--------------------------------------141、数据库设计--------------------------------------------142、系统主要界面------------------------------------------15第七章系统测试--------------------------------------------181、测试举例----------------------------------------------182、测试项目----------------------------------------------193、测试方法----------------------------------------------20致谢---------------------------------------------------21参考文献------------------------------------------------------22 第一章概述1、本课题的来源随着计算机技术的飞速发展,计算机在企业管理中应用的普及,利用计算机实现企业人事管理势在必行。
摘要人力资源管理系统是一个典型的信息管理系统(MIS),本系统是一个为适应当前各个行业对人力资源信息管理的迫切需求而设计开发的软件系统,其开发主要包括后台数据库的建立和维护以及前端应用程序的开发两个方面,经过分析和比较,我们决定使用VFP数据库开发工具,利用其提供的各种面向对象的开发手段,尤其是数据窗口这一能方便而简洁操纵数据库的智能化对象,首先在短时间内建立系统应用原型,然后,对初始原型系统进行需求迭代,不断修正和改进直到形成用户满意的可行系统。
经过分析如此情况,我们使用DELPHI ,数据库等开发工具,利用其提供的各种面向对象的开发工具,尤其是数据窗口这一能方便而简洁操纵数据库的智能化对象,首先在短时间内建立系统应用原型,然后,对初始原型系统进行需求迭代,不断修正和改进,直到形成用户满意的可行系统.关键词:原型法,面向对象,数据一致性,数据窗口,人才管理系统。
SummaryBuying and selling management system is development two aspects that typical information management system( MIS), its development includes primarily the backstage database establishes with support and the head applies the development two aspects of the procedure.Establish the data consistency to the former request is strong with the complete, the that data safety good database.But request the latter very much the applied procedure function complete, easy usage etc. characteristics.Through the analysis such circumstance, we use the DELPHI, database etc. development tool, make use of its every kind of the tool of development that provide that face to the object, particularly is intelligence that data window way this on canning be convenient but Chien's manipulates the database turn the object, establish in the in a short time first system application prototype, then, start to the beginning prototype system proceeding need on behalf, revise continuously with improve, really arrive to become the customer satisfied can A system.Key phrase:Prototype method, face to the object, data consistency, data window way, information management system, buying and selling management system。
目录摘要前言第一章为什么要开发一个人事管理系统?1.1用计算机管理人事的意义第二章人事管理系统编程环境现状及设计目标简介2.1 Delphi和ADO2.2 sql介绍第三章关键问题:使用关系型数据库3.1 数据库的概念3.2 新建一个数据库第四章系统总体规划4.1 系统功能第五章系统具体实现5.1 用户界面的实现5.1.1 登陆界面5.1.2 主界面5.1.3 各项功能界面5.2 数据库的实现5.2.1 用户库5.2.2 人事数据库5.2.3 考勤库5.3 与DELPHI的连接第六章性能测试与分析第七章结束语致谢主要参考文献人事档案管理系统是典型的信息管理系统,其开发主要包括后台数据库的建立和维护以及前端应用程序的开发两个方面。
对于前者要求建立起数据一致性和完整性强、数据安全性好的库。
而对于后者则要求应用程序功能完备,易使用等特点。
随着科学技术的不断提高,计算机科学日渐成熟,其强大的功能已为人们深刻认识,它已进入人类社会的各个领域并发挥着越来越重要的作用。
DELPHI是面向对象的开发工具,尤其是数据窗口这一能方便而简洁操纵数据库的智能化对象,首先在短时间内建立系统应用原型,然后,不断修正和改进,直到形成用户满意的可行系统。
关键字:控件、窗体、表。
对于大多数国企而言,他们有一套比较系统的人力资源管理理念,并建立了一整套比较规范的人力资源管理方法。
在积极建立企业现代企业管理机制的今天,仅仅靠原始的手工管理或简单的单机管理,人力资源部门面对大量的信息,无法有效率地将其中的重要部分提取出来,并做出相应的判断和处理。
集团管理者的决策只能依据报表数据,在浪费大量人力、物力的同时无法做到实时监控,难以保证数据的准确性和及时性。
因此,先进的管理思想在企业中实现就成为了一个可望而不可及的目标。
作为计算机应用的一部分,使用计算机对人事进行管理,具有着手工管理所无法比拟的优点.例如:检索迅速、查找方便、可靠性高、存储量大、保密性好、寿命长、成本低等。
这些优点能够极大地提高商场人事管理的效率,也是科学化、正规化管理的重要条件。
因此,开发这样一套管理软件成为很有必要的事情,在下面的各章中我们将以开发一套人事管理系统为例,谈谈其开发过程和所涉及到的问题及解决方法。
第一章为什么要开发一个人事管理系统?计算机已经成为我们学习和工作的得力助手:人力资源系统选型时提出了以下要求:1).具有先进的人力资源管理理念;2).可以满足多行业、多公司不同的人力资源管理要求;3).实现集团化管理,实时监控各个专业、省市子公司的人力资源情况; 4).进行多层次数据汇总,为各层次管理者的决策分析提供数据;5).具有完整的系统接口,满足灵活的数据导入与导出。
第二章人事管理系统编程环境现状及设计目标简介2.1 Delphi和ADOActive Data Objects结合了OLE DB的普遍性质—那就是在诸如RDO和DAO模型中可以找到的易于使用的特性.ADO包含了所有可以被OLE DB标准接口描述的数据类型.换而言之,ADO是可扩充的,不需要对你的部件做任何工作.数据的访问和操纵是任何实际的应用程序的一个固有部分.对于数据来说,无论它是否是关系型的,无论它是否存在一个DBMS,也无论它的存储平台是什么,数据就是数据—一个文件没有必要一定是给定的二进制格式.开发者群体需要具有简单接口的现代的开发工具以快速访问数据.微软对此问题的回答是Universal Data Access(UDA通用数据访问)体系结构,对此,Stephen Rauch的文章“Manage Data from MyriadSources with the Universal Data Access Interface s”中有详细的阐述(MSJ,1997年9月).简单的说,UDA是一种将OLE DB应用于实际的理论.所有的都被指向一个数据源—一个电子表格,一条电子邮件消息,或一份AS/400文档—由OLE DB接口过滤并以一种通用的格式表示,这样应用程序能总是以同样的方式对数据进行访问.位于OLE DB上的并处理来自应用程序的调用的中间层被称作Active Data Objects (ADO).它是编写针对带有OLE DB提供者的任何类型的数据源的推荐标准.在ADO之前的RDO是一种增加DAO的客户/服务器能力,以提高其性能和可扩充性的当然的方法.根本上说来, RDO是一种位于ODBC API的上层的简便的封装.它揭示了了DAO数据对象模型中的许多东西,但它缺乏进行数据访问的Jet引擎.虽然这将予ADO更快的速度,但它没法利用该引擎的许多特性,而且它只能访问关系型的数据库.ADO 2.0的思想就在于:为不同的应用程序访问相同的数据源创建一个更高层的公用层.尽管存在数据结构和组织间的物理位置的不同,编程的接口应该是一样的.为了找出RDO 和ADO之间的更多的不同,“ExploringActiveX Data Objects from an RDO Point of View,"你能在MSDN的技术性文章部分中找到它.ADO的出现并不意味着RDO的结束.实际上,微软承诺在可以预见的将来继续支持RDOADO 2.0有什么新特点?对于ADO1.5以前包括1.5的版本来说,从功能的角度来看RDO和ADO不是完全相等的.等同就意味着你可以通过这两种方法解决同样的问题;它不是指存在重命名的或者优化的功能相同的对象.因此,移植到ADO不是一个简单的事情.从另一方面来说,一旦你熟练掌握了RDO或DAO技术的话,学习ADO是件相当容易的事情ADO 2.0的新特性包括事件处理,记录集的延续,分层目录结构指针和数据成形,分布式事务处理,多维数据,远程数据服务(RDS),以及对C++和Java的支持的增强.在钻研一些Visual Basic代码的时候将会见到所有的这些特性.ADO对象模型是由相对数量较少的对象组成.不象RDO对象模型,每个主要的ADO对象都能被个别的被创建.这就意味着,举例说吧,你不需要在创建有效的记录集对象前创建一个连接.Dim cn As New ADODB.ConnectionDim rs As New ADODB.Recordsetcn.Open "Biblio"rs.Open "select * from titles where title like '%h'", cnADO 2.0对象是Connection,Command,Parameter,Recordset,Field,Error和Property.ADO对象模型也包括四个类集:它们分别是一套相关的Error,Parameter,Property和Field对象.让我们来看看每个对象的主要特性.Connection对象提供连接,该连接连接的程序中存有它正在访问的数据源.属性允许你定义:连接串,命令执行以及连接启动的间隔时间,数据提供者,(无论临时表位置是应该在客户端还是在服务器端),和对于数据的访问权限.方法有关于如下功能的:执行命令,打开和关闭一个连接和管理事务.在许多地方你可以指定你想使用的提供者:通过Provider属性,在连接字符串中,或者甚至通过Open方法.选择你最喜欢的实现方式,但要保证你没有为同样的连接指定多个的提供者.缺省的提供者(当你没有指定你自己的提供者的情况下)是MSDASQL,针对ODBC的Microsoft OLE DB 提供者.Command对象定义了一个SQL声明,一个存储过程,或任何其他的你可能想让提供者执行的关于数据的操作.Command的属性有:当前连接,最大允许执行时间和参数集.一个参数就是你将它作为参数传递给命令的值.在这些属性中用以区分一个参数的属性有:方向(输入,输出,或者两者都有),类型当然还有它们的值.记录集对象也许是最典型的ADO对象,然而它是最复杂的当中的一个.它表示命令执行的结果,并且它大多是以数据库的记录集的形式给出.一个记录集是由以行和域的形式表示的信息组成.它不一定非要映射成关系型数据库的记录.实际上,如同我早些时候解释的那样,ADO是基于OLE DB并且能被用来可视化地访问任何数据源中的数据,这数据源包括非关系型的数据库.记录集提供了缓冲能力,它接受数据的变化,并且将这些变化以批处理的方式传给服务器.你可以浏览并对记录集的内容分类,如同列举和提取行.你也能通过如:删除,添加和刷新操作等任何方式修改数据.记录集存在跟连接的严格的关系,但是这不意味着你总是需要一个打开的连接来获得一个记录集.你也可以按如下方式进行:Dim RS As New ADODB.Recordsetsql = "select * from authors"RS.Open sql, "Pubs"既然Connection实际上是数据和命令传送的通道,所以该对象仍然被创建了,除了一个名字叫做Recordset.ActiveConnection的属性外,它是不可见的并工作在后台.Field对象是一列同类的数据.它提供了一种这样的编程接口,即能让你可以对单个单元的值以及基本的特征如:类型和大小进行读和写.所有给定记录集的Field对象形成了一个Field集.如我将在后面向你说明的, Fields集隐藏着一个引人注目的特性,它将再次证明Recordset对象的灵活性.最后是Property对象.每个对象都有属性.提供的使用了ADO的对象可能是各种各样的.但不存在这样一套属性即包含了所有可能的OLE DB 提供者的静态的属性.因此,任何一个ADO对象都有静态和动态的属性.第一套属性集:包括Name,Type,Value和Attributes,都可以通过如下的语法来访问:obj.PropertyName最开始的三个属性都是自我说明性的.Attributes是一种数字式的描述符,它是以按位的跟提供者的能力有关的一些预定义的属性组合.(它类似于COM服务器的组件分类).动态属性是跟潜在的提供者类型相应的.它们被归进Properties集合,并可以通过名字查询. obj.Properties("propName")The New Recordset Object2.2 sql介绍通过SQL命令,程序设计师或数据库管理员(DBA)可以:(一)建立数据库的表格。
(包括设置表格所可以使用之空间)(二)改变数据库系统环境设置。
(三)针对某个数据库或表格,授予用户存取权限。
(四)对数据库表格建立索引值。
(五)修改数据库表格结构。
(新建、删除或是修改表格字段)(六)对数据库进行数据的新建。