VFP教学管理系统.doc

教 学 管 理 系 统

姓名：
专业：计算机及应用
指导老师：

目 录

一、摘要…………………………………………………...1
二、论文正文
绪论…………………………………………………….…2
第一章 第一章         项目的确定 …………………………….….3
第二章 第二章         用户需求分析………………………………5
第三章 第三章         系统可行性分析………………………….9
一、 成本考虑……………………………….9
二、 物理结构设计…………………………….10
第四章 第四章          功能分析……………………………………..10
第五章 第五章          系统分析……………………………………..14
第六章 第六章          程序设计与说明 ……………….……………17
第七章 第七章          附录
1. 1.     数据表结构………………………………………20
2. 2.   部分程序代码……………………………………21

教学管理系统

摘　要

本文以一所小学的管理信息系统建设中的教学管理子系统的开发为背景，以该校对应的教学体制为信息来源，论述了管理信息系统的概念、结构及系统开发的基本原理和方法。本系统用Visual Foxpro6.0开发完成，在开发过程中，本人认真的分析了系统的需求和功能模块。此系统基本上能解决：从制订教学计划到课程安排、课表编排，从对教师的教学任务下达到教师工作量的核算以及业务档案的管理和学生的学籍管理和考务管理等计算机辅助教学、辅助教学管理。大大提高了学校教务工作的自动化，使管理人员从繁重的工作中解脱出来，最大限度地减少了不必要的错误。全文共分为项目的确定、用户需求分析、系统可行性分析、系统功能模块分析、系统设计、程序设计与说明、系统运行与维护、开发总结等。

关键词：管理信息系统、教学管理、系统开发

绪　论

在现代社会中管理的作用越来越显得重要和突出。一般来讲，管理通过计划、组织、指导与领导、控制等手段，为组织制定目标，应用组织的各种要素，以实现组织的目标。本世纪以来，由于社会生产力的迅速发展和科学技术的突飞猛进，人们进行信息交流的深度和广度不断增加，管理所需要的信息量急剧增长，同时对信息的处理要求及时、准确，这导致了传统的信息处理方法和手段已不能适应现代管理的需要；传统的企业管理活动中，把人、才、物作为企业的主要资源。但是随着社会化大生产的不断扩大和社会对产品多样化的需求，人们越来越重视信息在生产经营及企业管理中的作用，并把它当作企业的一种极其重要的资源，人们称之为“信息资源”，信息资源的处理已经成为当今世界上一项主要的社会活动。
电子计算机的诞生和在信息处代——“信息时代”的开始，它使企业管理现代化成为可能。那么作为教育系统来说，开发一套完整的教学管理系统是很有必要的，我选择这个问题作为毕业设计的题目，希望在这方面作
一些探索、积累一定的经验

第一章 第一章     项目的确定

管理信息系统（Management Information System，简称MIS）是一个由管理人员和计算机组成的用来进行信息的收集、传输、加工、存储、维护和使用的系统。它是一门综合了管理科学，系统理论，计算机科学的系统性边缘科学。
计算机教学管理现在我国已积累了一定的理论和经验，但大多数的管理系统都应用于普通高校的教学管理，一般中小学应用程度就相对较低，许多学校还处于手工、半手工操作阶段。从制订教学计划，到课程安排、课表编排，从对教师的教学任务下达到教师工作量的核算以及业务档案的管理和学生的学籍管理和考务管理，很多工作都是由管理人员笔抄、手工整理或通过计算器辅助完成，不仅速度慢，浪费了大量人力物力，而且易出错，不易进行查询，很容易出现信息不一致现象。
本系统使学校的各项管理工作更加科学化、规范化，最终适应激烈的市场竞争，适应改革和发展的需要，学校领导深刻认识到进一步提高管理水平的重要性和必要性。因此，开发教学管理信息系统对学校的管理及人才素质的提高具有重大的社会意义，具体到某一学校，可以提高学校管理的现代化水平，提高教学管理的工作效率和学校的知名度。

