ASP程序设计课程设计新闻发布系统

1、贵州航天职业技术学院贵州航天职业技术学院 计算机科学系 aspasp 程序设计课程设计报告程序设计课程设计报告 课题名称：课题名称： 新闻发布系统 姓姓 名：名： 伍 俊 学学 号：号： a083gz053020211 专业班级：专业班级： 08 软件（2）班 系系 （院）：院）： 计算机科学系 指导老师：指导老师： 肖 红 启 设计时间：设计时间： 2009-2010 学年第 1 学期 设计地点：设计地点： 六楼机房 摘摘 要要 伴随着网络的出现，网页逐渐融入人们的生活。快速及时的新闻浏览，五彩缤纷的网 上信息，使网络与人们的生活息息相关。它打破了地域限制，真正使信息得以共享，改变 了人们的

2、工作和生活方式。网站新闻发布系统，是将网站上需要经常变动的信息，类似公 司动态、企业新闻、新产品发布、促销活动和行业动态等更新信息集中管理，并通过信息 的某些共性进行分类，最后系统化、标准化发布到网站上的一种网站应用程序。 本系统采用 asp 作为开发环境，access 2000 作为数据库服务器，iis 作为测试服务器， 实现了对新闻类别无限级分类设置、动态新闻的发布修改删除，前台页面的模板自定义和 生成，以及后台管理员权限和数据库的备份收缩等一系列的功能，完成了一个动态新闻发 布系统的所有功能。系统捕获了绝大多数的异常情况，具有较好的容错性。 【关键词】 asp、access、iis、新闻

3、发布、信息管理、模板 目 录 摘 要.1 目 录.2 0 引 言 .3 1 新 闻 发 布 系 统 简 介.4 1.1 新闻发布系统.4 1.2 新闻发布系统的特点.4 1.3 新闻发布系统的分类.4 2 系 统 分 析.6 2.1 需求分析.6 2.2 可行性分析.6 3 总 体 设 计.6 3.1 项目规划.6 3.2 系统模块以及功能结构图.7 4 系 统 设 计.8 4.1 逻辑结构设计.8 5 网 站 总 体 架 构.8 5.1 模块功能介绍.8 5.2 网站首页的运行结果.8 6 系 统 部 分 重 要 功 能 及 其 代 码.10 6.1 导航区.10 6.2 用户登录注册修改.

4、15 6.3 首页主体内容区.24 6.4 友情链接区.33 6.5 总体框架.33 6.6 新闻发表.42 总 结.48 附录a 参 考 文 献 .49 附录b 数 据 表 .50 0 0 引引 言言 随着中国加入 wto 及全球经济一体化进程的加快，世界经济已由工业化经济逐步进 入网络信息化时代。在信息时代来临之季，各企业都紧跟时代的脚步，转变着企业的经营 模式、管理模式，从传统的人工管理体制，向信息自动化管理体制过渡。与此同时，企业 的传统式的办公管理模式也在逐步向自动化办公管理模式转变。网络自动化办公系统就是 在这样的大背景下应运而生的。 信息时代的到来让人们尝到了“信息爆炸”的滋味，

5、信息的大量拥入让企业在信息处 理方便应接不暇，传统的办公模式、对信息的处理方法，早已不能满足企业对信息快速、 准确的处理的要求。一个企业对信息数据的掌握程度、处理能力，体现了一个企业对市场 的敏感程度，数据的真实性、准确性直接决定着企业的发展方向。从传统的办公模式向自 动化办公管理模式转变，提高企业的信息处理能力，以增强企业的市场竞争力，成了企业 发展过程中的首要问题 伴随着网络的出现，网页逐渐融入人们的生活。快速及时的新闻浏览，五彩缤纷的网上 信息，使网络与人们的生活息息相关，于是世界上又出现了第三媒体internet。它打 破了地域限制，真正使信息得以共享，改变了人们的工作和生活方式。制作

