论文首页哲学论文经济论文法学论文教育论文文学论文历史论文理学论文工学论文医学论文管理论文艺术论文 |
目 录
前言 3
第一章 编程环境基础知识 4
1.1 ASP技术简介 4
1.2 ACCESS2003 技术简介 4
第二章 需求分析 1
2.1 目标设计 1
2.2 系统功能分析与设计 2
2.3 性能需求 2
第三章 系统设计 4
3.1 资料显示模块 4
3.1.1 资料信息显示页 5
3.1.2 资料详细信息页 9
3.1.3 资料信息下载页 11
3.1.4 提交回复作业页 12
3.1.5 提交回复作业成功页 13
3.1.6 教师基本信息页 16
3.1.7 资料信息搜索页 20
3.1.8 资料信息搜索结果页 21
3.2 资料管理模块 22
3.2.1 管理员登陆页 24
3.2.2 验证管理员帐号页 24
3.2.3 管理员登陆成功页 26
3.2.4 增加资料栏目页 27
3.2.5 增加栏目成功页 28
3.2.6 修改栏目信息页 30
3.2.7 保存修改的栏目信息页 32
3.2.8 删除栏目信息页 34
3.2.9 删除栏目信息成功页 34
3.2.10 发布资料信息页 36
3.2.11 资料信息发布成功页 38
3.2.12 资料信息列表页 39
3.2.13 资料信息修改页 39
3.2.14 保存修改的资料信息页 42
3.2.15 删除资料信息页 46
3.2.16 删除资料信息成功页 47
3.3 教师管理 50
3.3.1 搜索教师页 51
3.3.2 教师搜索结果页 52
3.3.3 添加教师信息页 53
3.3.4 添加教师成功页 54
3.3.5 修改教师信息页 55
3.3.6 修改教师信息成功页 57
3.3.7 删除教师信息页 58
3.3.8 删除教师信息成功页 58
第四章 数据库结构设计 60
4.1 数据库需求分析 60 您可以访问中国科教评价网(www.NsEac.com)查看更多相关的文章。
4.2 数据库逻辑设计 60
4.3 数据库连接说明 61
第五章 测试和维护 62
5.1 网站维护 62
5.2 网站测试 62
参考文献 63
致谢 64
前言
与传统教育相比,远程教育是一种全新的教育模式,它可以突破时间和空间的限制,帮助人们随时随地地学习,让更多的学习者共享优秀教育资源。远程教育既具有开放性、交互性、协作性和自主性等特点,又具有异步性、实时性、生动性、集成性和大容量等优势。因此,在远程教育系统的建设中,单纯地构建各种功能单一的系统并不能完全满足远程教育建设的需求,只有那些对数据和信息进行了有效组织、整合了多种业务、为用户提供个性化服务的系统才能充分发挥远程教育的作用。
使用在线教育系统可以为用户提供在线教案学习、在线提交作业和查询教师等服务。
第一章 编程环境基础知识
1.1 ASP技术简介
Microsoft Active Server Pages 即我们所称的ASP,其实是一套微软开发的服务器端脚本环境.Active Server Page 是创建动态网页的一个很好的工具,它起一种编程语言的作用,可以利用它编写动态产生HTML的程序代码.因此,只要用户浏览Web站点并请求一个ASP页,Web服务器就可以处理相应的ASP代码,生成HTML代码,然后将它传递到用户浏览器并显示出网页.
ASP程序的优点:
1,ASP使用VBScript脚本语言直接源于VB语言,秉承了VB简单易学的特点,掌管起来非常容易.
2,无须编译,容易编写,可在服务器端直接执行.
3,利用ADO组件轻松存取数据库.
4,与浏览器无关,客户端只要使用可执行HTML码的浏览器,即可浏览ASP所设计的网页内容.
5,ASP能与任何ActiveX scripting语言相容.除了可使用VBScript或java script语言来设计外,还通过plug-in的方式,使用由第三方所提供的其他脚本语言.
(科教范文网 lw.nseaC.Com编辑发布)
图3-3 资料详细信息
2. 页面中需要用户填写的Html表单元素。
此页无需填写Html表单元素。 (科教范文网http://fw.nseac.com)
3. 面所涉及的数据库表信息。
此页使用了系统中的资料信息表main和教师信息表teacher。
4. 页面代码分析
‘引用创建数据库连接对象函数文件
<!--#include file="conn.asp"-->
‘引用网站设置文件
<!--#include file="fenlei.asp"-->
<%’取得要显示资料信息的id号
id = request("id")
if id = "" then
conn.close
set conn = nothing
response.write "<script>alert('没有找到您要查看的记录');window.close();</script>"
response.end
end if
‘打开记录集对象
set rs = server.createobject("adodb.recordset")
sql = "select * from main,teacher,type where main.idofteacher=teacher.teacherid and main.idoftype=type.typeid and main.mainid="&id
‘取得资料详细信息
rs.open sql,conn,1,1
‘如果资料详细信息不存在则提示错误
if rs.bof and rs.eof then
rs.close
set rs = nothing
conn.close
set conn = nothing
response.write "<script>alert('没有找到您要查看的记录');window.close();</script>"
response.end
else
%>
‘Html页面显示部分,显示资料的详细信息
……
<%’关闭记录集对象
rs.close
set rs = nothing
‘关闭数据库连接对象
conn.close
set conn = nothing
end if
3.1.3 资料信息下载页
1. download.asp页面示例
图3-4 为阅读资料信息所看到的页面。
图3-4 阅读资料信息
2. 页面中需要用户填写的Html表单元素
此页无需填写Html表单元素。 (转载自http://zw.NSEaC.com科教作文网)
3. 页面所涉及的数据库表信息
此页使用了系统中的资料信息表main。
4. 页面代码分析
<%’取得要显示资料信息的id号
id = trim(request("id"))
if id = "" then
conn.close
set conn = nothing
response.write "<script>alert('没有找到您要阅读的资料');window.close();</script>"
response.end
end if
sql = "select * from main where mainid="&id
set rs = server.createobject("adodb.recordset")
‘取得资料详细信息
rs.open sql,conn,1,3
‘如果资料详细信息不存在则提示错误
if rs.bof and rs.eof then
rs.close
set rs = nothing
conn.close
set conn = nothing
response.write "<script>alert('没有找到您要阅读的资料');window.close();</script>"
response.end
‘如果资料详细信息存在
Else
‘该资料阅读数加1
rs("times") = rs("times") + 1
rs.update
‘页面下载或者打开资料信息
response.redirect rs("fileurl")
‘关闭记录集对象
rs.close
set rs = nothing
‘关闭数据库连接对象
conn.close
set conn = nothing
end if
%>
3.1.4 提交回复作业页
1. redetail.asp页面示例
图3-5为提交回复作业信息所看到的页面。
图3-5 提交回复作业信息
2. 页面中需要用户填写的Html表单元素
此页中有3个表单元素,如表1所示。
表1 redetail.asp页的表单元素
名称 表单元素类型 含义 最大长度 (转载自科教范文网http://fw.nseac.com)
Name Text 学生姓名 20
Title Text 作业标题 20
Message Textarea 作业答案 100
3. 页面所涉及的数据库表信息
此页面用来显示提交回复作业信息,并没有涉及到数据库表的操作。
4. 页面代码分析
‘Html页面表单提交到redetailok.asp提交作业答案
<form action="redetailok.asp" method="post" >
‘Html页面显示部分
……
</form>
3.1.5 提交回复作业成功页
1. 页面中需要用户填写的Html表单元素
此页无需填写Html表单元素。
2. 页面所涉及的数据库表信息
此页使用了系统中的回复作业信息记录表work。
3. 页面代码分析
‘引用创建数据库连接对象函数文件
<!--#include file="conn.asp"-->
<%’学生姓名必须要输入
name = trim(request("name"))
if name = "" then
response.write "<script>alert('请输入学生姓名');history.go(-1);</script>"
conn.close
set conn = nothing
response.end
end if
if len(name) > 5 then
response.write "<script>alert('学生姓名不得超过5个汉字');history.go(-1);</script>"
conn.close
set conn = nothing
response.end
end if
‘作业标题必须要输入
title = trim(request("title"))
if title = "" then
response.write "<script>alert('请输入作业标题');history.go(-1);</script>"
conn.close
set conn = nothing
response.end
end if
‘作业答案必须要输入
message = trim(request("message"))
if message = "" then (科教范文网 lw.nSeAc.com编辑发布)
response.write "<script>alert('请输入作业答案');history.go(-1);</script>"
conn.close
set conn = nothing
response.end
end if
‘作业的id号必须存在
reid = trim(request("reid"))
if reid = "" then
response.write "<script>alert('非法操作');history.go(-1);</script>"
conn.close
set conn = nothing
response.end
end if
sql = "select * from work where name='"&name&"' and reid="&reid
set rs = server.createobject("adodb.recordset")
‘查找作业表中是否存在学生姓名和回复作业的id号相同的记录存在
rs.open sql,conn,1,3
‘如果存在则说明学生已经提交过作业不能再提交了
if not (rs.bof and rs.eof) then
rs.close
set rs = nothing
conn.close
set conn = nothing
response.write "<script>alert('你已经提交过作业了');history.go(-1);</script>"
response.end
else
‘如果不存在则添加作业答案记录
rs.addnew
rs("reid")=reid
rs("name")=name
rs("title")=title
rs("message")=message
‘添加作业答案记录成功
rs.update
‘关闭记录集对象
rs.close
set rs = nothing
‘关闭数据库连接对象
conn.close
set conn = nothing
end if
response.write "<script>alert('添加成功');window.location.href='index.asp';</script>"
%>
3.1.6 教师基本信息页
1. teacherinfo.asp页面示例
图3-6为显示教师基本信息所看到的页面。
图3-6 显示教师基本信息 本文来自中国科教评价网
2. 页面中需要用户填写的Html表单元素
此页无需填写Html表单元素。
3. 页面所涉及的数据库表信息
此页面用来显示教师基本信息,此页使用了系统中的资料信息表main和教师信息表teacher。
4. 页面代码分析
<%’取得要显示教师信息的id号
id = trim(request("id"))
if id = "" then
conn.close
set conn = nothing
response.write "<script>alert('请不要捣乱');top.window.location.href='index.asp';</script>"
response.end
end if
‘判断用户是否是管理员
if session("admin") = "admin" then
isadmin = true
else
isadmin = false
end if
‘判断用户是否是教师
if session("teacherid") <> "" then
isteacher = true
else
isteacher = false
end if
‘取得教师详细信息
sql = "select * from teacher where teacherid="&id
set rs = server.createobject("adodb.recordset")
rs.open sql,conn,1,1
%>
‘Html页面显示部分,显示教师信息
……
<%’关闭记录集对象
rs.close
end if
‘取得栏目信息
sql = "select * from type"
rs.open sql,conn,1,1
set rs1 = server.createobject("adodb.recordset")
‘所有栏目信息
do while not rs.eof
sql1 = "select count(mainid) from main where idofteacher="&id&" and idoftype="&rs("typeid")
‘取得教师在该栏目发表的资料总数
rs1.open sql1,conn,1,1
counter = rs1(0)
rs1.close
‘发表的资料总数如果是3的倍数
if counter mod 3 = 0 then
(转载自http://www.NSEAC.com中国科教评价网)
图3-7搜索资料信息
2. 页面中需要用户填写的Html表单元素
此页共有5个表单元素,如表2所示。
表2 search.asp页的表单元素
名称 表单元素类型 含义 最大长度
(科教作文网http://zw.ΝsΕAc.Com编辑整理)