第二章 需求分析

以计算机为主要手段的管理信息系统是学校的管理系统的一个组成部分。它的建立应该服从学校的整体目标和管理决策活动的需要。为此，这个阶段的主要任务是了解学校的战略目标和内外部环境，确定系统的总目标和主要功能，拟定总体方案，并从技术、经济、社会条件等方面论证技术方案的可行性，制定投资规划和开发计划，编写可行性报告。学校以前进行信息管理的方式是基于文本、表格等低介质的手工处理，信息处理工作量大，容易出错，且管理方式因人而异，缺乏系统、规范的信息管理手段。本系统假设的使用对象是一所中等规模的小学。
该学校现有教职工160余人，现有小学部6个年级，每个年级又有多个班。学校实行校长负责制，若干名副校长分别对日常教学、职工培训、财务后勤、学生管理工作实施管理，向校长负责。
学校共设教务科、学生科、财务科、行政科、办公室等部门，各科室科长、主任分别对所属部门进行管理。由于学校的各类资源是有限的，所以当这些资源无法同时满足学校的教务需要时，就应对这些资源进行合理分配。要求系统能够对学校的教教学计划、教学安排、师资管理、考务管理等方面的信息提供存贮、更新、查询、统计等功能。
该管理信息系统的目标是：按照设计管理信息系统的原理和方法，采用成熟的计算机和信息技术及手段，支持学校日常管理全过程，加强教学管理活动中各项信息资源的管理和应用，提高学校各项管理的现代化水平，优化人、财、物和信息资源在学校的综合配置，在为学校管理提供全面信息服务的基础上，提供管理辅助决策能力，为学校各项工作健康、稳定地发展提供有力的支持。
根据使用人员对信息、信息处理和信息安全性、完整性的要求，分别对用户的信息需求进行分析：
（1） 对信息的要求：随时查询各位教师的任课情况，各专业教学计划情况及每学期各班的人数、成绩、课程设置，并能查询教师业务档案。
（2） 对信息处理的要求：设置新增、修改、删除、恢复、查询等信息处理功能。
（3） （3） 对数据安全性、完整性的要求：设置用户密码口令，保证不被非法操作；并设置用户口令维护功能，方便用户及时更换密码。

详细调查的重点是对管理业务的流程进行描述，逐个地调查研究

外部项 处理 数据流 数据存储

1教学管理子系统的关联图如下：

教务科 F1 F2
教学管理 各年级
F3
教师 F4

注：F1 教学计划表； F2 教学任务通知书； F3 授课任务安排表； F4教师授课任务书

2、DFD的顶层图如下：
F1 F2
教务科 教学计划录入
F4
D1 教学计划
安排教师授课
F3 各年级

教师 D2 教师授课情况
。。。。。。。。。。。。。。。。。。。。。。。。。。
2、数据元素的DD表举例如下：

数 据 元 素
系统名：教学管理 编号
条目名：课程名 别名
属于数据流：F1-F4 　存储处：D1教学计划
　　D2教师授课情况表
数据元素值：
代码类型：字符
宽 度：12
取值范围及含义：所有课程名
简要说明：课程名是教学计划的关键
修改记录： 编写 日期
审核 日期

3、数据存储的DD表举例如下：

数 据 存 储
系统名：教学管理 编号：D2
条目名：教学授课情况表 别名：
存储组织：记录数：约100 　　键字：姓名
数据量：约200KB　　辅关键字：课程
按学期和姓名排列
记录组成：
字段名称 ：姓名 课程 学期 工作量 评教 成绩 ...
宽度： 　8 12 7 3 2 5 ...
简要说明：
修改记录： 编写： 日期：
审核： 日期：

4、数据加工的DD表举例如下：

