Web、ASP程序设计――网络教学平台源代码及报告

学号Web程序设计与应用实验报告网络教学平台系统学生姓名XX专业、班级XX指导教师XX成绩电子与信息工程系20XX年XX月XX日天津城市建设学院设计性实验任务书系专业班姓名学号课程名称：Web程序设计与应用设计题目：请设计一个简单的表单与数据库连接并进行简单的数据处理的ASP程序完成期限：自年月日至年月日设计依据、要求及主要内容（可另加附页）：1、设计依据：本实验是以教材《Web程序设计与应用》一书为依据,掌握Asp相关对象及Access数据库的使用。2、设计要求：有数据库mis.accdb和wenti.mdb，其中mis.accdb数据库包含数据表Announcement、Class、Course、Coursefile、Homework、On_Class、Professional、Question、Question_Answer、sb_hw、Score、Student、Teacher、Term、Title、user0；而wenti.mdb包含Question数据表。设计一个ASP系统，设置了共计37个页面实现了网络教学平台应该具有大部分功能：登录，教师、学生信息，提问、回答，系统公告，课程公告，课程选择，课程练习等。这些功能都涉及了数据库数据的增加、修改、删除、查询等操作。指导教师：一、实验目的设计ASP页面，与Access数据库作连接，并根据系统功能对数据库中的数据进行增加、删除、修改、查询等的功能。二、实验内容有数据库mis.accdb和wenti.mdb，其中mis.accdb数据库包含数据表Announcement、Class、Course、Coursefile、Homework、On_Class、Professional、Question、Question_Answer、sb_hw、Score、Student、Teacher、Term、Title、user0；而wenti.mdb包含Question数据表。设计一个ASP系统，设置了共计37个页面实现了网络教学平台应该具有大部分功能：登录，教师、学生信息，提问、回答，系统公告，课程公告，课程选择，课程练习等。这些功能都涉及了数据库数据的增加、修改、删除、查询等操作。三、实验思想利用ASP进行数据库的程序设计，先设计好数据库，再建立获取信息的表单，再将两者连接起来，并完成增加、删除、修改、查询的功能。四、实验结果1.数据库mis.accdb和wenti.mdb：2.网络教学平台系统的各个界面：1)登录界面：包含用户名、密码和权限，输入了正确的用户名和密码后，还需要选对权限，这样才能正常进入系统。2)管理员账号登录后的“公告”界面：设有查看公告、发布新的公告和删除之前的公告3个功能3)管理员账号的“个人信息”界面（因为管理员也是老师，因此界面上称呼为老师）：包括基本信息显示、密码修改和基本信息修改功能4)教师账号登录后的“个人信息”界面：包括基本信息显示、密码修改和基本信息修改功能5)教师的“网络教学”页面：该能是对课程的学习目标、教学大纲、实验大纲等课程基本资料编辑6)教师可查看的“公告”界面：包括查看公告、发布公告、删除公告功能7)教师可的“发布公告”界面：8)教师可查看的“在线答疑”的页面中的查看留言功能页面：教师可以在此页面查看学生关于课程的各类问题，并给予回答9)教师可查看的“在线答疑”的页面中的编写留言功能页面：教室也可以在在线答疑页面进行给予学生的留言10)学生登录后的“个人信息”界面，与教师的个人信息页面设计原理一致11)学生的“网络教学”界面：供学生选择课程及课程的相应属性，查看所选的课程属性进行有目标有计划的学习12)学生的“在线自测”界面：学生可以在此页面对课程及题型进行选择，进行自我测试，点击答案链接即可查看该题的答案13)点击“答案1”后的答案界面：14)学生的“公告”界面：将公告分为两类：系统公告和课程公告15)学生的“在线答疑”页面：增加了课按课程选择留言显示的功能3.主要页面的代码：1)conn.asp%Dimconn,connstr,db,rsdb=db/mis.accdbSetconn=Server.CreateObject(ADODB.Connection)connstr=Provider=microsoft.ACE.oledb.12.0;DataSource=&Server.MapPath(db)conn.Openconnstr%2)index.asp%@LANGUAGE=VBSCRIPTCODEPAGE=936%!DOCTYPEhtmlPUBLIC-//W3C//DTDXHTML1.0Transitional//EN==Content-Typecontent=text/html;charset=gb2312/title无标题文档/title/head!--#includefile=conn.asp--%IfRequest.QueryString(act)=checkthendimadmin,pwd,poweradmin=replace(Trim(request.form(user_ID)),',)pwd=replace(Trim(request.form(pwd)),',)power=replace(Trim(request.form(power)),',)setrs=conn.execute(select*fromuser0wherepower=&power)ifadmin=rs(user_ID)andpwd=rs(pwd)thensession(user_ID)=adminifpower=1thenresponse.redirectteacher_xinxi.aspelseifpower=2thenresponse.redirectstudent_xinxi.aspelseifpower=0thenresponse.redirectp_k_gonggao.aspendifelseresponse.writescriptalert('登录失败，请检查用户名或者密码是否正确');location.href='index.asp';/scriptendifsetrs=nothingendifconn.close%styletype=text/css!--.STYLE2{font-family:宋体;font-size:16px;}.STYLE5{font-size:16px}body{background-image:url(imag/loginb1.jpg);background-repeat:no-repeat;}--/stylebodydivalign=center/divformid=loginname=loginmethod=postaction=index.asp?act=checkp /pp /pp /pp /ptablewidth=300height=150border=1align=centerbgcolor=#6699CCtrtdwidth=70align=centerspanclass=STYLE5用户名：/span/tdtdwidth=188inputname=user_IDtype=textid=user_IDmaxlength=9height=30width=210//td/trtrtdspanclass=STYLE2密码：/span/tdtdinputname=pwdtype=passwordid=pwdheight=30width=210//td/trtrtdheight=30spanclass=STYLE5权限：/span/tdtdselectname=powerid=poweroptionvalue=0管理员/optionoptionvalue=1教师/optionoptionvalue=2学生/option/select/td/trtrtdheight=30colspan=2align=centerinputname=denglutype=submitid=dengluvalue=登陆onClick=chekc(%=yzm%);/     inputname=quxiaotype=resetid=quxiaovalue=取消//td/tr/tablep /pp /pp /pp /p/form/body/html3)teacher_xinxi.asp%@LANGUAGE=VBSCRIPTCODEPAGE=936%!DOCTYPEhtmlPUBLIC-//W3C//DTDXHTML1.0Transitional//EN==Content-Typecontent=text/html;charset=gb2312/title无标题文档/title/headbody!--#includefile=conn.asp--!--#includefile=banner.asp--%ifsession(user_ID)nullthenresponse.Redirectlogin.asp?ErrMsg=请先登录response.End()elsedimrs1,rs2,rs3setrs1=conn.execute(select*fromteacherwhereuser_ID='&session(user_ID)&')setrs2=conn.execute(select*fromuser0whereuser_ID='&session(user_ID)&')setrs3=conn.execute(selectcs_namefromCoursewherecs_IDin(selectcs_IDfromOn_classwhereuser_ID='&session(user_ID)&'))%divtablealign=leftborder=0height=20width=174trtdwidth=168/td/trtrtdheight=30align=centerahref=teacher_xinxi.asp教师基本信息/a/td/trtrtdheight=30align=centerahref=t_pwdchange.asp密码修改/a/td/trtrtdheight=30align=centerahref=t_xinxi_change.asp教师信息修改/a/td/tr/table/divdivformid=teacher_xinximethod=posttablealign=leftborder=0height=20width=300trtdalign=center用户名：/tdtd%=trim(rs2(user_ID))%/td/t