ASP007校园新闻发布管理系统(ASP+ACCESS)_毕业论文范文网-论文范文

搜索高级搜索

原创毕业论文

ASP007校园新闻发布管理系统(ASP+ACCESS)

作者: 浏览:11次

免费专业论文
政治工作论文
计算机论文
营销专业论文
工程管理论文范文
医药医学论文范文
法律论文范文
生物专业论文
物理教学论文范文
人力资源论文范文
化学教学论文范文
电子专业论文范文
历史专业论文
电气工程论文
社会学专业论文
英语专业论文
行政管理论文范文
语文专业论文
电子商务论文范文
焊工钳工技师论文
社科文学论文
教育论文范文
数学论文范文
物流论文范文
建筑专业论文
食品专业论文
财务管理论文范文
工商管理论文范文
会计专业论文范文
专业论文格式
化工材料专业论文
英语教学专业论文
电子通信论文范文
旅游管理论文范文
环境科学专业论文
经济论文
人力资源论文范文
营销专业论文范文
财务管理论文范文
物流论文范文
财务会计论文范文
数学教育论文范文
数学与应用数学论文
电子商务论文范文
法律专业论文范文
工商管理论文范文
汉语言文学论文
计算机专业论文
教育管理论文范文
现代教育技术论文
小学教育论文范文
机械模具专业论文
报告,总结,申请书
心理学论文范文
学前教育论文范文

收费计算机专业论文范文

收费计算机专业论文
Delphi
ASP
VB
JSP
ASP.NET
VB.NET
java
VC
pb
VS
dreamweaver
c#.net
vf
VC++
计算机论文

毕业论文范文题目：ASP007校园新闻发布管理系统(ASP+ACCESS)，论文范文关键词：ASP007校园新闻发布管理系统(ASP+ACCESS)
ASP007校园新闻发布管理系统(ASP+ACCESS)毕业论文范文介绍开始：

§1 新闻发布系统概述

1. 1 基于web的新闻发布系统设计的提出

伴随着网络的出现，网页逐渐融入人们的生活。快速及时的新闻浏览，五彩缤纷的网上信息，使网络与人们的生活息息相关，于是世界上又出现了第三媒体——Internet。它打破了地域限制，真正使信息得以共享，改变了人们的工作和生活方式。制作网页是企业和个人的宣传自己的重要手段，同时也是学习者获取学习信息的重要手段。尤其是在教育领域，在素质教育与终身教育成为必然的今天，人们对信息的需求有了更新，更高的要求，而网页由于本身所具有的信息量大，传递快速，没有时空限制等特点恰好满足这种要求。所以网页也逐渐成为一种新兴的教育资源。也正是由于网络实现网站的数据信息能够进行实时交互，保证网站数据的实时性。

随着Internet的进一步发展,静态Web站点的开发与维护变得越来越困难,一方面信息的不断增加和变化,使站点维护人员不得不经常修改他们的网页,特别是基于数据库驱动的Web站点更是如此，随着Internet上信息量的增多和交互性的加强使HTML显得越来越难以胜任。另一方面静态网页由于不能与浏览者进行有效交互,使人们感到越来越乏味,而不愿意再一次地进入同一站点。所以开发动态网页或动态内容成了越来越多的站点所追求目标。所谓动态内容是由每一个用户按照自己的需求发出请求而特殊制作的Web网页。

网络发展前景无限，及早与网络结合，与信息时代同步，与高科技汇合，定会给社会各行各业的发展注入新鲜的活力。站在网络时代的前夜，我们清晰地听到了网络时代的宣言：谁掌握了网络，谁就掌握了未来。

随着计算机技术的发展，网络技术对我们生活和工作显得越来越重要，特别是现在信息高度发达的今天，人们对最新信息的需求和发布迫切的需要及时性。而动态交互式网页刚好提供了这些功能，本系统就是一个能够在网上实现新闻的网上多用户发布，多栏目管理，实时的进行行为统计和记录的网上交互系统。

1. 2 新闻发布系统的需求分析

从经济可行性角度考虑，这时所说的经济，并不专指物质经济，当然也包括效益经济。要运行基于WEB的校园新闻发布系统，当然是必须添加一些网络及硬件设备，这也就必然比传统信息传播在物资设备方面要投入更多财力。从效益经济来看，运行这套在线新闻发布系统，不光可以省去许多信息传递时间，甚至在信息化的今天为信息及时更新，信息及时传达等带来不小的便利。综合上面论述，在线新闻发布系统的开发与设计在经济角度来说是利大于弊，是非常值得实施的。