数 据 加 工
系统名：教学管理 编号：
条目名：教师授课任务查询 别名：
输 入：教师姓名 输出：教师授课任务
处理逻辑：授课任务存储在教学计划数据库中
简要说明：本处理只需输入教师姓名，就可查询相应的记录
修改记录： 编写： 日期：
审核： 日期：

第三章 第三章 　系统可行性分析

根据教学管理系统的总体要求，该系统具有可开发性。
1、经济可行性：目前大多数的小学已经配备了计算机，在使用本教学管理系统时就不需增加单位的硬件投资，在软件平台上，利用WINDOWS系统平台与VFP数据库管理系统设计一个简单的工资管
理系统并不需要多少投入，并且在将来使用该系统上除了纸张外不需要更多的经费投入，用户能够消费得起，所以在经济上是完全可行的。

2、使用可行性：本系统采用WINDOWS平台的面向对象数据
库开发工具进行开发，它具有界面友好，操作简单等特点，一般会电脑基本操作的人员均可操作，就算对计算机应用能力有限者也很容易的掌握。
3、技术可行性：在技术特性上，本人学习过数据库原理、软件工程、VISUAL FOXPRO、数据结构等软件课程，具备软件开发的基本条件，在指导教师的正确指导下，基本上能够完成该系统的开发，在做出详细的需求分析后，保证了信息的正确性和完整性。
对整个系统开发过程，大体安排如下：
● ●     需求分析两个星期；
● ●     系统功能设计两个星期；
● ●     程序编码两个星期；
● ●     系统调试和测试两个星期；
加上开发过程中不可预知的因素，整个系统开发大约为两个月左右。
第四章 第四章 功能分析

在完成了对整个系统的需求分析后，就对系统实现目标有了很深刻的了解，接下来需要做的对系统的功能模块进行分析，深入的了解
系统的各种要实现的功能。
根据系统功能需求，系统以结构化程序思想进行设计，把整个系统分成四个子模块，在各个子模块中又分成几个功能模块，每个功能
模块执行单一的功能。在最顶层的主控模块下分层地进行管理。
一、主控模块：显示系统总体功能，根据选择实现分支，进入模块或功能模块。系统主控模块采用按纽菜单，在系统生成主菜单的基础上修改，界面清晰，操作方便，由于教学管理信息系统具备完整的逻辑性，不允许有任何差错，也不允许无关人员进行修改。为了加强系统的安全性，在主控菜单入口处设置密码 ，要求用户输入用户和密码，系统只提供三次机会，越过三次拒绝这。系统如果密码不小心泄露，可以在系统中进行修改以确保系统的安全。系统主模块流程图如下
开始

否
密码验证

主菜单

三次否

是
选择功能模块

进行模块操作

操作完否

返回主菜单

退出系统与否

退出界面

否

否

　　　　　　　　　系统主模块流程图
二、分控模块 显示系统中各个子模块的功能。其中又分为教学管理、系统维护、帮助、退出。(一)、教学管理模块：这部分主要分为课程注册、教学计划、课程安排总表、教学任务通知书、教师授课任务通知书、教师管理。主要用来实现基础数据、教学内容的新增、修改、删除、恢复等信息处理功能。由于各方面原因，教学计划和教师档案要求作一些必要的修改，如：删除、新增、修改等。其中教学管理能输入教师基本档案，如姓名、出生年月、学历等，该系统应能够根据各方面不同的信息来查询各年级的课程安排情况以及授课教师，还能查询各位教师的任课情况，各门教学计划情况及每学期各班的成绩、课程设置、并能查询教师档案 。比如：可以根据教师姓名来查询，也可以根据年级、课程名称来查询，还可以自由查询。查询的实现方案以教师档案数据库管理为例，简要介绍一下各种功能：
新增、查询、删除、恢复

(二)维护模块 主要是为保证系统能够正常的运行，主要包括：数据备份、数据恢复、密码更改、系统时钟等。
(1)数据备份 为了保证每次不会因为误操而造成数据库无法恢复，系统设置数据备份，操作界面如下：