6、网页是企业和 个人的宣传自己的重要手段，同时也是学习者获取学习信息的重要手段。尤其是在教育领 域，在素质教育与终身教育成为必然的今天，人们对信息的需求有了更新，更高的要求， 而网页由于本身所具有的信息量大，传递快速，没有时空限制等特点恰好满足这种要求。 所以网页也逐渐成为一种新兴的教育资源。也正是由于网络实现网站的数据信息能够进行 实时交互，保证网站数据的实时性。 随着 internet 的进一步发展,静态 web 站点的开发与维护变得越来越困难,一方面信息 的不断增加和变化,使站点维护人员不得不经常修改他们的网页,特别是基于数据库驱动的 web 站点更是如此，随着 internet 上信息量

7、的增多和交互性的加强使 html 显得越来越难 以胜任。另一方面静态网页由于不能与浏览者进行有效交互,使人们感到越来越乏味,而不 愿意再一次地进入同一站点。所以开发动态网页或动态内容成了越来越多的站点所追求目 标。所谓动态内容是由每一个用户按照自己的需求发出请求而特殊制作的 web 网页。 网络发展前景无限，及早与网络结合，与信息时代同步，与高科技汇合，定会给社会 各行各业的发展注入新鲜的活力。站在网络时代的前夜，我们清晰地听到了网络时代的宣 言：谁掌握了网络，谁就掌握了未来。 1 1 新新 闻闻 发发 布布 系系 统统 简简 介介 1.1 新闻发布系统 新闻发布系统（news release

8、 system or content management system）又叫做内容 管理系统，是一个基于新闻和内容管理的全站管理系统，新闻发布系统是基于 b/s 模式的 webmis 系统，本系统可以将杂乱无章的信息（包括文字、图片和影音）经过组织，合理有 序地呈现在大家面前。当今社会是一个信息化的社会，新闻作为信息的一部分有着信息量 大，类别繁多，形式多样的特点，新闻发布系统的概念就此提出。新闻发布系统的提出使 电视不再是唯一的新闻媒体，从此以后网络也充当了一个重要的新闻媒介的功能。简单地 说，新闻发布系统就是充当一个网络新闻媒介的功能，主要实现对新闻的分类、上传、审 核、发布，模拟了一般

9、新闻媒介的新闻发布的过程，通过不同权限的账号分别实现以上所 说功能，当然这些功能也可以是某一个账号全部具有。 1.2 新闻发布系统的特点 与一般的信息系统相比较，新闻发布系统具有以下特征： 1 是基于 b/s 模式下的 web 信息系统，数据库逻辑相对简单，但数据量一般比较庞大； 2 用户数量大，服务器压力大，是系统设计中必须考虑的问题之一，而一般的信息系统 相对压力要少了很多； 3 是一个开放式的系统，前台浏览无须验证。 1.3 新闻发布系统的分类 1. 前台动态显示的新闻发布系统 其主要特点是前台采用编程语言动态读取数据库的内容，随时更新，该类系统设计 简单，适合大多数中小企业建站需要，通

10、用性不强，一般需要量身定做，不适合大型新 闻站点，当用户过多时，编程语言动态读取数据库就势必消耗大量的服务器资源，造成 系统运行缓慢，甚至崩溃，同时由于前台新闻是动态从数据库中读取，导致前端用户直 接接触到数据库，很容易造成一些不安全的因素，例如：sql injection。 2.前台静态显示的新闻发布系统 其主要特点为：前台新闻全部生成 html 静态文件，前台无须读取数据库，浏览器 只需要直接下载 html 文件即可浏览新闻，浏览速度得到提高，同时也大大减轻了数据 库服务器的压力，该系统后台设计复杂需要处理复杂的模板标签和个模板之间的逻辑， 一般采用三层模式实现，该类系统灵活性大，可以通过