从技术可行性角度考虑，随着网络技术的深入发展，一些网络办公系统，政府服务软件，在线聊天娱乐软件等等网络应用软件也成功开发并投入运营了，在社会中产生了不小的社会与经济效益。HTML作为一种样式语言，随着Internet上信息量的增多和交互性的加强使HTML显得越来越难以胜任的情况之下，在ASP编程语言高度发展的形式下，我们开始了对新闻发布系统的开发。运用现在软件业流行的技术成熟的ASP、JSP等开发语言，以及高效率，易操作Visual InterDev等开发工具，再借鉴别人成功开发的宝贵经验，在线新闻发布系统是完全可以开发出来的。

1. 3 新闻发布系统的开发环境

1.3.1 硬件条件

服务器两台，一台为数据库服务器，一台为Web服务器；客户端计算机若干；网络通讯设备，主要包括网卡、集线器、MODEM 等。

1.3.2 系统平台

采用Browser/Server体系结构，服务器端采用Microsoft Windows NT4.0作为网络操作系统，Web服务器软件采用IIS3.0（Internet Information Server）。客户端软件，包括单机操作系统和浏览器软件，分别选用Windows 2000和Internet Explorer，数据库系统采用Microsoft Access有利于方便操作。

1.3.3 开发工具

基于Web的系统开发工具应使开发者使用各种各样的技术来创建动态的Web应用程序，并且应是一个可视化的工具。我们采用了DreamweaverMX进行开发，它是用来快速创建数据驱动Web应用程序的基于团队的开发环境，支持ASP，以ODBC连接数据库，脚本语言为简单易学的java script或VBScript。

1.3.4 运行需求

正常使用时不应出错，若运行时遇到不可恢复的系统错误，也必须保证数据完好无损，对数据的精确度、时间特性、适应性等都有一定要求，要求系统运行时能够保证正确性、可靠性、高效性、完整性、易使用性、可维护性、可测试性、复用性、安全保密性、可移植性、互联性。

§2 系统总体设计

2. 1 新闻发布系统功能分析

2.1.1 前台新闻显示可以根据网站的需要,进行各种方式的插入,自动更新.如显示栏目导航,显示某栏目的最新N条新闻等. 使用新闻文章管理系统制作动态网页时,可在需要的地方插入相应的代码,即可以多种形式显示新闻文章的栏目或内容。例如：一级栏目列表、二级栏目列表、栏目导航列表、某一栏目的最新新闻(文章)显示条数、某一栏目的热门文章可任意调整。该系统也可经后继开发,使之生成JS代码,在一个主机上维护新闻文章,在其他静态网页中插入代码后显示相应的新闻文章。2.1.2 后台管理1. 新闻栏目管理：增加,修改,删除一级,二级新闻文章栏目。2．新闻文章添加：按不同栏目添加新闻文章、支持文本、HTM格式或源代码显示。

3．新闻文章删除：删除旧的文章。4．新闻文章删除：在后台管理系统中上传一些文章、。5．管理员管理：新闻管理系统的管理员设置。2. 2 新闻发布系统数据库的设计

2.2.1数据库的搭建

数据只有用数据库来管理才能有自动化管理的可能。数据的结构将影响整个管理机制的应用，而且一但建立以后要修改常会出现麻烦。所以一开始就要仔细慎重地搭建一个完整而合理的结构。Microsoft Access数据库相对其它的数据库来说要简单容易操作些，本新闻发布系统中的数据库文件就是Access类型的数据库，数据库中共有五张表如下图：

2.2.2新闻发布系统数据库的连接

以下是本系统与数据库建立连接的ASP源代码

On Error Resume Next

set rs=server.createobject("adodb.recordset")

set conn=server.createobject("adodb.connection")

DBPath = Server.MapPath("nxnews.mdb")

conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath %>

2.2.3数据类型

本系统的数据字典如下图

表一：

字段类型含义

Id 数值型序号

Admin 文本型用户名

Password 文本型密码

Aleave 逻辑型权限

表二：

字段类型含义

Bigclassid 数值型一级新闻序号

Bigclassname 文本型一级新闻标题

Admin 文本型发布者

表三：

字段类型含义

Id 数值型新闻序号

title 文本型新闻标题

Content 文本型新闻内容

User 文本型发布者

Infotime 日期型发布时间

表四：

字段类型含义

Pinglun Id 数值型评论序号

pinglunname 文本型评论标题

Pinglun data 日期型评论发表日期