(2) 数据恢复 本教学管理系统为了防止因为操作人员误操作，或其它人为原因造成数据破坏或丢失，特提供了数据恢复功能。但前提是必须经常利用“数据备份”功能将相应数据的内容进行备份，其操作界面如下：

(3)密码修改 为了加强系统的安全性如果密码不小心泄露，可以在系统中进行修改，以确保系统的安全，其操作界面如下：

(三)帮助模块 主要介绍关于本系统的一些基本信息。
(四)退出模块 退出本系统，返回WINDOWS
总结：系统所有的功能模块大致已经有了详细的介绍，通过对系统功能 模块的分析，确立了系统要具体做到的事情和实现的功能，它完全能够满足用户需求分析的要求。

第五章 第五章 　系统设计

管理信息系统设计阶段的主要目的是将系统分析阶段所提出的反映了用户信息需求的系统逻辑方案转换成可以实施的基于计算机与通信系统的物理（技术）方案。
按照结构化的系统设计方法，学校管理信息系统从功能上可以划分为以下几个子系统：

学校管理信息系统

教学管理 子
系统

人事 财务 学籍
管理 管理 管理
子 子 子
系统 系统 系统

在子系统划分的基础上，对相应子系统的数据流图采用事务中心法进行分析，然后，对每一个子系统进行功能分解，这样不断下去，直到分解成含义明确，功能单一的单元功能模块，从而绘制出系统的功能模块图，即HIPO图。教学管理子系统的HIPO图如下：

教学管理子系统

用户登录

教 学 管 理 系统维护 帮助 退出
...

课 教 课 教 教 教 数 数 密 关
程 学 程 学 师 师 据 据 码
注 计 安 任 授 管 备 恢 更 于
册 划 排 务 课 理 份 复 改
总 通 任
表 知 务
书 书 教 教
师 学
注 情
册 况

接下来进行数据库设计，数据库设计是要在一个给定的应用环境（DBMS）中，通过合理的逻辑设计和有效的物理设计，构造较优的数据库模式、子模式，建立数据库和设计应用程序，满足用户的各种信息需求。
l 概念结构设计
在数据库设计中，先要对系统分析所得的数据字典中的数据存储进行分析，然后得出系统的关系模式，可以采用实体——联系图（简称E——R图）的方法进行数据结构的描述。E——R图由实体、属性、联系三部分组成。E——R图的有关符号说明如下：

实体 属性
根据数据字典的内容，得到本系统的实体——联系图如下：

教师 姓名
性别
1 ……
成绩 绩

职称

属于

n
n n 教学计划
授课情况

n

极格率

学期

课程名

姓名 课程名 ……. ……..

教学管理子系统的E-R图(一)

课程安排

姓名 课程名 学期 ... 教学班 …

第六章 程序设计与说明

考虑到本系统的性能要求，和现有的条件，我们选择了WINDOWS98中文版作为开发、测试和运行的平台。因为WINDOWS操作系统是目前应用最广的操作系统，它以全新的图形界面，简单快捷的操作方式，支持多媒体功能等特点而成为软件发展的流行趋势，选用它作为开发平台，易于功能的扩展和软件升级。
开发工具的选择 针对目前世界上流行的大量软件和开发工具，经过认真分析其优缺点，结合计量器具管理系统的需要和目前的硬件环境，我们选用微软WINDOWS平台下的Visual FoxPRO6.0（简写为VFP6.0）作为软件开发工具。选用该工具有发以下几方面的优点：
（1）VFP6.0是目前微机上最优秀的关系型数据库管理系统软件，正如其名称中冠以的“Visual”一样，它采用了可视化、面向对象的程序设计方法，大大简化了应用系统的开发过程，并提高了系统工程的模块化和紧凑性。
（2）VFP6.0版本中提供了大量的诸如“数据库设计器”、“表单设计器”、“菜单设计器”、“报表设计器”等开发设计工具和向导工具（Wizard）,使以往费时费力的开发工作变得轻松自如。这些可视化的设计工具免除了开发者编写大量程序代码的工作。
本系统采用了基于菜单选择，填写表格和简单的问答选择等友好的用户界面交互方式。