11、模板自定义实现界面复杂的前台 页面，一般不需要为某一个企业而定做，该系统具有良好的通用性，适合各类新闻站点， 同时，系统把前端用户和数据库分割开来，系统的安全性得到大大的提高。 3.基于文本的新闻发布系统 该系统在市场上占有很少的一部分，主要是把前面的数据库换成了 txt 格式的文 本文件，该系统主要缺点是文本文件是无序的，管理起来非常麻烦，而且安全性不高， 很容易造成数据冗余，因此，目前还没有见到该类系统的商业版本，一般都作为个人用 户使用。 4. 基于 xml 数据岛的新闻发布系统 该系统是新闻发布系统的一个发展趋势，它用 xml 数据岛代替了数据库，xml 是 一个有序的数据文件，比数据

12、库的读取速度更快，但操作起来没有数据库这么方便，但 是由于开发技术难度大，该类系统现在市场很少见到。 2 2 系系 统统 分分 析析 2.1 需求分析 通过调查，要求系统需要有以下功能： 1.将新闻、信息栏目和业界动态等信息集中起来发布、管理、查询等 2.网站的操作和控制可以由无 asp 基础的人员来操作！ 3.无论企业网站管理人员身处何地，只要能够上网就能对网站信息进行更新及维护。 4.所有的操作可以通过浏览器完成，不需要掌握其他应用软件，用户不需培训。 5.管理系统用户，由于该系统的使用对象多，要求有较好的权限管理。一般用户可以注 册和发布新闻。 6.系统管理员为网站信息管理系统中的最高权

13、限（即具备从后台输入、修改、删除新闻 的权限），其他人员只能具备新闻查看权限 7.信息检索模块，可按关键字、标题、作者、来源、发布时间。 8.数据计算自动完成，尽量减少人工干预。 9.系统退出。 2.2 可行性分析 1，经济性 网站新闻管理系统，又称为信息管理系统，广泛应用于大型专业网站、政府网站、企 业网站等几乎所有的网站上，是将新闻、信息栏目和业界动态等信息集中起来发布、管理、 查询等的一种网站应用程序 通过网站对新闻信息进行快速，有效的全面的管理，大大提高了新闻的的快速发布。 通过系统可对新闻的数据进行全面的管理和统计。 2，技术性 无论企业网站管理人员身处何地，只要能够上网就能对网站信

14、息进行更新及维护。 所有的操作可以通过浏览器完成，不需要掌握其他应用软件，用户不需培训。 网络化的办公管理，使企业管理更加规范，实现了通过网络对信息进行发布、传递、 接收等一系列功能。系统中设置的个人办公管理模块，为个人办公提供了一个更为方便的 管理平台，大大提高个人办公的工作效率，进而提高整个企业的办公效率。 3 3 总总 体体 设设 计计 3.1 项目规划 办公自动化管理系统是一个典型的数据库开发应用程序，由日常管理模块、业务管理 模块、用户管理模块组成，规划系统功能模块如下： 1.日常管理模块 该模块包括收文管理模块、发文管理模块、批示管理模块、会议管理模块、公共信息 管理模块、个人办公

15、管理模块、人事管理模块。 2.业务管理模块 该模块包括生产报表模块、采购计划模块、库存管理模块、指标情况模块。 3.用户管理模块 该模块主要包括用户发表新闻。 4.系统员管理模块 该模块主要包括网站管理员管理用户和新闻。 3.2 系统模块以及功能结构图 表 3-2-1 模块功能设计表 模块详细功能描述 新闻管理 添加新闻：主要是用于发布新闻（包含新闻） 编辑新闻：对已发布的新闻进行修改、删除等操作 模板管理 模板绑定：对主页、栏目、新闻浏览分别绑定模板，便于生成 模板管理：修改、删除 html 模板（已经绑定模板不能删除） 增加模板：增加新的模板 系统数据 新闻附件管理：对随新闻发布的附件进行