pingluncontent 文本型评论内容

表五：

字段类型含义

smalllclassid 数值型二级新闻序号

smallclassname 文本型二级新闻标题

Admin 文本型发布者

2. 3功能模块图

2.3.1 新闻发布系统前台模块设计图：

2.3.2 新闻发布系统后台模块设计图：

§3 新闻发布系统各模块功能设计

3. 1前台新闻显示

可以根据网站的需要,进行各种方式的插入,自动更新.如显示栏目导航,显示某栏目的最新N条新闻等. 使用新闻文章管理系统制作动态网页时,可在需要的地方插入相应的代码,即可以多种形式显示新闻文章的栏目或内容。例如：

一级栏目列表、二级栏目列表、栏目导航列表、某一栏目的最新新闻(文章)显示条数、某一栏目的热门文章可任意调整。该系统也可经后继开发,使之生成JS代码,在一个主机上维护新闻文章,在其他静态网页中插入代码后显示相应的新闻文章。

3. 2后台管理

1. 新闻栏目管理：增加,修改,删除一级,二级新闻文章栏目。

2．新闻文章添加：按不同栏目添加新闻文章、支持文本、HTM格式或源代码显示、支持图片上传和附件上传。

3．新闻文章删除：删除旧的文章。

4．新闻文章删除：在后台管理系统中上传一些文章、上传图片等、在前台查询这些文章。

5．管理员管理：新闻管理系统的管理员设置。

6. 基本项目管理：统计数据管理、系统初始化、网站资料管理、服务器信息等。

3. 3 功能说明

3.3.1前台显示说明如图所示

1. 首页的最顶部排列显示大类新闻，用户可以直接点击查看各项大类新闻里面的各项小类新闻，直到阅读每条详细信息。

2. 今日导读，焦点新闻，推荐新闻，热点新闻等各个栏目，后台可以控制是否显示，或显示条数设置。

3. 专题显示可以任意排序，而且可以直接点击查看相关专题新闻。

4. 可以按不同条件进行新闻搜索。

5. 公告栏显示最新发布的各项新闻信息，进入二级目录还可以阅读更多信息。

6. 具有新闻评论功能，从首页、大小类、专题、到每条新闻，都可以有自己的评论。

3.3.2管理员的管理

管理员可以通过后台登陆界面登陆到系统的后台并进行管理，后台登陆页面为adminlogin.asp打开页面以后输入用户名和密码通过验证后即可进入系统，管理员进入系统后可以对已经发表的新闻进行修改，删除，和发表新的新闻等权利，除此之外管理员还可以修改管理员密码和添加新管理员。

管理界面如下图：

3.3.3 一级新闻管理

3.3.3.1 从管理首页的大类管理进入，可以进入大类的一级目录管理界面。

3.3.3.2 管理员可以任意的添加、修改、删除一级新闻，可以对一级新闻进行初始化上拉下拉等操作以及对新闻属性的各种设置。

3.3.3.3 通过对一级新闻属性的设置可以使新闻在首页显示或不显示，是否以列表的形式显示在首页等。

3.3.3.4一级新闻管理界面

以下是一级新闻添加的部分源代码

sql="select * from BigClass"

rs.open sql,conn,3,3

do while not rs.eof

if rs("BigClassname")=typename

Set rs = Server.CreateObject("ADODB.Recordset")

sql="select * from BigClass"

rs.open sql,conn,3,3

rs.addnew

rs("BigClassname")=typename

rs("BigClassType")=BigClassType

if BigClassType=0 then

rs("BigClassView")=0

else

rs("BigClassView")=1

end if

rs("BigClassID")=howmany+1

rs("BigClassmaster")="无"

rs.update

rs.close

set rs=nothing

conn.close

set conn=nothing

response.redirect "admin_BigClassMana.asp"

3.3.4 二级新闻管理

3.3.4.1 二级新闻管理也类似于一级新闻管理，从管理首页的二级新闻管理进入，可以进入二级新闻的一级目录管理界面。

3.3.4.2 管理员可以任意的添加、修改、删除小类新闻，可以对二级新闻进行初始化上拉下拉等操作以及对新闻属性的各种设置。

3.3.4.3 通过对二级新闻属性的设置可以使新闻是否以列表的形式显示在新闻列表中。

3.3.4.4 在添加二级新闻目录时，必须选种一项一级新闻目录下才能添加二级新闻目录。

3.3.4.5二级新闻管理界面

3.3.5 用户管理

以下是实现管理员添加的源代码：

