管理信息系统实验报告 典型的小型管理信息系统开发设计

《管理信息系统实验报告 典型的小型管理信息系统开发设计》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、三亚学院学生实验报告姓名：学号：专业班级：实验地点：设备台号：日期：实验题目：典型的小型管理信息系统开发设计实验目的：通过本次小型开发设计实验，对管理信息系统的开发设计过程有所了解，对管理信息系统开发的基本方法和技术初步掌握。实验仪器设备及材料：PC机，Windows2000及以上操作系统VFP，SQLServer2000、奥派电子商务立体化实训模拟平台等软硬件环境。要求学生提前预习教材上管理信息系统的规划、分析、设计与实施部分。实验原理及内容：分组进行，以6-7人为一小组，完成某系统的调研、分析、设计、实施、运行，总结实验中的实验结果，提交详尽的开发设

2、计报告。由各小组自行选定设计背景，背景可用的素材：建议自行寻找素材（寻找的对象一般以小型企业为宜，如学校教务系统、小书店、小餐馆、小商店等）；根据选定的背景，完成系统分析、系统设计以及实施所设计的功能；参照教材P334-341内容，完成对新系统的系统规划、可行性研究、系统分析、概念设计、逻辑结构设计以及系统的评估；系统的软硬件平台可根据实际情况来定。示例：1.系统分析（1）可行性分析（2）需求分析2.总体设计以人力资源管理管理为例：人力资源管理系统主要包括4个功能模块：基本资料管理、人事管理、工资管理、系统管理。各模块的功能描述如下：基本资料管理包括：部

3、门管理、工种类型管理、职务类型管理、职称类型管理、合同类型管理、聘用类型管理。人事管理包括：人事信息管理、新员工登记、员工异动（调动、离职、复职）、合同管理、聘用管理。工资管理包括：工资信息管理、建立新月份工资、考勤信息管理、员工奖惩管理。系统管理包括：数据初始化、用户管理。3.系统设计（1）数据库设计人力资源管理系统数据库共包括15张表：部门表（存储部门信息）、工种表（存储工种信息）、职务表（存储职务信息）、职称表（存储职称信息）、合同类型表（存储合同类型信息）、聘用类型表（存储聘用类型信息）、人事表（存储人事信息）、员工异动表（存储员工调动、离职、复

4、职信息）、合同表（存储合同信息）、聘用表（存储员工聘用信息）、工资表（存储员工工资信息）、考勤表（存储员工考勤信息）、奖惩项目表（存储奖惩信息表）、权限信息表（存储用户权限信息）。其中，人事表的表结构如下：人事表字段名数据类型长度是否为空编号varchar5否姓名varchar10否性别varchar2是身份证号varchar20是出生年月datetime8是民族varchar20是婚姻状况varchar4是政治面貌varchar10是籍贯varchar50是联系电话varchar20是家庭地址varchar50是文化程度varchar10是毕业院校va

5、rchar50是参加工作时间datetime8是总工龄int4是部门varchar200是工种varchar20是职务varchar20是职称varchar20是（2）主要功能模块设计该系统包括4个主要功能模块，每个功能模块又包括多个小的功能模块。其中，人事管理模块中的人事信息管理小模块的功能是：完成人事信息的增加、修改、删除、查找、导出Excel等功能。为了方便用户操作，系统将以上功能放在两个窗体中，父窗体完成浏览、查找、删除、导出Excel和打开子窗体功能，子窗体完成人事信息的增加和修改。在人事信息管理模块的父窗体设计中，关键在于工具栏的设计和功能的

6、实现。单击“工具栏”按钮，根据其关键字Key来判断用户单击的是哪个按钮，从而实现人事信息的增加、修改、查找和导出Excel等功能。有关部分代码如下：PrivateSubToolBar1_ButtonClick(ByValButtonAsMSComctlLib.Button)SelectCaseButton.KeyCase“add”blnAddRS=TureLoadmain_rsgl_rsdaxx_lrmain_rsgl_rsdaxx_lr.Show1Case“modify”IfAdodc1.Recordset.RecordCount>0ThenblnAd

7、dRS=FalseLoadmain_rsgl_rsdaxx_lrmain_rsgl_rsdaxx_lr.Show1ElseMsgBox”系统没有要修改的数据！”，”提示窗口”EndIfCase“delete”IfAdodc1.Recordset.RecordCount>0ThenAdodc1.Recordset.DeleteAdodc1.RefreshElseMsgBox”系统没有要删除的数据！”，”提示窗口”EndIfCase“find”tb1=”人事表”Loadmain_fzfindmain_fzfind.Show1Case“all”Adodc1.R

8、ecordSource=”人事表”orderby“编号”Adodc1.Refre