16、有效的管理，删除无用的附件 新闻分类管理：对新闻的栏目进行增加发布、修改、删除，支持无限级分 类 根据系统需求分析，设计系统总体结构大致如下图所示： 图 3-2-2 系统总体结构图 工作流程为： 打开该网站，普通浏览者能浏览、阅读和搜索新闻，能进行注册，注册后为新闻输入 员，登录进入新闻后台管理区, 只有添加新闻的权限；如登录时为新闻管理员，其不但有 添加新闻的权限，还有审核和管理新闻的权限。 在发布新闻的时候，用户必须要注册后才能进行发布新闻，否则你进入发布新闻页面则显 示你还没有登录的提示画面，发布的新闻只要标题，分类，内容等方面，如果有写错，可 以根据点击重写按钮重新输入内容，等到全部写

17、完无误后，就可以点击发表按钮发布了！ 你发布的新闻就在你所选择分类的那一类下面。 管理新闻功能包括对任一条新闻内容可作相应修改，也可删除任何一条不再需要保留的新 闻。管理新闻分类包括对新闻分类名称作修改，也可将任一分类名删除，删除后其分类下 的所有新闻也将被删除。 添加用户时，用户等级可为管理员、或者输入员之一，管理用户包括修改用户名、密码和 用户等级，也可将任一用户删除。 4 4 系系 统统 设设 计计 4.1 逻辑结构设计 本系统数据库采用 microsoft access2003 数据库，系统数据库名称为 user.mdb。数据库 user.mdb 中包含 9 张表。数据库中的数据表请参

18、见附录 b。 5 5 网网 站站 总总 体体 架架 构构 5.1 模块功能介绍 系统主要包括以下功能模块： 1.主页浏览模块：主要用于新闻的发布。 2.新闻专栏模块：主要把新闻详细的分栏显示给用户，用户已好根据自己的意愿去访问 他关心的新闻内容。 3.后台管理模块：主要包括网站的全体的新闻发布，修改，和相关的网站管理。 4.用户管理模块：主要包括超级用户、普通用户两种登录情况。超级用户包括用户添加、 用户修改(所有用户)、用户注销 3 部分；普通用户包括用户修改(个人信息进行修改)、 用户注销 2 部分。 5.2 网站首页的运行结果 首页：主要功能是显示最热门、最新和推荐的新闻，显示新闻搜索功

19、能、页面风格设 置、新闻分类、滚动新闻图片和网站公告等；如图 5-2-1 所示： 图 5-2-1 为了方便阅读将网站页面的各部分说明以列表形式给出，表 5-2-2 表 5-2-2 网站首页解析 区域名称说明对应文件 1导航区用于显示网站的标识、标题top.asp 2用户登陆和广告时 事区 主要用于用户和系统管理员登陆，以及 广告 日常最新新闻的显示 right.asp 3主体内容区主要用于把最新新闻 分栏的显示在 主 页上面 body.asp 4友情链接 版权说明区 用于友情链接和 相关链接区down.asp 5总体框架主要实现把上面的模块应用在一个网页 上 index.asp 6 6 系系

20、统统 部部 分分 重重 要要 功功 能能 及及 其其 代代 码码 6.1 导航区 1.导航区的运行结果 图 6-1-1 2.导航区网页分析 区域名称说明对应文件 1导航标签区用于显示网站的标识、标题，专栏top.asp 2文章收索区主要用于用户对站内文章的收索top.asp 3用户登录区主要用于用户的登录top.asp(denglu.asp ) 表 6-1-2 3.导航区网页代码. 这里给出 top.asp 的主要代码 下面是主要给出了框架代码，收索区代码。 a,top.asp 主要框架代码。 设为首页 加入收藏 发表新闻 后台管理 2 下面是 top.asp 主要收索区的 代码 标题 作者

