- 1、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
学生信息管理系统的设计与实现报告
《管理信息系统》课程设计报告
题 目 学生信息管理系统
学生姓名 缪 惠
学 号 200717020203
专业班级 信息管理与信息系统
指导老师 方霞老师
设计日期
指导老师评阅意见:
评阅成绩:
签名:
目 录
1 详细设计 3
1.1. 新生管理子系统 3
1.2 毕业生管理子模块 8
1.3 教学评价打分 12
1.4学生成绩网上查询 13
2 系统维护和改进 14
2.1 运行维护 14
2.1.1运行模块组合 14
2.1.2运行控制 14
2.1.3运行时间 14
2.1.4人工处理过程 14
2.2 系统的改进与提高 14
需求分析(含业务流程图,数据流程图,E-R图等)
概要设计(模块划分等)
1 详细设计
设计:
下面给出设计方案与实现方法。
功能:①完成对新录取学生数据的导入
②完成对新生数据的报到预处理(初始化)
③实现新生报到现场完成,并统计报到情况
④统计新生的各种分布比例和成绩分布
设计:①总体设计:用Delphi的PageCtrl控件来实现各项菜单功能
②招生数据导入:可以通过选择来指定全国网上录取系统的导出数据所在路径,并根据使用手册检查21个.dbf文件是否存在,来决定是否允许导入;在导入时采用记录的查重处理,所以,只能借助记录集的循环来完成;其中,对政治面貌与民族表要单独处理。
主要实现文件检查的代码:
function CheckDBFile(var strRst:String):boolean;
var
i,j:integer;
blFound:boolean;
begin
arrstrFileName[0]:=t_tddw;arrstrFileName[1]:=t_jhk;
//……此处对表名赋值
CheckDBFile:=False;
blFound:=True;i:=0;
strRst:=数据表;
while (i21)do
begin j:=DBFileListBox.Items.IndexOf(arrstrFileName[i]+.dbf);
if j=-1 then//某个文件未找到,返回“假”
begin
blFound:=False;
strRst:=strRst+arrstrFileName[i]+.dbf ;
end;
i:=i+1;
end;
strRst:=strRst+不存在!;
if blFound then //全部数据文件检查正确
CheckDBFile:=True;
end;
③学号预处理:将导入的数据从信息库表到在校生表,并根据考生的考号及其它信息填入其基本信息(如省份、入年年份等);基本处理思想是:根据考生年份(报考号前两位)与当前系统数据库的绝对学期时间,筛选相应的考生信息,然后从这些信息中依次在学生基本信息表(JBXX2)中查询是否重复,来决定是否写入;如果写入,则根据报考号(第3、4位)的信息,写入考生所在省份代码。
④新生班级编排:将分配学号的新生编排到指定班级中。用两个DBGrid(可多选)分别将未分班学生和班级信息列出来,通过手工选中一个或多个学生,即可分配班级或从班级中取消分班。
实现DBGrid多选并在数据库中完成添加的代码:
with StuDBGrid.DataSource.DataSet do
begin
for i:=0 to intSelStuCnt-1 do
begin
GotoBookmark(pointer(StuDBGrid.SelectedRows.Items[i]));
strStuNo:=Fields[0].AsString;
strSql:=Update jbxx2 set BJID=++strClasNo+;
strSql:=strSql+ Where XH=++strStuNo+;
database.Execu
文档评论(0)