版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
...wd......wd......wd...学生管理系统中信息技术的运用一·系统规划说明书随着人类社会进入信息时代,计算机越来越多地活泼在社会各个领域:管理,网络,计算,控制,多媒体等。并且在某些方面成为不可缺少的工具,尤其在管理方面,管理软件的出现使大量繁琐复杂的问题变得简单易行。现今学校的规模不断扩大,学生数量急剧增加,有关学生的各种信息量也成倍增长。面对庞大的信息量,学校对学生信息管理的自动化与准确化的要求日益强烈,需要有专门的学生信息管理系统来提高学生管理工作的效率。通过这样的系统,可以做到信息的标准管理,科学统计和快速的查询,从而减少管理方面的工作量。该系统组织构造图如下〔图1〕:学生信息管理系统学生信息管理系统班级管理课程管理学习管理成绩统计系统维护档案管理班级信息查询班级信息添加课程信息查询班级信息更改学生资料更改学生资料添加学生资料查询课程信息更改课程信息添加档案查询档案汇总成绩查询成绩统计数据备份用户权限管理(图1)系统说明书(一)、系统界面中有登陆系统按钮,系统使用人员可以点击进入密码验证页,如果在一分钟内用户没有点击此按钮,系统会自动跳到密码验证页。此程序的实现代码会在详细设计书中说明。(二)、密码验证作为系统最根本的安全管理步骤。用户如果不输入合法的用户名和密码,系统是不能进入的。当用户输入合法的用户名和密码时,系统管理会自动判断此用户是什么级别的用户,具有什么权限,使用户的操作具有合法性。密码验证页包括操作员姓名和密码两个局部。具体的代码实现也将在详细设计书说明。下面是密码登陆页的图示(图2):〔图2)当操作员的名称和密码均正确的时候,系统便会进入系统使用主菜单。主菜单共分为三个分菜单项:学生信息管理,学生成绩管理,系统管理。如图(3)在学生信息管理中分为学生信息维护和学生信息查询两个菜单项,在学生成绩管理中含有学生成绩查询打印菜单项,在系统管理中分为:操作员管理、口令设置、权限管理、系统日志、数据备份、数据恢复、退出系统七项。下面为本系统的使用数据流程图:详细设计说明书根据系统规划和需要分析,把系统划分为学生信息管理,学生成绩查询,系统管理三个模块。本系统用到的主要有以下文件:主控程序main.prg、启动界面(封面)face.scx、系统登录界面(口令验证窗口)pass.scx、,主菜单main_menu.mpr。程序的调用关系如下:主控程序main.prg中调用界面表单face.scx,封面中调用“口令验证窗口〞表单pass.scx,口令正确则调用系统菜单main_menu.mpr。各菜单项调用相对应的表单。(一)、主控程序main.prg的代码实现为:CLEAR&&清屏CLEARALL&&从内存中释放所有的内存变量CLOSEALL&&关闭各种类型的文件SETESCAPEOFF&&制止运行的程序和命令在按Esc键后被中断SETSAFETYOFF&&指定在改写已有文件时不显示对话框SETDELETEON&&使用范围子句处理记录的命令忽略标有删除标记的记录SETSYSMENUOFF&&在程序执行期间废止VisualFoxPro主菜单栏RELEASEWINDOW"常用"&&关闭常用工具栏SETCENTURYON&&年份以四位显示SETDATETOymd&&日期格式为年、月、日SETMARKTO"-"&&指定日期分隔字符SETHOURSTO24&&指定为24-小时时间格式_SCREEN.Visible=.t._SCREEN.Caption="学生管理系统"&&系统窗口标题_SCREEN.Icon=".\dod.ico"&&系统标题栏图标*判断显示器当前分辨率_SCREEN.Width=SYSMETRIC(1)_SCREEN.Height=SYSMETRIC(2)*根据分辨率不同,为系统设置不同的背景图片IFSYSMETRIC(1)>=1024_SCREEN.Picture=".\img\bj.jpg"ELSE_SCREEN.Picture=".\img\bj.jpg"ENDIFDOFORM.\face.scx&&调用登录界面表单OnShutDowndoOnShutdown&&退出系统时调用函数onshutdown()READEVENTS&&建设事件循环OnShutDown&&释放当前的OnShutDown命令*按菜单的“关闭〞按钮退出时,出现的提示框FUNCTIONOnShutdown()sel=MESSAGEBOX("真的要退出吗?",4+32+256,"提示")IFsel=6*SELECT0*USE.\dbsystem\LOG*GOBOTTOM*REPLACE离开时间WITHDATETIME()&&退出系统时记录操作员退出时间CLOSEALLCLEAREVENTS&&退出事件循环QUIT&&完毕当前VisualFoxPro工作期,并将控制权返回给操作系统ENDIFENDFUNC(二)、在运行主程序后,系统调用登陆界面表单(图4)(图4)主要事件代码:FORM1的INIT事件代码:SETBELLONSETBELLTO'.\MUSIC\welcome.wav',2??CHR(7)FORM1的UNLOAD事件代码:SETBELLTO'\MUSIC\SILENT.WAV',2??CHR(7)此两项功能分别为在翻开表单时调用的音乐文件和关闭表单时调用的音乐文件。Command1的mouseup事件代码:LPARAMETERSnButton,nShift,nXCoord,nYCoordreleasethisformDOFORM.\main\pass.scxTimer1的timer事件代码:releasethisformDOFORM.\main\pass.scxTimer2的timer事件代码:为了实现五角星的闪动:IFTHISFORM.label5.visiblethisform.label5.visible=.f.elsethisform.label5.visible=.t.endifTimer3的timer事件代码:为了实现五角星的闪动:IFTHISFORM.label5.visiblethisform.label5.visible=.t.elsethisform.label5.visible=.t.endifTimer4的timer事件代码:为了实现五角星的闪动:IFTHISFORM.label5.visiblethisform.label5.visible=.telsethisform.label5.visible=.t.endif同时在每个五角星的颜色也做了设置。(三)系统登陆表单设计界面用户在文本框输入操作员及口令,假设正确则调用系统主界面(菜单)。允许输入三次,假设三次均不正确刚自动退出系统。假设用户输入的操作员姓名及口令正确,要完成以下工作:设置一个全局变量operat,用于记录登陆系统的操作员姓名,系统中有3个地方要用到操作员的姓名和代号:一是进入主界面后在标题栏显示的操作员姓名;二是操作员在系统管理模块的口令设置中更改自己的口令,系统要知道是哪个操作员;三是退出系统时系统日志中要记录操作员的退出时间。在系统日志表log.dbf中增加一条记录,并同时记录此操作员的登录系统的时间。从权限表menuright.dbf中读出此操作员对应各菜单项的权限,并赋值给数组。调用菜单文件,显示系统主界面。事件代码:Form1的init事件代码:SETEXACTON&&准确比拟PUBLICARRAYrr[18]&&数组用于实现菜单项权限PUBLICi&&i用于记录用户名及口令输入次数PUBLICoperat&&operat用于保存操作员姓名i=0THISFORM.Text1.Setfocus“确定〞按钮(COMMAND1)CLICK事件代码:*判断密码是否正确i=i+1SELECToperatorLOCATEFOR操作员姓名=ALLTRIM(THISFORM.Text1.Value)DOCASECASEi<=3ANDFOUND()ANDTHISFORM.Text2.Value=operator.口令&&输入次数未超过3次且用户名正确、口令正确operat=THISFORM.Text1.ValueINSERTINTOlog(操作员代号,操作员姓名,登录时间)VALUES(operator.操作员代号,operator.操作员姓名,DATETIME())_SCREEN.Caption=〞学生管理系统"+SPACE(40)+DTOC(DATE())+SPACE(40)+"操作员:"+operatSELECT权限FROMmenurightINTOARRAYrrWHERE操作员代号=operator.操作员代号ORDERBY菜单项编号RELEASETHISFORMDO.\main\main_menu.mprCASEi<=3ANDFOUND()ANDTHISFORM.Text2.Value!=operator.口令&&输入次数未超过3次且用户名正确、口令不正确MESSAGEBOX("密码错误,请重输!","警告")THISFORM.Text2.Value=""THISFORM.Text2.SetfocusCASEi<=3ANDNOTFOUND()&&输入次数未超过3次且用户名不正确MESSAGEBOX("操作员姓名错误,请重输!","警告")THISFORM.Text1.Value=""THISFORM.Text2.Value=""THISFORM.Text1.SetfocusCASEi>3&&输入次数超过3次MESSAGEBOX("制止进入系统!","警告")THISFORM.ReleaseENDCASE退出按钮(COMMAND2)CLICK事件代码:RELEASETHISFORMCLEAREVENTS(四)系统菜单设计学生信息管理系统的菜单在应用系统中,各个了模块是通过菜单组织在一起的。通过对人事工资管理系统功能模块的设计,可以交系统划分为3大模块:学生信息管理、学生成绩查询、系统管理,具体的菜单设计见下表:学生信息管理学生成绩管理系统管理学生信息维护学生成绩查询操作员管理口令设置学生信息查询权限管理系统日志数据备份数据恢复退出系统在菜单设计器中实现权限设置在菜单项设计器中,通过[提示选项]对话框设置菜单项的跳过条件可以实现用户权限。每个操作员对每个菜单项有两种权限:0或1。“0〞表示此操作员对该菜单项没有操作权,系统运行后,该菜单项为灰色。不能翻开对应的表单,“1〞代表该操作员对该菜单项具有操作权,系统运行后,该菜单项可用,鼠标单击菜单项能翻开对应的表单。操作员对各菜单项的权限保存在表文件menuright.dbf中,在登录系统时读出该操作员对应各菜单项的权限,并赋值给一个数组RR。本系统共10个菜单项,所以定义的数组也包含10个元素。学生信息维护表单包换以下功能:数据录入、修改、删除、查询、浏览、保存、打印等。本表单左边是浏览窗口,便于用户浏览数据;右边是编辑窗口,主要用于输入修改数据。在表单数据环境中添加表:rsb.dbf、cjb、dbf。学生人事表和成绩表的构造请翻开数据库表查看。在表单数据环境的BRFOREOPENTABLES事件中添加代码:this.cursor1.exclusive=.t.事件代码:FORM1的INIT事件代码:THISFORMMANDGROUP1DTOP.ENABLED=.F.THISFORMMANDGROUP1DPREV.ENABLED=.F.THISFORMMANDGROUP1DNEXT.ENABLED=.T.THISFORMMANDGROUP1DBOTTOM.ENABLED=.TTHISFORMMANDGROUP1DADD.ENABLED=.T.THISFORMMANDGROUP1DEDIT.ENABLED=.T.THISFORMMANDGROUP1DDELETE.ENABLED=.T.THISFORMMANDGROUP1DFIND.ENABLED=.T.THISFORMMANDGROUP1DPRINT.ENABLED=.T.THISFORMMANDGROUP1DEXIT.ENABLED=.T.THISFORM.TEXT1.READONLY=.T.THISFORM.TEXT2.READONLY=.T.THISFORM.OPTIONGROUP1.ENABLED=.F.THISFORM.TEXT3.READONLY=.T.THISFORM.TEXT4.READONLY=.T.THISFORM.TEXT5.READONLY=.T.THISFORM.TEXT6.READONLY=.T.THISFORM.CHECK1.READONLY=.T.THISFORM.EDIT1.READONLY=.T.THISFORM.GRID1.READONLY=.T.THISFORMMAND1.visible=.T.THISFORM.LABEL11.visible=.F.THISFORM.TEXT7.visible=.F.FORM1的CLICK事件代码:THISFORM.LABEL11.visible=.F.THISFORM.TEXT7.visible=.F.GRID1的afterrowclochange事件代码:LPARAMETERSnColIndexthis.setall("dynamicbackcolor","IIF(This.activerow<>recno(),rgb(255,255,255),rgb(0,255,0))","column")selectrsbthisform.refresh此代码实现不现颜色显示选中的GRID对象的行及列。“第一个“按钮的CLICK事件代码:selectrsbgotopthisformmandgroup1dtop.enabled=.f.thisformmandgroup1dprev.enabled=.f.ifnoteof()thisformmandgroup1dnext.enabled=.t.thisformmandgroup1dbottom.enabled=.t.endifthisform.refresh“前一个“按钮的CLICK事件代码:selectrsbskip-1ifbof()gotopthisformmandgroup1dtop.enabled=.f.thisformmandgroup1dprev.enabled=.f.endififnoteof()thisformmandgroup1dnext.enabled=.t.thisformmandgroup1dbottom.enabled=.t.endifthisform.refresh“下一个“按钮的CLICK事件代码:selectrsbskipifeof()gobottomthisformmandgroup1dnext.enabled=.f.thisformmandgroup1dbottom.enabled=.f.endififnotbof()thisformmandgroup1dtop.enabled=.t.thisformmandgroup1dprev.enabled=.t.endifthisform.refresh“最后一个“按钮的CLICK事件代码:selectrsbgobottomthisformmandgroup1dnext.enabled=.f.thisformmandgroup1dbottom.enabled=.f.ifnotbof()thisformmandgroup1dtop.enabled=.t.thisformmandgroup1dprev.enabled=.t.endifthisform.refresh“增加“按钮的CLICK事件代码:ifthis.caption="增加"this.caption="保存"THISFORMMANDGROUP1DTOP.ENABLED=.F.THISFORMMANDGROUP1DPREV.ENABLED=.F.THISFORMMANDGROUP1DNEXT.ENABLED=.F.THISFORMMANDGROUP1DBOTTOM.ENABLED=.F.THISFORMMANDGROUP1DADD.ENABLED=.T.THISFORMMANDGROUP1DEDIT.ENABLED=.F.THISFORMMANDGROUP1DDELETE.ENABLED=.F.THISFORMMANDGROUP1DFIND.ENABLED=.F.THISFORMMANDGROUP1DPRINT.ENABLED=.F.THISFORMMANDGROUP1DEXIT.ENABLED=.F.THISFORM.TEXT1.READONLY=.F.THISFORM.TEXT2.READONLY=.F.THISFORM.OPTIONGROUP1.ENABLED=.T.THISFORM.TEXT3.READONLY=.F.THISFORM.TEXT4.READONLY=.F.THISFORM.TEXT5.READONLY=.F.THISFORM.TEXT6.READONLY=.F.THISFORM.CHECK1.READONLY=.F.THISFORM.EDIT1.READONLY=.F.THISFORMMAND1.VISIBLE=.F.SELECTRSBAPPENDBLANKGOBOTTOMTHISFORM.TEXT1.SETFOCUS()THISFORM.REFRESHELSETHIS.CAPTION="增加"THISFORMMANDGROUP1DTOP.ENABLED=.t.THISFORMMANDGROUP1DPREV.ENABLED=.t.THISFORMMANDGROUP1DNEXT.ENABLED=.t.THISFORMMANDGROUP1DBOTTOM.ENABLED=.t.THISFORMMANDGROUP1DADD.ENABLED=.t.THISFORMMANDGROUP1DEDIT.ENABLED=.t.THISFORMMANDGROUP1DDELETE.ENABLED=.t.THISFORMMANDGROUP1DFIND.ENABLED=.t.THISFORMMANDGROUP1DPRINT.ENABLED=.t.THISFORMMANDGROUP1DEXIT.ENABLED=.t.THISFORM.TEXT1.READONLY=.t.THISFORM.TEXT2.READONLY=.t.THISFORM.OPTIONGROUP1.ENABLED=.f.THISFORM.TEXT3.READONLY=.t.THISFORM.TEXT4.READONLY=.t.THISFORM.TEXT5.READONLY=.t.THISFORM.TEXT6.READONLY=.t.THISFORM.CHECK1.READONLY=.t.THISFORM.EDIT1.READONLY=.t.thisformmand1.visible=.t.endif“删除“按钮的CLICK事件代码:SELECTRSBXH=RSB.学号sel=messagebox("该记录学号为:"+XH+chr(13)+"真的要删除吗?",4+32+256,"提示")ifsel=6deleteendif“查找“按钮的CLICK事件代码:thisform.label11.visible=.t.thisform.text7.visible=.t.thisform.text7.value=""thisform.text7.setfocus()“打印“按钮的CLICK事件代码:reportform.\menu1\rsb_bb1.frxpreviewforrsb.学号=alltrim(thisform.text1.value)“退出“按钮的CLICK事件代码:selectrsbpackthisform.release“TEXT7〞的valid事件代码为:selectrsbsetfilterto学号=alltrim(thisform.text7.value)or学生姓名=alltrim(thisform.text7.value)locatefor学号=alltrim(thisform.text7.value)or学生姓名=alltrim(thisform.text7.value)thisform.refreshsetfilterto6、运行界面:(如图5)(图5)7、学生信息查询菜单的设计学生人事信息的查询是基于RSB.dbf表,菜单提供学号,姓名,全体查询。分别利用不同的命令代码方式实现查询打印功能。功能是便于指导员和教师,学生用户的检索查询。各事件的代码如下:FORM1的INIT事件代码:*输入编号、姓名提示标签及文本框THISFORM.Label2.Visible=.F.THISFORM.Text1.Visible=.F.THISFORM.Text1.Setfocus()*输入起始日期、截止日期提示标签及文本框不可见THISFORM.Label4.Visible=.F.THISFORM.Label5.Visible=.F.THISFORM.Text2.Visible=.F.THISFORM.Text3.Visible=.F.THISFORMmand4.Visible=.F.*表格数据不可修改THISFORM.Grid1.Readonly=.T.Optiongroup1的CLICK事件代码:*选定查询类别后,设置各控件是否可见DOCASECASETHIS.Value=1&&按学号查询THISFORM.Label2.Visible=.T.THISFORM.Text1.Visible=.T.THISFORM.Label4.Visible=.F.THISFORM.Label5.Visible=.F. THISFORM.Text2.Visible=.F. THISFORM.Text3.Visible=.F. THISFORMmand4.Visible=.F.THISFORM.Label2.Caption="请输入要查询的学号:"THISFORM.Text1.Value=""THISFORM.Text1.SetfocusCASETHIS.Value=2&&按姓名查询THISFORM.Label2.Visible=.T.THISFORM.Text1.Visible=.T.THISFORM.Label4.Visible=.F. THISFORM.Label5.Visible=.F. THISFORM.Text2.Visible=.F. THISFORM.Text3.Visible=.F. THISFORMmand4.Visible=.F.THISFORM.Label2.Caption="请输入学生姓名:"THISFORM.Text1.Value=""THISFORM.Text1.Setfocus()CASETHIS.Value=3&&按出生日期查询THISFORM.Label2.Visible=.F.THISFORM.Text1.Visible=.F.THISFORM.Label4.Visible=.T.THISFORM.Label5.Visible=.T.THISFORM.Text2.Visible=.T.THISFORM.Text3.Visible=.T.THISFORMmand4.Visible=.T.THISFORM.Text2.SetfocusCASETHIS.Value=4&&显示全体记录THISFORM.Label2.Visible=.F.THISFORM.Text1.Visible=.F.THISFORM.Label4.Visible=.F. THISFORM.Label5.Visible=.F. THISFORM.Text2.Visible=.F. THISFORM.Text3.Visible=.F. THISFORMmand4.Visible=.F.SETFILTERTOGOTOPTHISFORM.Grid1.Re
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 四下18课知识课件
- 2024年度工程人才引进居间合同2篇
- 二零二四年度广告代理合同服务内容拓展协议2篇
- 4.1科学探究力的合成课件高一上学期物理
- 二零二四年度福州市外贸公司业务员劳动合同2篇
- 2024版技术咨询合同条款
- 人教版九年级化学第二单元复习课件
- 二零二四年度物业管理服务合同:物业公司管理与服务质量保证3篇
- 诊所合同模板
- 2024版租赁合同:工业厂房租赁与运营
- GB 10765-2021 食品安全国家标准 婴儿配方食品(高清版)
- 清产核资基础报表(模板)
- 规范使用国家通用语言(课堂PPT)
- 柔性光伏组件项目可行性研究报告写作范文
- CJT362-2011城镇污水处理厂污泥处置林地用泥质
- 贵州省商标品牌指导站申报书
- 工程造价安装预算毕业设计超完整版
- 广州钛白粉项目实施方案(参考模板)
- 砂子检验报告
- 加氢裂化装置技术问答
- QGDW 10272-2018 大型电厂接入系统设计内容深度规定
评论
0/150
提交评论