21、来源 发布时间 6.2 用户登录注册修改 用户登录注册修改首页解析 如表 6-2-1 区域名称说明对应文件 1登陆界面用于用户的登陆right.asp 2注册主界面用于用户的注册页面和导航的框架zhuce zhuceindex.asp 3注册表单页面主要用于用户填写表单数据zhuce zhucebody.htm 4注册信息处理页面用于注册信息的处理zhuce zhuce.htm 3信息修改表单页面主要用于用户填写修改表单的数据zhuce xiugai.asp 4信息修改处理页面主要用于用户修改信息数据的处理zhuce zhuce1.asp 系统登录模块主要用于验证用户登录系统时输入的用户名、密

22、码、验证码是否正确， 如果正确用户进入系统，否则将不能进入此系统。 系统登录页面的设计效果；如图 6-2-2 所示 图 6-2-2 系统登录页面的设计效果 系统登录页面所采用的是动态显示功能！ 系统登录页面所涉及到的程序代码如下：denglubody.asp 1，登录表单代码！ % session(userlabel)=0 session(user)=guest unm=request.form(user) pwd=request.form(pwd) if request.querystring(lb)=1 then response.redirect index.asp end if if

23、unm and pwd then% % sql=select * from user where 用户名= 返回首页 4，管理员登录页面处理：admindenglu.asp % session(userlabel)=0 session(user)=guest unm=request.form(user) pwd=request.form(pwd) if unm and pwd then% % sql=select * from admin where 用户= 2.注册数据处理页面代码: zhuce/zhuce.asp %if request.form(user)= or request.for

24、m(pwd1)= or request.form(nichen)= or request.form(shengri)= then response.write 输入不能为空！返回重新填写! end if if request.form(user) and request.form(pwd1) and request.form(nichen) and request.form(shengri) then set cnn=server.createobject(adodb.connection) sqrcnn=dbq=driver=microsoft access driver (*.mdb) c