系统安全性验证用户界面设计教学管理是不允许有任何差错，不允许不相干的人员进行使用和修改，为了加强系统的安全性，在菜单入口处设置身分的检验，要求助用户输入用户名和登录密码，系统只提供三次机会，越过三拒绝使用系统，如果密码不小心泄露，可以在系统中进行修改，以确保系统的安全。
用户登录窗口界面是用户看到的第一幅画面，也是进入系统之前必须经过的一道“关口”。因此，简洁、实用、友好、安全是设计时应当考虑到的风格。
系统主画面屏幕区域设计
进行系统的主画面屏幕区域设计时，是将整个屏幕划分为三个区域，如下图所示：
主 菜 单 区
工 作 区
状 态 信 息 区
在屏幕的最上方是主菜单区，显示本系统的功能主菜单。用户可以有鼠标左键来选择相应的菜单，也可以用快捷键进行操作，然后用同样的方法在相应菜单下拉出该项的二级菜单（如果有的话），如果还有三级菜单，用户可在二级菜单选择相应的功能项，系统会自动弹出三级菜单。当通过菜单选择了所要进行的工作以后，系统进入相应的业务处理功能，这时业务处理活动在屏幕中间区域即工作区进行。在整个业务处理过程中，主菜单区始终存在以使用户明确当前正在进行的.

第七章 附录：表结构及部分源代码
所属年级 字符型 10 NULL
学年 字符型 6 NULL

jxpg表：
字段名 类型 　宽度 小数 NULL
评估代码 字符型 　 4 NULL
教学评估 字符型　　　6　　　　　　　NULL
kc 表：
字段名 类型 　宽度 小数 NULL
课程代码 字符型 　4 NULL
课程名称 字符型 12 NULL
考核形式 字符型 6 NULL
适用年级 字符型 　 16 NULL
kcap表：
字段名 类型 　 宽度 小数 NULL
课程名 字符型 12 NULL
姓名 字符型 8 NULL
总学时 字符型 4 NULL
所属年级 字符型 10 NULL
教学班 字符型 4 NULL
skqk 表：
字段名 类型 宽度 小数 NULL
姓名 字符型 8 NULL
课程名 字符型 12 NULL
所属年级 字符型 10 NULL
教学班 字符型 4 NULL
学年 字符型 6 NULL
ssnj 表：
字段名 类型 宽度 小数 NULL
年级代码 字符型 2 NULL
所属年级 字符型 10 NULL

程 序 清 单

****** *教学管理\PROGS\教学管理.PRG
SETPATH
SET sysmenu off
SET status bar off
SET talk off
Clear screen
oldpath = SET("path")
=SETPATH()
DO form face &&name face
DO main.mpr
SET PATH TO &oldpath
Release oldpath

*!*******************************************************************
*!Procedure SETPATH
*! Calls
*! SETPATH
*! main
*!*******************************************************************
FUNCTION SETPATH()
LOCAL lcsys16
lcsys16 = SYS(5)+sys(2003)
SET defa to (lcsys16)
SET PATH TO PROGS, FORMS, MENUS, DATAS, BITMAPS, REPORTS,LIBS
SET status bar off
PUBLIC softtitle
softtitle="教学管理系统"
ENDFUNC

****** * \教学管理\FORMS\FACE.SCX
Name = "Form1"
PROCEDURE Load
PUBLIC txt1,txt2,ntime
ntime=0
ENDPROC
PROCEDURE Init
OPEN database mypassword
USE mypw
IF bof().and.eof()

