基于B S架构的班级网站设计与实现--ASP课程设计

合集下载
相关主题
  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。

ASP课程设计

实验报告

项目名称:基于B/S架构的班级网站设计与实现参与成员:

学号:

联系电话:

日期: 2010-11-02

一、前言

ASP(Active Server Pages)活动服务器页面,基于微软公司的服务器IIS的统一环境,是Microsoft的一种技术,它起一种编程语言的作用,利用它编写动态产生网页的HTML程序代码。

ASP可以使用两种脚本语言:VBScript和Jscript(所谓的Jscript语言就是微软件版本的JavaScript语言),但主要使用VBScript。这些脚本可以执行应用程序逻辑,并能够用ActiveX组件执行特殊任务,如数据库查询、文件输入输出等。

ASP内含5个内置的Active Server Components(ActiveX服务器组件),即Database Access component(数据库访问组件)、File Access component(文件访问组件)、Ad Rotator component(广告轮显器组件)、Browser Capabilities component(浏览器信息组件)、Content Linking component(内部链接组件)。最常用的内置组件是文件组件和广告组件。ASP最强大的功能还是使用外置组件。

ASP本身包含了一个DLL文件,名字为asp.dll,缺省安装在Winnt\System32\inetsrv目录下。这个DLL文件负责得到一个ASP页面(由文件扩展名.asp标识),然后对它进行分析,寻找服务器端脚本内容。这个脚本传给相应的脚本引擎,脚本的执行结果与ASP页中的HTML和模板文本结合在一起。完整的页面会送到Web服务器,送往原先请求的客户端。

二、个人网站的设计

⒈体系结构

本系统通过客户端浏览器向网络上的服务器发出请求,服务器对浏览器的请求进行处理,将用户所需信息返回到浏览器。B/S结构简化了客户机的工作,把二层C/S结构的事务处理逻辑模块从客户机的任务中分离出来,由Web服务器单独组成一层来负担其任务,从而减轻了客户机的压力。系统的体系架构:Browser/Web/DataBase(Access)。

⒉设计目标

在现有的各种异构平台的基础之上构筑一个通用的平台无关、语言无关的技术层,将网站的所有功能作为Web服务展示出来,用户根据自己的需要选择相关的服务。

⒊主要功能模块

图1 主要功能模块

本系统的权限采用基于角色的访问控制,权限赋予角色,角色分配给用户。用户通过所属的角色享有权限。通过权限控制,保障了合法用户顺利实现系统功能,禁止了非授权用户对系统的入侵。

⒋数据库设计

⑴通讯录

通讯录数据库文件bjtxl.mdb文件包括两个表,分别为alogin和txl。alogin用来存储登录界面的用户名和密码信息,txl用来存储同学的信息,表1和表2所示

⑵留言簿

留言簿数据库包括两个表GuestBook和hfBook。GuestBook用来存储教师留言信息,hfBook用来存储教务员的回复信息,表3和表4所示。hfBook数据库表中的字段“rID”存储原主题的ID,该ID就是GuestBook

数据库表中的ID字段。

三、系统实现

1.身份认证

主要代码:

<%

syhm=request("yhm")

smm=request("mm")

set rs=server.CreateObject("Adodb.recordset")

sql="select * from alogin where yhm='"&syhm&"'"

rs.open sql,conn

if syhm="" then

response.Write("管理员的名不能为空!")

%>

/>

请输入管理员名!



<%

response.End()

end if

if smm="" then

response.Write("密码不能为空")

%>

请输入密码!

<%

response.end()

end if

if syhm<>"chenqing" then

response.write("您不是系统管理员!")

%>

请重新输入系统管理员名!



<%

response.end()

else

if smm=rs("mm") then

response.Redirect(session("file"))

else

%>

密码错误!请重新输入密码!



<%

end if

end if

rs.close

set rs=nothing

conn.close

set conn=nothing

%>

2.聊天室

进入聊天室需要进行身份认证,完成此操作过后,自动跳转至聊天界面,在页面上方可以可见当前在线人数,其主要代码如下:

※ message.asp:聊天室的信息输入界面

<%

mywords = Request("message")

oneSentence = "姓名:" & Session("username")

oneSentence = oneSentence & "机器号:" & Session("no")& "说: " & mywords

Application.Lock()

Application("talk")=Application("talk") & oneSentence & "
"

Application.UnLock()

%>

※ display.asp:聊天信息显示页面