25、nn.open sqrcnn dim gn,sql sql=select * from user where 用户名=driver=microsoft access driver (*.mdb) cnn.open sqrcnn dim gn,sql sql=select * from user where 用户名= 24 小时 %新闻点击排行 sql=select top 12 编号,标题,浏览次数 from newsdata order by 编号 desc response.write cstr(date() set rs=cnn.execute(sql) i=0 do while not

26、 rs.eof and i a href=liulanindex.asp?id= () b,下面代码主要是统计最新动态。 %新闻发表最多者 sql=select 标题,count(*) from pinglun group by 标题 order by count(*) desc set rs=cnn.execute(sql) i=0 do while i () % rs.movenext end if if i :85868179 :85868179 :85868179 :85868179 :85868179 网站说明地方 相关说明及新闻 相关说明及新闻 相关说明及新闻 % sub go_o

27、nclick response.write fdsfdsf end sub if request(cat) then response.redirect searchindex.asp?cat= a href=liulanindex.asp?id= a href=liulanindex.asp?id= % if i=2 then response.write i=0 end if i=i+1 rs.movenext loop% a href=liulanindex.asp?id= % if i=2 then response.write i=0 end if i=i+1 rs.movenext

28、 loop% a href=liulanindex.asp?id= % if i=2 then response.write i=0 end if i=i+1 rs.movenext loop% a href=liulanindex.asp?id= % if i=2 then response.write i=0 end if i=i+1 rs.movenext loop% 6.4 友情链接区 1. 友情链接区的运行结果 如图 6-4-1 所示 2. 网页分析 一般新闻网页都有友情链接 这样可以拉动网页的流动量，所以为了该模块的扩展。所 以该区域方便以后好更改 所以该区域用单引入网页的方式。

29、该网页现在还没制作。只是策划了个模块在这里！ 3. 友情链接区网页代码： 联系邮箱: 在线 qq:85868179 copyright 2009, 版权所有 only 憔悴 6.5 总体框架 1. 运行结果即为上面的首页效果,该网页的作用是 把前面零散的网页引入到一个网页来！ 因为这样可以方便以后代码的修改。 总体框架主要实现把上面的模块应用在一个网页上index.asp 2. 网页代码： 3. 专栏网页制作 a. 专栏网页分析 专栏是为了这个新闻系统不止一个类别的新闻，所以设计了多个专栏。这里就用的一 个最新动态展览的代码！然后分页显示。 b. 专栏网页代码. 最新动态 % sql=sele

30、ct top 10 编号,标题 from newsdata order by 发布时间 desc set rs=cnn.execute(sql) i=0 do while not rs.eof and i a href=liulanindex.asp?id= 推荐- % sql=select top 30 编号,标题,浏览次数 from newsdata order by 浏览次数 desc set rs=cnn.execute(sql) i=1 do while not rs.eof and i a href=liulanindex.asp?id= . % i=1 do while not

31、rs.eof and i a href=liulanindex.asp?id= . 最有影响力的文 章- % sql=select 标题,count(*) from pinglun group by 标题 order by count(*) desc set rs=cnn.execute(sql) i=1 do while not rs.eof and i a href=liulanindex.asp?id= () % i=1 do while not rs.eof and i a href=liulanindex.asp?id= () 4. 新闻浏览页面 a. 新闻浏览页面分析 该网页用于显

32、示相关新闻的详细内容！这里只需回去新闻的 id 即可，本模块里面 还搭配到网页评论一起，方便用户评论新闻。 b. 新闻浏览网页代码. % btid=trim(request.querystring(id)标题 id if session(user)guest then username=session(name)控制没有登陆的用户评论 else username=过路游客 end if if btid= then 修改文章后的查看 btid=session(wenzhangid) end if % %if btid then% 来源：，发表者： 发表时间:； 本文章由:提供：有人观 看过该文章

33、 %if rs(图片) then% img src= a href=index.asp?page=返回 相关评论： % do while not pinglun.eof response.write response.write 删除 end if rs.movenext i=i+1 loop % % for i=1 to rs.pagecount 显示分页页码 if i=cpage_no then response.write i else response.write end if next % 6.6 新闻发表 1. 新闻发布 不同用户都用新闻发表权，但是只有系统管理员才能够具有编辑和修

34、改新闻的权限 新闻发表网页代码: % if session(userlabel)0 then response.write date() 发表内容数据 tb=trim(request.form(whatnew)发表类型 bt=trim(request.form(biaoti)发布标题 ly=trim(request.form(laiyuan)来源 yzz=trim(request.form(zuozhe)原作者 tj=request.form(bjk)发表内容 tupian=request.form(picfile)照片 if tj and bt then if ly= then 如果来源为空

35、就设为本网站 ly=小小新闻网 end if if yzz= then 如果原作者那么为用户的名字 yzz=session(name) end if % % tj=s_html(tj) sql=select * from newsdata where 标题=&bt& and 类型=&tb& set rs=cnn.execute(sql) if rs.eof then sql=insert into newsdata(标题,作者,来源,发布时间,浏览次数,内容,类型,发表者,账号,图 片) values(&bt&,&yzz&,&ly&,&date()&,0,&tj&,&tb&,&session(

36、name) &,&session(user)&,&tupian&) cnn.execute(sql) response.write sql response.write 发表成功！再来一篇？ 插入数据到数据库！ else response.write 这个标题已被使用！ end if end if % 标题： 国内 网页 程序 平面 网络 软件 来源： 原作者： input type=text name=zuozhe size=20 maxlength=20 value= 请选择上传相片： 返回首页| 现在时间: 请输入内容！ % else response.write 你还没有登录 resp

37、onse.write 返回登录 end if % 2. 新闻修改 a. 新闻修改网页分析 该专栏现在只做到让系统管理员能够修改！后面准备具体的让发表者已能对所发表的 新闻进行更改。 b. 新闻修改网页代码. 新闻发表！ % response.write session(btid) tbid=request.querystring(id) if tbid then session(btid)=tbid % 标题： input type=text name=biaoti size=20 maxlength=20 value= 国内 网页 程序 平面 网络 软件 来源： input type=text name=laiyuan size=20 maxlength=20 value= 原作者： input type=text name=zuo