thisform.okbutton1.caption='新登录'
ELSE
thisform.okbutton1.caption='确定'
。。。。。。。。。。。。。。。。。。。。
PROCEDURE Timer
IF ntime=0
thisform.Label5.visible=.t.
thisform.Image1.visible=.t.
thisform.Image2.visible=.t.
ntime=1
ELSE
*thisform.label4.visible=.f.
thisform.Label5.visible=.f.
thisform.Image1.visible=.f.
thisform.Image2.visible=.f.
ntime=0
ENDIF
ENDPROC

*:******************************************************************************
*: main
* *********************************************************
* *
* * 2003.03.24 MAIN.MPR 22:13:22
* *
* *********************************************************
* *
* * 作者名称
* *
* * 版权所有 (C) 2003 公司名称
* * 地址
* * 城市, 邮编
* * 国家
*
Name = "Combo3"
P．
IF eof()
GO bottom
thisform.Commandgroup5.Command1.enabled=.t.
thisform.Commandgroup5.Command2.enabled=.t.
thisform.Commandgroup5.Command3.enabled=.f.
thisform.Commandgroup5.Command4.enabled=.f.
ELSE
Skip 1
ENDIF
thisform.Commandgroup5.Command1.enabled=.t.
thisform.Commandgroup5.Command2.enabled=.t.
thisform.refresh
ENDPROC
PROCEDURE Command4.Click
GO bottom
thisform.Commandgroup5.Command1.enabled=.t.
thisform.Commandgroup5.Command2.enabled=.t.
thisform.Commandgroup5.Command3.enabled=.f.
thisform.Commandgroup5.Command4.enabled=.f.
thisform.refresh

ENDPROC
PROCEDURE Command5.Click
IF this.caption="修改"
thisform.setall("enabled",.t.,"textbox")
thisform.setall("enabled",.t.,"editbox")
thisform.setall("enabled",.t.,"checkbox")
thisform.setall("enabled",.t.,"combobox")
this.caption="保存"
thisform.Commandgroup5.Command1.enabled=.f.
thisform.Commandgroup5.Command2.enabled=.f.
thisform.Commandgroup5.Command3.enabled=.f.
thisform.Commandgroup5.Command4.enabled=.f.
thisform.Commandgroup5.Command6.enabled=.f.
thisform.Commandgroup5.Command7.enabled=.f.
ELSE
this.caption="修改"

thisform.setall("enabled",.f.,"textbox")
thisform.setall("enabled",.f.,"editbox")

ELSE
SELE jxjh
ENDIF
SET filter to alltrim(学年)=xn.and.alltrim(学期)=xq
COUNT to jls
IF j

****** *\教学管理\FORMS\BACKUP.SCX
Name = "Form1"
PROCEDURE Init
SET safe off
SET exact on
ENDPROC
Caption = "开 始"
Name=messagebox("非法用户不得修改密码！",0,"警告")
thisform.release
ENDIF
ENDIF
ENDPROC
Caption = "确定"
Name = "Okbutton1"
PROCEDURE Click
ENDPROC

****** *教学管理\FORMS\通知打印.SCX
Name = "Form1"
PROCEDURE Init
PUBLIC xn,xq
bo1.setfocus
ENDPROC
Name = "Combo2"
PROCEDURE GotFocus
IF len(alltrim(bo1.value))=0
=messagebox("请先选择学年",18,"警告")
bo1.setfocus
ENDIF
ENDPROC
Caption = "确认"
Name = "Command1"
PROCEDURE Click
xn=alltrim(bo1.value)
xq=alltrim(thisform.Combo2.value)
IF !used('kcap')

USE kcap
ELSE
SELE kcap
ENDIF
SET filter to alltrim(学年)=xn.and.alltrim(学期)=xq
COUNT to jls
IF jls=0
=messagebox("无此学年和学期的授课安排!",8,"警告")
RETU
ELSE
ENDPROC

By