培训管理系统.docx
- 文档编号:1223329
- 上传时间:2023-04-30
- 格式:DOCX
- 页数:44
- 大小:283.48KB
培训管理系统.docx
《培训管理系统.docx》由会员分享,可在线阅读,更多相关《培训管理系统.docx(44页珍藏版)》请在冰点文库上搜索。
培训管理系统
Abstract
theAlongwiththerapiddevelopmentofcomputertechnology,computertechnologyextensivemomentsshouldbemovingorfutureinaffectsusordinarylife,althoughpeopledon'treallyunderstandthecomputertechnology,buttheirlifehasiscloselyrelatedwithit,computertechnologynotonlyaffectspeople'slife,andawiderrangeofaffectingourenterprisecompany,theyobtainedbycomputertechnology,thattheyoriginallyoldsoarrevolutionizedthemanagementmodeofchange,greatlyreducingthecostofmanpower.Usingtheinformationmanagementsystemtoreplaceoriginalartificiallymanagementmode,certainlywillgivecompaniesbringanunprecedentedrevolution.
Basedonthebackgroundofemployeetrainingmanagementsystem,combiningwiththeactualsituationofthecompany,afterfieldresearch,throughactualrequirementanalysis,usingpowerfulVStooldevelopmentstafftrainingmanagementsystem,thissystemismaketheenterprisestafftrainingworksystematized,standardization,automation,soastoimprovetheenterprisetrainingmanagementefficiencypurpose.Thesystemfullyutilizethecompany'sexistingresources,andimprovethesystemdevelopmentlevelandapplicationeffect,fromtheentiresystemtooperateandfriendlyinterfaceandthecompletionoftheoperatormanagementstaffmanagementsystem,includingusersofthesystemmanagement,rightsmanagement,databackup,restoredata,systeminitialization.Trainingvariousinformationinput,includingcoursemanagement,thelatesttraininginformationmanagement,trainingdemandmanagement,classroomsmanagement,managementofdepartmentandsoon,eachmoduleisdoneininformationadd,delete,modify,inquirestheandsoonfunction!
SystemUSESmodularprogrammingmethod,convenientforsystemcombinationandmodification,facilitateagaincompany'stechnicalmaintenancepersonnelmaintenance.
Keywords:
trainingmanagement;Trainingneeds;Thelatesttraining;Standardizedtraining
1.绪论
1.1组织机构概况
通威集团是以农业、新能源双主业发展,并在化工、宠物食品、IT、建筑与房地产等行业快速发展的大型民营科技型企业。
集团现拥有遍布全国各地及东南亚地区的一百余家分、子公司,员工逾万人,其中通威股份上市公司年饲料生产能力逾600万吨,是全球最大的水产饲料生产企业及主要的畜禽饲料生产企业,水产饲料全国市场占有率已达到25%,连续16年位居全国第一。
通威集团历来注重员工教育培训制度,突出知识培训和能力培训相结合,努力学习饲料创新知识,提高员工内在素质教育,提升员工适应能力,竞争能力,外在发展能力目标。
1.2项目开发背景
由于集团近几年发展迅速,成长加速,不断开发适销的产品,满足市场需求,很快创出了自己的品牌,内部和外部的竞争压力日益增大,对集团领导管理能力和员工的专业水平及创新水平提出了一定的挑战。
面对这种形势,通威集团领导深刻认识进一步提高管理水平和员工自身专业水平的重要性,为了使公司的培训工作科学化,规范化,适应激烈的市场竞争,为公司更好的发展做好准备,通威饲料集团领导决定建立培训管理系统。
1.3项目开发的意义
由于原本集团教育培训主要采取手工作业方式,大量数据流失,培训成效较低,信息处理的工作量大,重复量大,费时费力,容易出错。
现今集团规模不断增大,人员增多,所以集团培训管理系统的改变势在必行,确保其准确性、有效性和系统性。
既节省了时间又提高了工作效率,管理工作也可以便捷有序地进行。
2.系统分析
系统分析阶段是最主要的工作,在于明确系统的目标和用户对新系统的具体需求,同时以文件表达的方式详细而完整地描述需求的内容,即新系统将要“做什么”,并定义新系统的各项功能和性能,对现行系统进行充分的调查研究,了解现行系统的现状和业务流程,针对其存在的主要问题,提出新系统的逻辑模型。
2.1系统调查
了解系统需求是进行系统分析和设计的重要基础工作,因此必须对集团各管理部们的工作进行全面、细致而充分的调查研究,只有通过对现行系统全面深入的调查分析,才能找出解决的问题的关键所在,从而确保新系统的有效性。
经初步调查,通威饲料集团由董事会主席负责制,集团各个部门由主席直接管理,管理部门有人力资源部,市场部,工程部,财务部,研发部,其中人力资源部下设:
培训部和行政部
各个部们的职责如下:
人力资源部:
职工的职务调动、职工培训、考勤记录
财务部:
组织实施并督导公司核算管理、资产管理、现金管理、票据管理登记工作,审核各部门的设备、物资采购计划、公司开支计划。
市场部:
进行饲料的销售,以及售后服务工作
工程部:
管理某区的饲料销售工作
研发部:
研发新型饲料的工作
从总体结构来看,集团的组织层次图如下:
图2-1组织结构图
2.2可行性分析
可行性分析是需求分析的重要活动,是对系统进行全面、概要的分析。
现行系统主要进行培训课程的录入和一些简单的查询,很多地方仍需要手工操作。
且信息处理出错率比较高,尤其是对于大量数据性能差。
因此,我们需要建立新的信息自动化的管理系统,充分利用现有资源,改进工作方式,提高管理水平,因此要对系统进行技术可行性、经济可行性两方面的系统可行性分析。
2.2.1技术可行性
近几年来计算机技术发展异常迅猛,高速度大容量的电脑已经成为许多集团日常工作必不可少的设备,推动办公自动化的软件不断涌现,微机的普及为该系统的开发奠定了坚实的基础,本开发小组有能力根据系统对技术的要求,完成整个系统开发工作,按照目前的计算机书库存储量及运行处理性能,运用现有的管理信息系统开发理论及成熟技术,完全可以实现开发要求
2.2.2.经济可行性
对于开发一方面可以做到对于系统开发的集中,另一方面也可以节省系统的开发费用,系统开发成功投入使用之后,给集团带来了很大的利益,降低了教育成本,并能更快更及时地让员工获得更多有用的信息,提高了决策水平,所以,培训管理系统所需的开发费用并不是很昂贵,然而这套系统的成功投入使用可以帮助集团使员工的培训管理更加合理化、规范化。
2.3软件系统的总目标
通过培训管理信息系统的原理和方法,采用成熟的信息技术和手段,支持集团对员工情况的管理,提高集团各部门各对应的运行机制,及时发现其中存在的问题,提供管理决策支持功能,为了提高集团的质量提供帮助,也为今后的发展提供了技术准备,从而达到提高企业培训管理效率的目的。
系统开发的总体任务是实现企业员工培训管理的系统化、规范化、自动化。
3.概要设计
在对通威饲料集团培训管理系统的分析完成之后,为了将系统分析阶段提出的系统的逻辑方案换成可以实施的基于计算机和网络通信系统的物理方案。
概要设计主要考虑的是实现这个系统/子系统,应该设计几个功能模块,这些模块由哪些程序组成,他们之间以什么方式链接在一起构成一个最好的系统机内结构。
系统设计阶段主要考虑的是在计算机知识和应用软件开发经验,由系统的特性决定在系统设计过程中可以使用“自顶向下”的原则,将系统分为若干模块之后,可以用结构图来表达这些模块之间的联结关系
概要设计阶段的主要内容有:
系统的总体结构设计和概念模式设计。
3.1系统总体结构设计
系统的总体结构设计是指整个系统由哪些部分组成,以及各部分在物理逻辑上的相互关系,包括硬件部分和软件部分,主要任务就是整个系统合理的划分为若干个功能模块,正确地处理模块之间与模块内部的联系以及他们之间的调用关系和数据联系,定义子模块的内部结构等。
3.1.1模块结构图
图3-1模块结构图
3.1.2关系模型
用户(账号,密码,级别)其中账号为主键;
课室(教室号,培训类别,培训科目,地点,教室名)其中教室号为主键;
课程(课程号,课程名,培训学时,培训类别,培训月份,最新课程号,最新课程名)其中课程号为主键;
部门(职工号,姓名,性别,培训方向,职位)其中职工号为主键;
需求(培训需求编号,培训需求标题,培训类别,培训地点,联系人,联系电话)其中培训需求编号为主键。
3.2数据库设计
用户表(把账号作为用户表的主键)
图3-2用户表图
课室表(把教室号作为课室表的主键)
图3-3课室表图
课程表(把课程号作为课程表的主键)
图3-4课程表图
部门表(把职工号作为部门表的主键)
图3-5部门表图
需求表(把培训需求编号作为需求表的主键)
图3-6需求表图
4.系统实现
4.1主界面操作流程图
图4-1操作流程图
4.2物理配置方案
作为一个面向广大用户应用的信息管理系统,最终设计的目的就是应用,因此必须考虑为该信息系统设计一个完整可行的支撑环境来组成一个完成的计算机信息系统。
通常,一个计算机信息系统由软件和硬件组成,合理的选择和配置配件部分,可以是我们以最小的成本代价,获得最大的使用效果和收益。
4.3人机界面设计
所谓用户界面就是指软件与使用者交互的接口,通常包括:
输入、输出、人-机对话的界面和方式等等。
用户界面设计的好坏将直接影响到整个软件系统的质量,人机界面的好坏涉及到用户对软件系统的满意度,甚至影响到一个信息系统能否得到广大用户的认可。
由于培训管理系统面向的是非计算机方面的人员,他们对计算机系统或者VS之类的开发软件不是很了解,因此,从实际条件和使用要求出发,本系统采用了比较简单的表单操作,并且在保证记录内容大体不变的前提下尽量采用和手工表达格式一致的表单形势,界面中的担任步骤也尽量简化和集中。
4.3.1登录界面设计
图4-2登录界面图
备注:
初始账号为admin,密码为123,输入后点击登录即可进入系统的主界面
登录模块代码:
Importssystem.Data
ImportsSystem.Data.SqlClient
PublicClass登录窗口
DimnAsInteger=0
PrivateSubButton1_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton1.Click
DimmytableAsDataTable
Dimmysql1AsString
mysql1="select*from用户表where账号='"&TextBox1.Text&"'and密码='"&TextBox2.Text&"'"
mytable=dbop.sel(mysql1)
Ifmytable.Rows.Count=0Then
n+=1
Ifn<3Then
MsgBox("不存在该用户或密码错误!
",MsgBoxStyle.OkOnly+MsgBoxStyle.Exclamation,"信息提示")
TextBox1.Text=""
TextBox2.Text=""
TextBox1.Focus()
Else
MsgBox("已登录失败次,系统自动关闭!
",MsgBoxStyle.OkOnly+MsgBoxStyle.Exclamation,"信息提示")
Me.Close()
EndIf
Else
userlevel=mytable.Rows(0)("级别")
xuehao=TextBox1.Text
TextBox2.Text=""
主菜单.ShowDialog()
Me.Close()
EndIf
EndSub
PrivateSubButton2_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton2.Click
Me.Close()
EndSub
EndClass
4.3.2主界面
图4-3主界面图
主登录界面采用简洁的界面设计,展现给使用者的是美观、舒适的感觉,用toolstripmenuitemd方式把各个菜单统筹在里面,方便快捷的选用。
主菜单登录界面包含:
用户管理、部门管理、课程管理、课室管理几个大模块,具体的细模块在各自的模块里面。
4.3.3用户管理模块设计与实现
图4-4用户管理模块图
和通常的管理软件一样,系统用户模块也包含了添加、删除和修改的功能,在用户管理这个模块,用datagridview控件来显示用户的当前操作情况,能及时把更新后的信息反映给用户。
添加用户的实现是通过数据库的insert语句来实现的,主要是:
IfTextBox3.Text<>""AndTextBox4.Text<>""AndComboBox2.Text<>""Then
dbop.idu("insertinto用户表values('"&TextBox3.Text&"','"&TextBox4.Text&"','"&ComboBox2.Text&"')")
mytable=dbop.sel("select*from用户表")
DataGridView1.DataSource=mytable
Else
MsgBox("请输入账号和密码,并选择级别!
",MsgBoxStyle.OkOnly,"提示")
EndIf
TextBox3.Text里面的内容为账号TextBox4.Text是密码ComboBox2.Text是级别,在添加的时候,代码首先判断出这三个内容是否为空,如果不为空,就通过这一段"insertinto用户表values('"&TextBox3.Text&"','"&TextBox4.Text&"','"&ComboBox2.Text&"')")语句把具体的内容写进数据库里面;如果为空,就弹出提示窗口,提醒用户,实现该方法的是以下语句:
MsgBox("请输入账号和密码,并选择级别!
",MsgBoxStyle.OkOnly,"提示")。
删除用户是通过数据库的delete语句来实现的,主要是:
IfTextBox1.Text<>""Then
dbop.idu("delete用户表where账号='"&TextBox1.Text&"'")
mytable=dbop.sel("select*from用户表")
DataGridView1.DataSource=mytable
Else
MsgBox("请输入账号!
",MsgBoxStyle.OkOnly,"提示")
EndIf
TextBox1.Text里面的内容为账号,删除时代码首先判断出这个内容是否为空,如果不为空,就通过这一段"delete用户表where账号='"&TextBox1.Text&"'"语句来实现,把该账号的全部内容一起删除,因为账号是主键,所以可以全部删除掉;如果判断为空,就弹出提示窗口,提醒用户“请输入账号”,实现该方法的是以下语句:
MsgBox("请输入账号!
",MsgBoxStyle.OkOnly,"提示")。
修改用户数据是用update语句实现的,具体修改用户代码如下:
IfTextBox1.Text<>""AndComboBox1.Text<>""Then
dbop.idu("update用户表set密码='"&TextBox2.Text&"'where账号='"&TextBox1.Text&"'")
dbop.idu("update用户表set级别='"&ComboBox1.Text&"'where账号='"&TextBox1.Text&"'")
mytable=dbop.sel("select*from用户表")
DataGridView1.DataSource=mytable
Else
MsgBox("请输入账号!
",MsgBoxStyle.OkOnly,"提示")
EndIf
和上述说的实现方法大同小异,也是先判断TextBox1.Text(账号)和ComboBox1.Text(级别)这些的内容是否为空,如果不为空,就通过这一段"update语句来实现,把新的内容写进数据库里面;如果判断为空,就弹出提示窗口,提醒用户“请输入账号”,实现该方法的是以下语句:
MsgBox("请输入账号!
",MsgBoxStyle.OkOnly,"提示")。
4.3.4部门信息管理模块设计
图4-5部门信息管理模块图
部门信息管理模块,包含了添加、修改、删除和查找功能,其中还有重置的方便设计。
添加方面的实现方法如下:
Ifmytable.Rows.Count=0Then
dbop.idu("insertinto部门表(职工号,姓名,性别,培训方向,职位)values('"&TextBox2.Text&"','"&TextBox3.Text&"','"&ComboBox1.Text&"','"&TextBox6.Text&"','"&TextBox4.Text&"')")
MsgBox("录入成功",MsgBoxStyle.OkOnly,"提示")
Else
MsgBox("错误!
该职工号已存在!
",MsgBoxStyle.OkOnly,"提示")
EndIf
Callenbutton()
用户把要添加的内容详细填入后,通过Inser语句把相对应的内容写入数据库中并保存起来,然后弹出一个提示框,告知用户数据已经成功录入,更好的进行交互;如果用户在添加的过程中,把已存在的用户职工号错误填写进去,系统会提示用户“错误!
该职工号已存在!
”
修改部门信息数据是通过update语句来实现的,代码如下:
IfTextBox2.Text=""Then
MsgBox("修改职工号必需填写!
",MsgBoxStyle.OkOnly,"提示")
Else
IfMsgBox("确定修改"&TextBox2.Text&"这个人的资料?
",MsgBoxStyle.YesNo,"提示")=MsgBoxResult.YesThen
dbop.idu("update部门表set姓名='"&TextBox3.Text&"',性别='"&ComboBox1.Text&"',培训方向='"&TextBox6.Text&"',职位='"&TextBox4.Text&"'where职工号='"&TextBox2.Text&"'")
EndIf
EndIf
mytable=dbop.sel("select*from部门表")
DataGridView1.DataSource=mytable
Callenbutton()
该段代码首先判断用户要修改的数据职工号是完整的,因为职工号在数据库表里面是主键,必须要填写,所以先判断是否有,这个机制保证了数据的完整性。
然后通过这段代码(update部门表set姓名='"&TextBox3.Text&"',性别='"&ComboBox1.Text&"',培训方向='"&TextBox6.Text&"',职位='"&TextBox4.Text&"'where职工号='"&TextBox2.Text&")来实现修改的目的,一旦用户修改了部门信息数据后,可以及时的通过datagridview控件来查看是否已经修改,实现该方法的是:
mytable=dbop.sel("select*from部门表")
DataGridView1.DataSource=mytable
删除部门信息数据是用delete语句来实现的,这段代码是这样的:
IfTextBox2.Text=""Then
MsgBox("删除职工号必需填写!
",MsgBoxStyle.OkOnly,"提示")
Else
IfMsgBox("确定删除"&TextBox2.Text&"职工的资料?
",MsgBoxStyle.YesNo,"提示")=MsgBoxResult.YesThen
dbop.idu("delete部门表where职工号='"&TextBox2.Text&"'")
EndIf
EndIf
mytable=dbop.sel("select*from部门表")
Data
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 培训 管理 系统