学生上机管理及考勤系统-网络-软件实验报告.doc

《学生上机管理及考勤系统-网络-软件实验报告.doc》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、软件实验报告题目：学生上机管理及考勤系统日期：2004年10月24日21第21页共21页目录：一：系统结构图------------------------------------第3页二：功能模块及其划分简介和同学的分工---第3页三:各功能模块详细说明-------------------------第3页（一）刷卡模拟机-------------------------------------------第3页（二）通信机-------------------------------------------------第5页（三）客户查询机---------

2、----------------------------------第9页（四）客户设置机-------------------------------------------第12页四：数据库表--------------------------------------第19页五：心得体会和意见、建议--------------------第20页一：系统结构简图：21第21页共21页系统设置一个管理中心和若干台放置在远端的刷卡机（用一台PC机模拟），如图所示。以太网物管中心客户机客户机服务器通信客户机刷卡机以太网RS-232返回目录二：功能模块及其划分简介1、

3、刷卡模拟机：模拟刷卡动作把卡号发送给通信客户机，同时接收通信客户机返回的相关信息并显示。2、客户通信机：接收卡号后判断是否有效，并根据判断发相关信息给刷卡机（如卡号，机房号，机器号，上机密码）。学生卡有效时存卡号、机房号、机号、上机时间等信息到学生上机信息表中。删除上机预约表中的相关项。修改学生信息表中的次数。修改电脑表中的是否使用项。3、服务器：共四张表information存储学生上机卡号、机房号、机号、上机时间；xuesheng存储学生的基本信息：姓名、卡号、班级、宿舍电话、手机号；diannao表存储机房号，机号，是否被预订，是否完好；yuyue表存储卡号

4、，机房号，机号，预约时间。4、客户查询机：可按卡号，姓名，班级，上机次数查询学生基本情况。5、客户设置机：分电脑情况设置，学生情况设置，预约。电脑情况设置进行新机加入，原机器各信息修改和机器的删除。学生情况设置进行学生的加入、删除和基本信息的修改。预约为学生上机预约。6、同学间分工：杜英芳负责刷卡机和通信机，刘倩、熊杰、邹雯珠负责客户查询机和客户设置机，张雪负责数据库的建立和设置。返回目录三：各功能模块说明（一）：刷卡模拟机的设计1、完成的功能模拟刷卡动作把卡号发送给通信客户机，同时接收通信客户机返回的相关信息并显示。2、实现步骤：界面设计上只有一个combobo

5、x，一个Listbox、button和串行口控件21第21页共21页，combobox用于输入卡号，原来用的是edit控件但在测试时为了方便就改成combobox。它的items设了九个从至，也可自己输入其它号码，进行动作模拟。Button是退出按钮。然后在各控件中添加代码：界面的初始化是我们仿照老师给的程序copy过来的和退出按钮的代码都不存在什么问题。procedureTForm1.FormCreatfe(Sender:TObject);beginifNotMSComm1.PortOpenthenbeginMSComm1.PortOpen:=True;MSCo

6、mm1.DTREnable:=True;MSComm1.RTSEnable:=True;end;MSComm1.RThreshold:=1;end;procedureTForm1.Button3Click(Sender:TObject);beginMSComm1.PortOpen:=False;close;end;这一段代码是模仿老师的模版做的都没什么问题。procedureTForm1.MSComm1Comm(Sender:TObject);varReceBuf:string;begin21第21页共21页ReceBuf:=Trim(MSComm1.Input)

7、;ListBox1.Items.Add(ReceBuf);end;这用于选择固定的几个卡号，不必要每次输入一长串数字，完全是出于省事。procedureTForm1.ComboBox1Select(Sender:TObject);beginifMSComm1.PortOpenthenbeginMSComm1.Output:=ComboBox1.Text;ListBox1.Clear;endelseMessagedlg('通信端口1未打开！',mtError,[mbok],0);end;这个函数用于自己输入其它号码进行测试，按回车触动。procedureTForm1

8、.Comb