![基于BS架构的在线选课信息管理系统设计_第1页](http://file1.renrendoc.com/fileroot_temp2/2021-2/16/377d871f-96a2-40bc-ab95-594163310a45/377d871f-96a2-40bc-ab95-594163310a451.gif)
![基于BS架构的在线选课信息管理系统设计_第2页](http://file1.renrendoc.com/fileroot_temp2/2021-2/16/377d871f-96a2-40bc-ab95-594163310a45/377d871f-96a2-40bc-ab95-594163310a452.gif)
![基于BS架构的在线选课信息管理系统设计_第3页](http://file1.renrendoc.com/fileroot_temp2/2021-2/16/377d871f-96a2-40bc-ab95-594163310a45/377d871f-96a2-40bc-ab95-594163310a453.gif)
![基于BS架构的在线选课信息管理系统设计_第4页](http://file1.renrendoc.com/fileroot_temp2/2021-2/16/377d871f-96a2-40bc-ab95-594163310a45/377d871f-96a2-40bc-ab95-594163310a454.gif)
![基于BS架构的在线选课信息管理系统设计_第5页](http://file1.renrendoc.com/fileroot_temp2/2021-2/16/377d871f-96a2-40bc-ab95-594163310a45/377d871f-96a2-40bc-ab95-594163310a455.gif)
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
1、GDGM-QR-03-077-A/0 Guangdong College of Industry ) Exit Sub End If If dbm.checkUser(username, password, limit) = True Then Select Case limit Case 0 Session(sid) = username Response.Redirect(StudentMain.aspx) Case 1 Session(tid) = username Response.Redirect(TeacherMain.aspx) Case 2 Session(aid) = use
2、rname Response.Redirect(Admin.aspx) End Select Else Me.Response.Write(alert(用户名或密码不正确!);) Exit Sub End If End Sub 4.2 管理员设置选课时间模块 图 4-2 设置选课时间界面 Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click Dim startTime As Date = txtStartTIme.Text Dim endTim
3、e As Date = txtEndTime.Text If dbm.setChooseTime(startTime, endTime) = True Then Response.Write(alert(设置时间成功) Else Response.Write(alert(设置时间失败) End If End Sub 4.3 教室管理模块 图 4-3 教室设置界面 Dim str As String = dbm.str_Trim(txtRNum.Text.ToString() + , + dbm.str_Trim(txtRName.Text.ToString() + , + dbm.str_Tr
4、im(txtRpn.Text.ToString() If dbm.addRoom(str) = True Then Response.Write(alert(添加成功) Else Response.Write(alert(添加失败,请检查教室编号时候已经存在) End If End Sub 4.4 教师与学生信息管理模块 图 4-4 教师与学生信息管理界面 If dbm.addTeacher(Str) = True Then Response.Write(alert(添加成功) Else Response.Write(alert(添加失败,请检查教师编号时候已经存在) End If End S
5、ub If dbm.addStudent(str) = True Then Response.Write(alert(添加成功) Else Response.Write(alert(添加失败,请检查学生编号时候已经存在) End If End Sub 4.5 查看教师所任课程模块 图 4-5 教师个人所开课程界面 4.6 教师管理个人信息模块 图 4-6 教师个人信息管理界面 Protected Sub Button3_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button3.Click Dim str
6、 As String = dbm.str_Trim(lbSID.Text.ToString() + , + dbm.str_Trim(txtName.Text.ToString() + , + dbm.str_Trim(ddlSex.Text.ToString() + _ dbm.str_Trim(txtBirthday.Text.ToString() dbm.updateStudentInfo(str) Response.Write(alert(保存成功) End Sub Protected Sub Button4_Click(ByVal sender As Object, ByVal e
7、As System.EventArgs) Handles Button4.Click If txtOldPsd.Text = txtNewPsd.Text Then Dim s_id As String = Session(sid).ToString() dbm.change_password(s_id, Student, txtOldPsd.Text.ToString() Response.Write(alert(修改成功) Else Response.Write(alert(两次密码不一致) End If End Sub 4.7 教师评定成绩模块 图 4-7 教师评定成绩界面 4.8 教师
8、课程安排管理模块 图 4-8 课程安排管理界面 Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click Dim sw, ew As String If dbm.hasCoures(ddlCName.SelectedValue.ToString() Then Response.Write(alert(该课程已经设置了开课时间) Else Dim str As String = ddlCName.SelectedValue.ToString() +
9、, + sw + , + ew + , + txtTime.Text.ToString() + , + ddlRName.SelectedValue.ToString() dbm.addCourseTime(str) Response.Write(alert(添加成功) Response.Redirect(/CourseTime.aspx) End If End Sub 4.9 教师开设新课程模块 图 4-9 开设新课程界面 If txtCname.Text.ToString() = Or txtCscore.Text.ToString() = Or dbm.str_Trim(txtMaxNu
10、m.Text.ToString() = Then Response.Write(alert(请填入完整信息) Exit Sub Else dbm.addCourse(str) Response.Write(alert(开设成功) End If End Sub Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load If Session(tid) = Or Session(tid) = Nothing Then Response.Redirect(/login.asp
11、x) Exit Sub End If End Sub 4.10 学生个人信息模块 图 4-10 学生个人信息界面 4.11 学生个人信息管理模块 图 4-11 学生个人信息管理界面 Protected Sub Button3_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button3.Click Dim str As String = dbm.str_Trim(lbSID.Text.ToString() + , + dbm.str_Trim(txtName.Text.ToString() + , + db
12、m.str_Trim(ddlSex.Text.ToString() + _ dbm.str_Trim(txtBirthday.Text.ToString() dbm.updateStudentInfo(str) Response.Write(alert(保存成功) End Sub Protected Sub Button4_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button4.Click If txtOldPsd.Text = txtNewPsd.Text Then Dim s_id As Stri
13、ng = Session(sid).ToString() dbm.change_password(s_id, Student, txtOldPsd.Text.ToString() Response.Write(alert(修改成功) Else Response.Write(alert(两次密码不一致) End If End Sub 4.12 学生选择课程模块 图 4-12 学生选择课程管理界面 If Not IsPostBack Then If dbm.isChooseTime = False Then Dim startTime As String = dbm.getChooseTime()
14、.Split(,)(0) Dim endTime As String = dbm.getChooseTime().Split(,)(1) Response.Write(alert(选课时间为: + startTime + 到 + endTime + 现在不是选课时间) End If lbselect.Text += dbm.getchoose(sid) End If End Sub 第五章调试与测试 5.1 测试环境 该系统需要在网络环境下运行,对整个系统的性能要求较高,测试环境如下:浏览器 采用 IE6.0,数据库采用稳定性好的 SQL Server 2005, 操作系统为 WINDOS X
15、P;本系统采 用 ASP.NET 平台。 5.2 测试的项目 该系统分为管理员、教师、学生三种用户,因此该测试项目的内容主要是三种用户实 现的功能,主要如下: 管理员:学生信息、教师信息以及课室信息的添加、删除;选课时间的设置。 教师:已任课程的查看;开设新课程;评定选课学生成绩;个人信息以及密码的修改。 学生:查看已选课程;查看所有课程信息;查看能选的课程信息;课程的退选;课程 信息的查看;个人信息及密码的修改。 5.3 系统测试 (1)测试目标 用户通过 Internet 可以访问到登录窗口,并可以在用户名,密码框内输入用户 ID 和 密码,如果数据库中存在该用户 ID 和密码就可以进入不
16、同权限的主页内,否则就会提示 输入错误的用户名或密码,要求重新输入。 (2)测试步骤 首先,用户在出现登录界面时,要求输入用户名和密码。其次,在用户名处输入用户 本人的用户 ID,在密码处输入正确的密码,然后选择操作权限,最后点击“登录”按钮。 (3)测试结果 在正确输入用户名和密码时,可以顺利进入到不同权限的主页,但如果输入错误的用 户名或密码信息就会弹出一个提示框“用户名或密码不正确!”。此时就要重新输入正确 的用户名和密码。 5.4 测试结果的分析与总结 经过测试,本系统达到了预期效果,实现了选课、退课、查询、课程信息浏览等功能。 由于本身能力的局限性,编写的代码,即使经过反复检查也难免
17、出错,所以在本阶段力求 使用有限的时间找出尽可能多的错误,力求系统尽量正确。 本系统所涉及的数据库设计的重要步骤加载测试。加载测试工作贯穿于程序测试工作 的全过程,整个录入、修改、查询、处理工作均可视为对数据库的加载测试工作。要设计 出一个好的学生在线选课系统数据库,除满足系统所要求的功能外,所有基本表的设计还 应尽量符合第三范式。数据库的设计中,如何处理多对多的关系和如何设置主键,是两个 有着较大难度、需要重点考虑的问题。 结束语 经过近两个月的努力,通过网上查询资料,本人对学生选课系统有了较深刻的认识, 也具备了一定的实际开发经验。认识到开发系统首先要明确用户的需求,然后进行系统分 析,其
18、次构建系统模型、建立完善的数据库,接着编写代码,最后测试系统。 在明确用户需求阶段,网上查阅了相关资料,并浏览了部分网上选课系统,分析总结 后将系统分为学生信息管理、教师信息管理、课程信息管理和权限的判断四个模块。 在系统分析阶段,查阅了大量基于不同技术的网站开发的文章,具备了一定的理论基 础,比较分析后采用了 ASP.NET 编程技术和 SQL Server 2005 数据库,在 Windows XP 操 作系统环境下,运用 Dreamweaver 8 开发工具,开发了这个基于 B/S 结构的学生在线选课 系统的实现。本系统不但有良好的系统运行稳定性、可靠性和实用性,而且操作简单,维 护方便,具有一定的实用价值。 系统进入编程阶段后,遇到了很多的困难,主要是数据的存取。但经过自己的努力及 老师的指导,最终解决了这些问题,开发出一个学生选课系统,并达到了预期的设想。 虽然系统还有很多不足之处,如:程序中错误处理和输入控制不够全面,可能导致输 入无效引发错误。但在整个开发过程中我学到了很多的知识,增强了动手能力,积累了解 决各种难题的经验。同时也让我发现了自己的许多不足之处,有待在将来的工作中进一步 的学习和完善,掌握和运用更多的知识。 参
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 短视频内容创作与传播策略研究
- 新员工座谈会发言稿
- 短视频在社交电商中的应用与策略
- 小学数学教师远程培训个人研修总结
- 电商物流与城市交通模式的协同创新
- 幼儿园保安人员年终总结
- 生物医药产业创新驱动与投资策略
- 下半年律师工作计划总结
- 现代石油化工管道安装技术发展趋势
- 线下主播签约合作协议书范本
- 茉莉花的生长习性及栽培管理办法
- 人教版九年级英语动词时态专项练习(含答案和解析)
- 蛤蟆先生去看心理医生
- 悬挑式卸料平台安拆作业安全技术交底
- 疾病诊断编码库ICD-10
- 兰州市规范医疗服务价格项目基准价格表
- 产品设计材料及工艺PPT完整版全套教学课件
- 2006年度银行业金融机构信息科技风险评价审计要点
- 反恐C-TPAT程序文件整套(通用)
- 2022年全国高考诗歌鉴赏试题-教学课件
- 化学检验工高级工理论知识试题题及答案
评论
0/150
提交评论