管理信息系统实习报告-3

西安郵電大学《管理信息系统》上机实验报告书项目名称：工资管理系统专业名称：人力资源管理姓名：刘子君班级：人力1102班指导教师：张峰时间2013年6月21日目录实验课题名称…………………(2)开发环境………(2)实验目的及要求………………(2)实验步骤………(2)选定上机实验任务………(2)设计方案、设计进度……(2)需求分析………(3)系统设计………(4)系统功能设计…………(4)系统界面设计…………(5)数据库设计……………(9)代码设计………………(11)实验心得……(16)实验课题名称：工资管理系统开发环境：设计一个C/S模式的小型管理信息系统，前端设计采用VisualBasic6.0开发工具，数据库设计采用SQLSETVER2000，用ADODC数据控件访问数据库。三、实验目的及要求：目的：在深入理解理论教学关键知识点的基础上，能针对给定的某个实际管理信息系统，独立的进行系统分析、系统设计、程序的编写与调试，最终完成系统实施任务。通过以上环节的训练，可以锻炼和培养学生综合运用知识以及开发管理信息系统任务的初步能力。要求：（1）根据所学内容，自行设计相关的实验方案。（2）撰写规范的系统分析与实验报告。（3）要分工明确，按时完成任务。四、实验步骤：1、选定实验任务：工资管理系统（内容：具有一般管理系统的录入、添加、删除、插入、修改和清空的要求）。2、商议方案，小组三人分工合作，刘子君主要负责代码设计部分、高杰主要负责系统界面设计部分，刘晓主要负责数据库设计部分。3、提交实验报告。五、需求分析：随着高等学校的快速发展，高校规模越来越大，教职工的数量也越来越多，高校工资管理更加的复杂，而工资管理是一项琐碎、复杂而又十分细致的工作，工资计算、发放、核算的工作量很大，一般不允许出错，如果实行手工操作，每月发放工资须手工填制大量的表格，这就会耗费工作人员大量的时间和精力，计算机进行工资发放工作，不仅能够保证工资核算准确无误、快速输出，而且还可以利用计算机对有关工资的各种信息进行统计，服务于财务部门其他方面的核算和财务处理，同时计算机具有手工管理所无法比拟的优点.例如:检索迅速、查找方便、可靠性高、存储量大、保密性好、寿命长、成本低等。这些优点能够极大地提高人事工资管理的效率,也是企业的科学化、正规化管理,与世界接轨的重要条件。这就对高校工资管理提出了新的要求，用计算机管理系统来管理高校工资已经成为目前的趋势，使用计算机可以高速，快捷地完成以上工作。在计算机联网后，数据在网上传递，可以实现数据共享，避免重复劳动，规范数据管理行为，从而提高了管理效率和水平。高校工资管理系统便是以计算机为工具，通过对工资管理所需的信息管理，不仅把管理人员从繁琐的数据计算处理中解脱出来，而且优化了管理体系，使其高效化，简易化，智能化，也提高了透明度和互动性。工资管理系统的目的和现实意义就是提高企业或公司的管理效率，避免一些在管理中由于人为因素而存在的一些诸多问题。工资管理系统还可以节省人力资源，不必浪费过多的人力资源在这种手工发放工资的模式之上。工资管理系统也可以为企业或公司节省生产成本，获取更大的利润，人力资源问题的减少必将为企业或公司节省一些不必要的生产成本，从而为企业或公司获取更大的利润。六、系统设计：1、系统功能设计：“工资管理系统”主要是定期对职工的工资信息进行录入、删除、查询、搜素、添加等日常管理。工程包括“工资管理系统”、“工资录入”、“浏览编辑”、“工资查询”4个窗体。各窗体的功能如下：（1）“工资管理系统”窗体，单击“系统”菜单下的“工资录入”命令，进入“工资录入”窗体。单击“系统”菜单下的“浏览编辑”命令，进入“浏览编辑”窗体。单击“系统”菜单下的“工资查询”命令，进入“工资查询”窗体。（2）“工资录入”窗体，包含2个框架、2个命令和一个Adodc数据控件。“基本信息”框架中有4个标签和4个文本框，，“工资输入项”中有4个标签和4个文本框，。在窗体中可以录入职工的“基本信息”和“工资收入项”两部分内容。单击“添加”按钮可以添加有关信息。单击“返回”按钮，关闭当前窗体，返回到“工资管理系统”窗体。（3）“浏览编辑”窗体，包含2个框架、3个命令和一个Adodc数据控件。“基本信息”框架中有4个标签和4个文本框，“工资输入项”中有4个标签和4个文本框，。在窗体中可以录入职工的“基本信息”和“工资收入项”两部分内容。单击“搜索”按钮可以搜索有关信息。单击“删除”按钮，可以删除想要删除的信息，单击“返回”按钮，关闭当前窗体，返回到“工资管理系统”窗体。（4）“工资查询”窗体，包含3个框架、4个命令和一个Adodc数据控件。“基本信息”框架中有4个标签和4个文本框，，“工资输入项”中有4个标签和4个文本框，。“查询条件”框架中有2个按钮，一个标签，一个文本框，在窗体中可以录入职工的“基本信息”和“工资收入项”两部分内容。单击“查询”按钮可以按条件查询有关信息，单击“前一条”按钮可以浏览前一条信息，单击“后一条”按钮可以浏览后一条信息，单击“返回”按钮，关闭当前窗体，返回到“工资管理系统”窗体。系统界面设计：“工资管理系统”窗体界面设计：（2）“工资录入”窗体设计:(3)“浏览编辑”窗体设计：（4）“工资查询”的窗体设计：数据库设计：代码设计：（1）“窗体”链接代码：PrivateSubCommand1_Click()frmWInput.ShowMe.HideEndSubPrivateSubCommand2_Click()frmWscan.ShowMe.HideEndSubPrivateSubCommand3_Click()frmWselect.ShowMe.HideEndSub（2）“添加”代码：PrivateSubCmdADD_Click()Fori=0To3txtInfo(i).Enabled=TruetxtInfo(i).Text=""NextiForj=0To3txtWage(j).Enabled=TruetxtWage(j).Text=""NextjcmdADD.Enabled=TrueEndSub（3）“返回”的代码：PrivateSubCommand2_Click()Me.HidefrmWmanager.ShowEndSub（4）“搜索”的代码：PrivateSubCmdselect_Click()DimWnumberAsStringWnumber=InputBox("请输入职工号",查找职工号,"01115002")IfWnumber<>""ThenWnumber="职工号"=""&Wnumber&""""adoEdit.Recordset.MoveFirstadoEdit.Recordset.FindWnumberEndIfIfframeInfo(0).Text=""ThenMsgBox"未找到匹配的记录",vbCritical,"警告"adoEdit.Recordset.MoveFirstEndIfEndSub（5）“删除”的代码：PrivateSubCmdDelete_Click()DimanwserAsStringanwser=MsgBox("确实删除该记录了吗？",vbCritical,"警告")Ifanwser=vbYesThenIfAdoedit.Recordset.EOF=FalseThenAdoedit.Recordset.DeleteAdoedit.Recordset.UpdateAdoedit.Recordset.movefirstElseMsgBox"数据库没有记录！",vbCritical,"警告"EndIfEndIfEndSub（6）“查询”的代码：PrivateSubCmdSearch_Click()IftxtShow.Text<>""ThenIfoptworkernum.ValueThensearchSQL="SELECT*FROM工资WHERE姓名="&"'"&txtShow.Text&"'"Ifoptmonth.ValueThensearchSQL="SELECT*FROM工资WHERE发放日期="&"'"&txtShow.Text&"'"ElseMsgBox"条件不能为空，请输入查询依据！",vbCritical,"警告"EndIfAdosearch.RecordSource=searchSQLAdosearch.RefreshIfoptworkernum.ValueThenIfAdosearch.Recordset.EOFThenMsgBox"没有找到该职工姓名！",vbCritical,"警告"EndIfElseIfAdosearch.Recordset.EOFThenMsgBox"没有找到这个月的信息！",vbCritical,"警告"EndIfEndIfEndSub（7）“前一条”的代码PrivateSubCmdPrevious_Click()Adoedit.Recordset.movePreviousIfAdoedit.Recordset.EOF=TrueThenAdoedit.Recordset.movefirstCmdPrevious.Enabled=FalseMsgBox"已经是第一条记录",vbCritical,"警告"ElseCmdNext.Enabled=TrueCmdPrevious.Enabled=TrueEndIfEndSub（8）“后一条”的代码：PrivateSubCmdNext_Click()Ifoptmonth.Value=TrueOroptworkernum.ValueThenAdosearch.Recordset.movenextIfAdosearch.Recordset.EOF=TrueThenAdosearch.Recordset.movelastCmdNext.Enabled=FalseMsgBox"已经是最后一条记录",vbCritical,"警告"ElseCmdNext.Enabled=TrueCmdPrevious.Enabled=TrueEndIfEndIfEndSub实验心得：管理信息系统是为了适应现代化管理的需要，在管理科学、系统科学、信息科学和计算机科学等学科的基础上形成的一门科学，它研究管理系统中信息处理和决策的整个过程，并探讨计算机的实现方法。它是一个由人、计算机、通信设备等硬件和软件组成的，能进行管理信息的收集、加工、存储、传输、维护和使用的系统。管理信息系统可促使企业向信息化方向发展，使企业处于一个信息灵敏、管理科学、决策准确的良性循环之中，为企业带来更高的经济效益。所以，管理信息系统是企业现代化的重要标志，是企业发展的一条必由之路。此次的管理信息系统课程设计非常有意义。1.刘丹：此次课程设计中，我们小组三位成员无论是在思想上还是在行动上都能够达成共识，团结一致，共同出谋划策，终于完成了工资管理系统的设计开发。在设计工资管理系统的过程中，难免会碰到种种问题或无法预测的麻烦，但是，小组内部集思广益，为解决系统存在的难题尽最大努力给予人力、物力和财力支持，保证了整个工资管理系统的设计过程顺利开展和实现。在进行工资管理系统开发之前，我对所涉及的计算机知识非常不熟悉，甚至不明白非计算机专业的我们为什么要做这么复杂的课程设计，可以说一无所知加上困惑。带着这些问题我不得不查阅了相关书籍和电子资料，才对此次此次所要设计的工资管理系统有了认识和理解。由于有了理论知识做支柱，在真正进行系统开发的过程时，必须对整个系统有个清晰的构思，才能够较为顺利的进行，当然，在程序代码的编辑时，需要在理解系统的整体实现有个明确的思路，才能准确无误的进行代码编辑，这个过程既繁琐又易出错，是我认为最该注意的地方。通过此次课程设计，我明白的一点是，原来一个有使用价值的管理信息系统的开发是需要一个团队的共同努力，而不是一个人单打独斗就能实现的。掌握一定的计算机技术如VB，即使在将来的工作中也许用不到，但是能够在有形无形中帮助自己在生活工作中提高办事效率，严谨的态度和思路的清晰，大有裨益。2.：刘艳在此次管理信息系统课程设计整个过程中，我们团队三人有分工有协作，共同配合实现了整个工资管理系统的分析与设计，最终完成课程设计报告。这是一次理论知识学习和实际动手操作软件紧密结合的体验，是一次集细心、耐心、思考