//这个form对象是指当提交添加资料时就会调用admin_AdminSave.asp这个文件把信息添加到数据库。

if session("aleave")="" then

response.redirect "adminlogin.asp"

response.end

end if

<html>

<head>

<title>校园新闻发布管理系统</title>

</head>

<tr>

<tr>

</tr>

</table>

</tr>

Set rs=Server.CreateObject("ADODB.RecordSet")

sql="select * from admin order by id"

rs.Open sql,conn,1,1

while not rs.eof

if rs("aleave")="super" then aleave="超级管理员" end if

if rs("aleave")="check" then aleave="普通管理员" end if

</tr>

rs.movenext

wend

rs.close

set rs=nothing

</table>

<br>

<td colspan="2">添加管理员：</td>

</tr>

<td>

</tr>

<td>

<option value=super selected>超级管理员</option>

<option value=check>普通管理员</option>

</select>

</td>

</tr>

<td>

</tr>

</td>

</tr>

</form>

</table>

<br>

</td>

</tr>

</table>

</body>

</html>

3.3.6新闻录入管理

点击管理首页的新闻添加进入新闻所属大类栏目，和小类栏目的选择，确定进入新闻内容添加界面如下图：

1. 新闻添加界面设有一系列添加新闻时需要选择和填写的属性：

在界面的开头显示新闻添加的位置，主要是新闻所属的大类和小类名称。

2. 添加的新闻可以选择属于哪个专题，也可不属于任何专题。

3. 可以注明所添加新闻的来源和作者。

4. 还设有新闻编辑框，可进行可视化新闻添加，可以粘贴网页任意图片、表格、文字，就象WORD一样方便，可以选择HTML语法书写。

5. 可以设定相关新闻，以及添加新闻的性质，如可以选择此新闻在焦点新闻、推荐新闻、热点新闻等首页栏目显示，并且可以使此条新闻固定的显示于最新新闻列表中。

6. 添加新闻的同时可根据你的需要上传你的一个或多个图片，可以上传新闻附件。

3.3.7 整体新闻管理

此版快可以对所有发表过的文章进行编辑和删除其中编辑的代码为：

if session("aleave")="" then

response.redirect "adminlogin.asp"

response.end

end if

if request("no")="modi" then

newsid=request("newsid")

title=request("title")

BigClassName=request("BigClassName")

SmallClassName=request("SmallClassName")

mContent = trim(Request.form("cnWords"))

mContent = Replace(mContent,"<script","<sscript")

mContent = Replace(mContent,"/script>","/scripts>")

mContent = Replace(mContent,"/script >","/scripts>")

mimageNum = Request.form("imageNum")

firstImageName = trim(Request.form("editFirstImageName"))

user=request("user")

ok=request("ok")

set rs=server.createobject("adodb.recordset")

sql="select * from NEWS where id="&newsid

rs.open sql,conn,1,3

rs("title")=title

rs("content")=mcontent

rs("user")=user

rs("BigClassName")=BigClassName

rs("SmallClassName")=SmallClassName

if ok<>"" then rs("ok") = ok

if mimageNum<>"" then rs("imageNum") = mimageNum

if firstImageName<>"" then rs("firstImageName") = firstImageName

rs.update

rs.close

set rs=nothing

response.write "<script language='java script'>" & chr(13)

response.write "alert('新闻修改成功！');" & Chr(13)

response.write "window.document.location.href='admin_info.asp';"&Chr(13)

response.write "</script>" & Chr(13)

Response.End

end if%>

dim rs

dim sql

dim count

set rs=server.createobject("adodb.recordset")

sql = "select * from SmallClass order by SmallClassID asc"

rs.open sql,conn,1,1

var onecount;

subcat = new Array();

count = 0

do while not rs.eof

subcat[<%=count%>] = new Array("<%= trim(rs("SmallClassName"))%>","<%= trim(rs("BigClassName"))%>","<%= trim(rs("SmallClassName"))%>");

count = count + 1

rs.movenext

loop

rs.close

onecount=<%=count%>;

function changelocation(locationid)

{

document.addNEWS.SmallClassName.length = 1;

var locationid=locationid;

var i;

for (i=0;i < onecount; i++)

{

if (subcat[i][1] == locationid)

{

document.addNEWS.SmallClassName.options[document.addNEWS.SmallClassName.length] = new Option(subcat[i][0], subcat[i][2]);

}

function CheckForm()

{

document.addNEWS.cnWords.value = document.frames.cnEditBox.getHTML(true);

document.addNEWS.imageNum.value = document.frames.cnEditBox.document.all("editImageNum").value;

document.addNEWS.editFirstImageName.value = document.frames.cnEditBox.document.all("editFirstImageName").value;

if (document.addNEWS.title.value.length == 0) {

alert("新闻标题没有填写.");

document.addNEWS.title.focus();

return false;

}

if (document.addNEWS.user.value.length == 0) {

alert("新闻发布人没有填写");

document.addNEWS.user.focus();

return false;

}

return true;

}

</script>

<html>

<head>

</head>

newsid=request("id")

Set rso=Server.CreateObject("ADODB.RecordSet")

sql="select * from NEWS where id="&newsid

rso.Open sql,conn,1,1

if rso.eof and rso.bof then

response.Write("没有记录")

else

</tr>

<tr>

</tr>

<tr>

if session("aleave")="check" then

response.write rso("BigClassName") & "<input name='BigClassName' type='hidden' value='" & rso("BigClassName") & "'>>>"

else

sql = "select * from BigClass"

rs.open sql,conn,1,1

if rs.eof and rs.bof then

response.write "请先添加栏目。"

else

do while not rs.eof

<option <% if rs("BigClassName")=rso("BigClassName") then response.Write("selected") end if%> value="<%=trim(rs("BigClassName"))%>"><%=trim(rs("BigClassName"))%></option>

rs.movenext

loop

end if

rs.close

</select>

end if

if session("aleave")="check" then

response.write rso("SmallClassName") & "<input name='SmallClassName' type='hidden' value='" & rso("SmallClassName") & "'>"

else

<option value="" <%if rso("SmallClassName")="" then response.write "selected"%>>不指定小类</option>

sql="select * from SmallClass where BigClassName='" & rso("BigClassName") & "'"

rs.open sql,conn,1,1

if not(rs.eof and rs.bof) then

do while not rs.eof %>

<option <% if rs("SmallClassName")=rso("SmallClassName") then response.Write("selected") end if%> value="<%=rs("SmallClassName")%>"><%=rs("SmallClassName")%></option>

rs.movenext

loop

end if

rs.close

</select>

end if

%> </td>

</tr>

<tr>

<IFRAME STYLE="border: none" NAME=cnEditBox src="EditBox.asp?newsId=<%=newsId%>" WIDTH=100% HEIGHT=330></IFRAME></td>

</tr>

<tr>

</tr>

<tr>

<td height="24" align="right" bgcolor="#FFFFEE">是否设为首页图片新闻：</td>

<input type="radio" value="True" <%if rso("ok")=True then Response.Write "checked"%> name="ok">是

否　<font color="#FF0000">选择此项时请注意文章中是否添加有图片！</font></td>

</tr>

</td>

</tr>

</form>

</table>

<% End If

rso.close

set rso=nothing

删除使用的代码为：

set rs=server.CreateObject("ADODB.RecordSet")

rs.open "delete * from NEWS where id="&request.QueryString("id"),conn,1

set rs=nothing

response.write "<script language='java script'>" & chr(13)

response.write "alert('成功删除！');" & Chr(13)

response.write "window.document.location.href='admin_info.asp';"&Chr(13)

response.write "</script>" & Chr(13)

Response.End

3.3.8 发表评论

用户可以对新闻发表自己的评论：

实现此模块的代码为：

<%dim id,action

id=request.QueryString("id")

action=request.QueryString("action")

if action="save" then

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

rs.open "select * from shop_pinglun",conn,1,3

rs.addnew

rs("id")=id

rs("pinglunname")=HTMLEncode2(trim(request("pinglunname")))

rs("pingluncontent")=HTMLEncode2(trim(request("pingluncontent")))

rs("pinglundate")=now()

rs.update

rs.close

set rs=nothing

response.write "<br><br><table width=96% border=0 align=center cellpadding=0 cellspacing=0><tr><td height=86 bgcolor=#F5F5F5><div align=center>"

response.write "您的评论已成功提交！！<br><br><a href=java script:window.close()>关闭窗口</a></div></td></tr></table>"

response.End

end if

<tr>

</tr>

</tr>

</tr>

</div></td>

</tr>

</table>

</td></form>

</tr>

</table>

</body>

</html>

<%function HTMLEncode2(fString)

fString = Replace(fString, CHR(13), "")

fString = Replace(fString, CHR(10) & CHR(10), "</P><P>")

fString = Replace(fString, CHR(10), "<BR>")

HTMLEncode2 = fString

end function%>

<!--

function checkspace(checkstr) {

var str = '';

for(i = 0; i < checkstr.length; i++) {

str = str + ' ';

}

return (str == checkstr);

}

function check()

{

if(checkspace(document.pinglunform.pinglunname.value)) {

document.pinglunform.pinglunname.focus();

alert("请填写您的姓名！");

return false;

}

if(checkspace(document.pinglunform.pingluncontent.value)) {

document.pinglunform.pingluncontent.focus();

alert("请填写评论正文！");

return false;

}

//-->

</script>

§4 系统设计中遇到的问题与解决方法

在开发新闻发布系统中，我参考了《ASP应用开发》和《ASP编程基础及应用实例》两本书，这两本书给了我很大的启发。

首先，《ASP应用开发》一书简要介绍了ASP的基础知识，她的每一章由章、任务、功组成，每一章由一到两个具体的任务开始，然后是实现这一任务的各种不同的方案。每一攻由攻简介、源代码、程序执行以及技术背景组成，每章包含的知识点旧穿插在每个攻的技术背景中。这种“给出任务——分析问题——方案实现——技术背景“的编排模式，非常符合一般人的认识规律；在心理上，这种由具体到抽象、由个别到一般、由提出问题、解决问题到总结经验、掌握规律的学习方法也是比较容易接受的。

这本书介绍了ASP的组成结构、基本原理和基本特征；同时对ASP最重要的六个内置对象（Application、Objectcontext、Request、Response、Response、Sever和Session）进行了详细的介绍，还有在Active Sever Pages文件中使用Activex组件。这里不仅给出了使用Activex组件的一般办法，而且详细地讨论了ASP Web服务器本身所附带的几个Activex组件对象的功能、作用和使用情况。使用ADO进行数据库的连接和操作。详细讨论了微软自推出IIS Web服务器以来所提供的两种数据库连接技术——早期的IDC技术以及现在的ADO技术。对在使用ASP开发数据库有关应用程序过程中，经常使用的数据库语言SQL进行了详尽的讨论。并针对SQL Sever和Acess这量种常使用的数据库，具体介绍了如何利用不同的数据库的特有函数和处理功能，以及标准的SQL来开发ASP数据库应用程序，以及两种最常使用的ASP脚本语言——Vbscript和java script的有关内容，包括它们的语法基础、应用环境以及具体用法。可以通过内容提要、本书导读以及目录了解全书的内容结构和编排体系。

在开始学习脚本语言之前，你应该理解一些简单的概念 -- 变量、进程。所谓变量是计算机内存中已命名的存储位置，其中包含了数字或字符串等数据，它使用户便于理解脚本操作的名称，为用户提供了一种存储、检索和操作数据的途径。程序是由一个或多个进程组成的，在 VBScript 中，进程就是“指令块”，通常意义上的进程，如 Sub，只是为了简单的数据处理。在 VBScript 中，严格的来讲变量是不用声明的，如：< % Mystring="This is my string" % >

　然而，即使在使用变量前不需要去声明变量，也应养成在编程时声明变量的良好习惯，因为这样有助于防止错误发生。声明一个变量意味着告诉脚本引擎，有一个特定名称的变量，这样就可以在脚本中引用该变量。在 VBScript 中声明一个变量可以使用“Dim”语句，如下：　　 < script language="VBScript" > 　　 < !-- 　　 Option Explicit ' 要求在脚本中声明所有的变量　　 Dim Mystring 　　 Mystring="This is my string" 　　 -- > 　　 < /script>　　变量的作用域即生命期，决定哪些脚本命令可访问变量。在过程内部声明的变量具有局部作用域。每执行一次过程，变量就被创建然后消亡。而过程外部的任何命令都不能访问它。在过程外部声明的变量具有全局作用域，其值能被 ASP 页上的任何脚本命令访问和修改。声明变量时，局部变量和全局变量可以有相同的名称。而改变其中一个的值并不会改变另一个的值。如果没有声明变量，则可能不小心会改变一个全局变量的值。例如，以下脚本命令返回值 1，虽然有两个名为 Y 变量：　　 < % 　　 Dim YY = 1Call SetLocalVariableResponse.Write Y 　　 Sub SetLocalVariable 　　 Dim Y 　　 Y = 2End Sub % >　　由于变量没有显式声明，以下的脚本命令将返回 2。当过程调用将 Y 设置为 2 时，脚本引擎认为该过程是要修改全局变量：　　 <% 　　 Y = 1Call SetLocalVariableResponse.Write Y 　　 Sub SetLocalVariable 　　 Y = 2 　　 End Sub% >　　然而，全局变量仅在单个 ASP 页中可用，要使它在单个 ASP 页之外可用，就必须为变量赋予会话或应用程序作用域。会话作用域变量对一个用户所请求的 ASP 应用程序中的所有页都是可用的。应用程序作用域变量也如此。对单个用户来说，会话变量是存储信息的最佳途径，例如，用户首选项、用户名或用户的标识。对于一个特殊应用程序的所有用户，应用程序作用域是存储信息的最佳途径，例如，应用程序特定的问候语或应用程序所需的初始值。ASP 提供两个内建对象来让您存储变量：Session 对象和 Application 对象，这将在今后的 ASP 内建对象中着重讨论。　　让我们再来看看常量的定义，常量是用来代替一个数或字符串的名称，它在整个脚本中保持不变。您可以使用 Const 语句在 VBScript 中创建用户自定义常数。使用 Const 语句可以创建名称具有一定含义的字符串型或数值型常数，并给它们赋原义值。例如：如：< % Const mystring=" 这是一个常量 " % > < % Const myage=100 % >

　　请注意字符串文字包含在两个引号 (" ") 之间。这是区分字符串型常数和数值型常数的最明显的方法。日期文字和时间文字包含在两个井号 (#) 之间。例如： < % Const CutoffDate = #6-1-97# % >

在理解了常量和变量之后，我们来看看什么是过程。它是一组能执行指定任务且具有返回值的脚本命令。您可以定义自己的过程，然后在脚本中反复调用它们。您可以将过程定义放在调用过程的 .asp 文件中，也可以将通用过程放在一个共享的 .asp 文件中，然后用 SSI #include 指令将其包含进其他调用其过程的 .asp 文件中。您还可选择另一种方法，即把这些功能打包在 ActiveX 组件中。过程定义可出现在 < SCRIPT > 和 < /SCRIPT > 标记内部且必须遵循声明脚本语言的规则。如果过程所用的语言与主脚本语言不同，则要使用 < SCRIPT > 元素。主脚本语言中的过程用脚本分界符 (< % 和 % >) 分隔。用 HTML< SCRIPT > 标记时，必须使用两个属性来保证服务器端能够处理脚本。使用 < SCRIPT > 标记的语法如下：　　 < SCRIPT RUNAT=SERVER LANGUAGE=JSCRIPT > 　　 procedure definition 　　 < /SCRIPT >　　这里的 RUNAT=SERVER 属性通知 Web 服务器在服务器上处理脚本。若不设置该属性，脚本将由客户端浏览器处理。LANGUAGE 属性决定此脚本块所用的脚本语言。您可以指定任何一种具有脚本引擎的语言。请使用 VBSCRIPT 指定 VBScript；用 JSCRIPT 指定 JScript。若不设置 LANGUAGE 属性，将用主脚本语言解释此脚本块。　　在 VBScript 中，过程被分为两类：Sub 过程和 Function 过程。Sub 过程是包含在 Sub 和 End Sub 语句之间的一组 VBScript 语句，执行操作但不返回值。Sub 过程可以使用参数（由调用过程传递的常数、变量或表达式）。如果 Sub 过程无任何参数，则 Sub 语句必须包含空括号 ()。

Function 过程是包含在 Function 和 End Function 语句之间的一组 VBScript 语句。Function 过程与 Sub 过程类似，但是 Function 过程可以返回值。Function 过程可以使用参数（由调用过程传递的常数、变量或表达式）。如果 Function 过程无任何参数，则 Function 语句必须包含空括号 ()。Function 过程通过函数名返回一个值，这个值是在过程的语句中赋给函数名的。Function 返回值的数据类型总是 Variant。在下面的示例中 Sub 过程使用两个固有的（或内置的）VBScript 函数，即 MsgBox 和 InputBox，来提示用户输入信息。然后显示根据这些信息计算的结果。计算由使用 VBScript 创建的 Function 过程完成，Celsius 函数将华氏度换算为摄氏度。Sub 过程 ConvertTemp 调用此函数时，包含参数值的变量被传递给函数。换算结果返回到调用过程并显示在消息框中。《ASP编程基础》一书的特点是理论与实践相结合，在介绍相关的编程理论和知识的前提下，利用丰富、实用的例子来演示ASP的魅力。 WEB 服务器上运用 WEB 应用程序进行的最常见和最实用的任务就是访问服务器端的数据库。而 ASP 内建的 Database Access 组件使得我们能够轻而易举地通过 ActiveX Data Objects (ADO) 访问存储在服务器端的数据库或其他表格化数据结构中的信息。 ADO 是对当前微软所支持的数据库进行操作的最有效和最简单直接的方法，它是一种功能强大的数据访问编程模式，从而使得大部分数据源可编程的属性得以直接扩展到你的 Active Server 页面上。可以使用 ADO 去编写紧凑简明的脚本以便连接到 Open Database Connectivity (ODBC) 兼容的数据库和 OLE DB 兼容的数据源，这样 ASP 程序员就可以访问任何与 ODBC 兼容的数据库，包括 MS SQL SERVER、 Access、 Oracle 等等。如果您是一个对数据库连接有一定了解的脚本编写人员，将发现 ADO 命令语句并不复杂而且容易掌握。正确认识 ADO 的先进的与语言无关性和查询处理功能。熟悉 VB 数据库编程的朋友会发现 ADO 与 RDO (Remote Data Objects) 有某种类似的地方。但据说 ADO 的访问的速度更快，内存需要更小。尽管 Connection 对象简化了连接数据库和查询任务，但 Connection 对象仍有许多不足。确切地说，检索和显示数据库信息的 Connection 对象不能用于创建脚本，您必须确切知道要对数据库作出的更改，然后才能使用查询实现更改。对于检索数据、检查结果、更改数据库， ADO 提供了 Recordset 对象。正如它的名称所暗示的那样， Recordset 对象有许多您可以使用的特性，根据您的查询限制，检索并且显示一组数据库行，即记录。 Recordset 对象保持查询返回的记录的位置，允许您一次一项逐步扫描结果。根据 Recordset 对象的指针类型属性设置，您可以滚动和更新记录。数据库指针可以让您在一组记录中定位到特定的项。指针还用于检索和检查记录，然后在这些记录的基础上执行操作。 Recordset 对象有一些属性，可用于精确地控制指针的行为，提高您检查和更新结果的能力。这两本书在我编程过程中对我帮助很大，通过以上两本书的学习，我对于ASP语法知识，数据库连接，运行平台等各种相关的知识有了全面的认识。

结论

ASP从推出至今时间也不算漫长，由于它具有开发简单，功能强和灵活等优点，现在已被广泛接受，成为开发动态网络站点的主要技术之一，有人声称ASP已在Web开发领域悄悄地进行着一场革命。今天已有上万个Web站点使用了ASP技术，其中包括许多Internet中最大的站点。有人估计，在过去几年中，ASP开发人员已达百万之多，预计在今后的发展过程当中将会越来越多。ASP正慢慢成为动态Web应用程序开发环境的主流。

本文提出了一种基于Web的学校新闻发布系统，该系统的多用户发布，多栏目管理，使学校的新闻信息及时、准确的得以发布。学生通过会员注册直接参与新闻信息的评论，使学生的意见和需求能够及时的得以提出，激发了他们的学习欲望。

利用ASP技术实现学校的新闻能够及时的得以发布是一项很有效方法，这种组建的方式，可以应用于网站的其它栏目。又由于ASP编程所用的Vbscript 与 Jscript语言较其它语言较简洁、易操作、功能较强非常适合广大用户进行网站的开发。

ASP虽然提供了功能强大的Web应用程序开发环境,但和其它技术一样,它也存在着某些缺点。Web服务器还不支持ASP的运行。但ASP毕竟是软件霸主微软精心设计的一个宠儿,人们不得不慢慢向它靠拢，现在越来越多的Web服务器已开始支持ASP。以信息网站为核心的Web信息系统建设方兴未艾，运用新技术进行创新的应用开发，提高网络系统应用成效将是一个不竭的课题。

谢辞

在此，谨对在本人进行毕业设计过程中提供过帮助的各位老师和同学表示衷心的感谢，在遇到困难的时候，如果没有他们，设计将很难进行下去，特别是指导老师，没有他们的帮助，我不可能顺利的完成毕业设计。

参考文献

*孙丽君编著《ASP编程实例集锦》人民邮电出版社 1997

*林天民编著《ASP基础技术》浙江大学出版社 1999

*王天林编著《ASP 的发展》人民邮电出版社 2000

* 李立功编著《 A S P 实例集锦》中国水力水电出版社 1 9 9 8

以上为本篇毕业论文范文ASP007校园新闻发布管理系统(ASP+ACCESS)的介绍部分。

本论文在计算机论文栏目，由论文网(www.zjwd.net)整理,更多论文,请点论文范文查找