ASP网络程序设计与应用张应辉电子教案第9章节新闻发布及管理系统

上传人:E**** 文档编号:90582089 上传时间:2019-06-13 格式:PPT 页数:37 大小:803KB
返回 下载 相关 举报
ASP网络程序设计与应用张应辉电子教案第9章节新闻发布及管理系统_第1页
第1页 / 共37页
ASP网络程序设计与应用张应辉电子教案第9章节新闻发布及管理系统_第2页
第2页 / 共37页
ASP网络程序设计与应用张应辉电子教案第9章节新闻发布及管理系统_第3页
第3页 / 共37页
ASP网络程序设计与应用张应辉电子教案第9章节新闻发布及管理系统_第4页
第4页 / 共37页
ASP网络程序设计与应用张应辉电子教案第9章节新闻发布及管理系统_第5页
第5页 / 共37页
点击查看更多>>
资源描述

《ASP网络程序设计与应用张应辉电子教案第9章节新闻发布及管理系统》由会员分享,可在线阅读,更多相关《ASP网络程序设计与应用张应辉电子教案第9章节新闻发布及管理系统(37页珍藏版)》请在金锄头文库上搜索。

1、第9章 新闻发布及管理系统,本章内容要点 系统分析及总体设计 数据库分析和设计 新闻发布系统的开发 新闻管理系统的开发 新闻阅读及查询系统的开发 新闻评论系统的开发 新闻发布管理系统开发小结,9.1系统分析与总体设计,很多网站都提供新闻栏目,例如搜狐、新浪等著名网站的新闻专栏。许多企业和个人网站也需要定期发布一些关于企业或网站的新闻。因为网络中新闻发布的频率非常高,如果使用静态网页作为新闻页面,则维护工作将非常繁琐,管理员每天需要制作大量的网页,从而浪费很多时间和精力。 使用新闻发布及管理系统可以使新闻发布和管理变得很轻松,管理员只需设置标题、内容和图片等新闻就可以了,系统将自动生成对应的网页

2、。 本节将首先对新闻发布及管理系统进行系统分析与总体设计。,9.1.1系统功能描述,1新闻类别管理 新闻类别的录入,包括类别编号和类别名称等信息; 新闻类别的修改; 新闻类别的删除; 新闻类别的查询。 2新闻发布管理 基本新闻信息的录入,包括新闻标题、新闻雷同和所属类别等; 基本新闻信息的修改; 基本新闻信息的删除。 3图片处理模块 选择图片文件; 上传图片文件; 储存图片新闻; 修改新闻图片; 删除新闻图片; 在网页中浏览新闻图片。,9.1.1系统功能描述,4新闻查询模块 按照新闻类别分页显示新闻; 按照日期分页显示新闻。 5网友留言模块 网友对某条新闻发表评论; 管理员可以删除新闻评论。

3、6系统用户管理功能 系统用户信息的录入,包括用户名和密码等信息; 系统用户信息的修改; 系统用户信息的删除。,9.1.2系统功能模块划分,9.1.3系统流程分析,9.2.3创建表的脚本文件,1创建表Category 创建表Category的脚本文件为Category.sql,它的代码如下: = USE news GO CREATE TABLE Category ( CateId Int IDENTTTY PRIMARY KEY, CateName Varchar(50) NOT NULL ) GO =,9.2.3创建表的脚本文件,2创建表News 创建表News的脚本文件为“News.sql”

4、,它的代码如下: = USE news GO CREATE TABLE News ( Id Int IDENTTTY PRIMARY KEY, Title Varchar(100) NOT NULL, Content Text, PostTime Datetime, Poster Varchar(50) CateId Int, Attpic Int DEFAULT 0, ReadCount Int DEFALT 0 ) GO =,9.2.3创建表的脚本文件,3创建表Discuss 创建表Discuss的脚本文件为Discuss.sql,它的代码如下: = USE news GO CREATE

5、TABLE Discuss ( Id Int IDENTTTY PRIMARY KEY, UserId Varchar(20), PostTime Smalldatetime, Content Varchar(4000) NewsId Int ) GO =,9.2.3创建表的脚本文件,4创建表Users 创建表Users的脚本文件为Users.sql,它的代码如下: = USEnews GO CREATE TABLE Users ( UserId Int Primary Key IDENTTTY, UserName Varchar(50)NOT NULL, UserPwd Varchar(50

6、)NOT NULL, Ename Varchar(50), Email Varchar(50) ) GO INSERT INTO Users(UserName, UserPwd, Ename, Email)VALUES(Admin, 111111,“,”) GO =,9.3目录结构与通用模块,9.3.1目录机构 在运行实例时,需要将news目录复制到IIS(或PWS)的根目录下,例如C:Inetpubwwwroot。 news目录下,包含下面两个子目录: images 用于存储上传的新闻图片; pic 用于存储网页中的图片文件; 其它ASP和HTM文件都保存在news目录下。 9.3.2通用模

7、块 本实例中包含一些通用模块,这些模块以文件的形式保存,可以在其他文件中使用#include语句包含这些模块,使用其中定义的功能。,9.4系统主界面与登录程序设计,9.4.1设计主界面 下面介绍default.asp的主要代码。 = =,9.4.2登录程序设计,9.4.3设计管理界面,Index.asp将新闻按照分类显示,每个新闻类别只显示最新的20条新闻。显示新闻类别的代码如下: = | =,9.5新闻类别管理模块设计,新闻类别管理模块可以实现以下功能: 添加新的新闻类别记录; 修改新闻类别记录; 删除新闻类别记录。 只有Admin用户才有权限进入新闻类别管理模块,在index.asp中,单

8、击“类别管理”超级链接,可以打开类别管理页面Cate_Admin.asp。,9.5.1设计新闻类别管理界面,9.5.2添加新闻类别,在执行Cate_Admin.asp时,可以在url中包含参数,程序将根据参数Oper的值决定进行的操作,与添加数据相关的代码如下: = =,9.5.3修改新闻类别,在执行Cate_Admin.asp时,可以在url中包含参数,程序将根据参数Oper的值决定进行的操作,与修改数据相关的代码如下: = % 处理添加、修改和删除操作 dim Soperate Soperate = Request.QueryString(“oper“) Operid = Request.

9、QueryString(“cid“) 删除 If Soperate=“delete“ Then . 添加 ElseIf Soperate = “add“ then . 修改,9.5.3修改新闻类别,ElseIf Soperate = “edit“ Then CateName = Request(“txttitle“) 如果新类别名称与旧名称不同,则判断是否存在此类别名称 sql = “SELECT * FROM Category WHERE CateName = “ & CateName & “ And CateId=“ & Operid Set rs = conn.Execute(sql)

10、If Rs.EOF Then 如果原类别编号和新类别名称不存在,则表示类别名称发生变化 Set rs = Nothing 此时判断是否存在此类别名称 sql = “SELECT * FROM Category WHERE CateName=“ & CateName & “ Set rs = Conn.Execute(sql) If Rs.EOF Then 新类别不存在 conn.Execute(“UPDATE Category SET CateName=“ & CateName & “ WHERE CateId=“ & Operid) Response.Write “新闻类别已经成功修改!“

11、Else Response.Write “已经存在此类别名称“ End if End If End If % =,9.5.4删除新闻类别,1选择全部复选框 在Cate_Admin.asp中,定义“全选”按钮的代码如下: 在单击“全选”按钮时,将执行sltA11()函数,代码如下: = Function sltA11() Var nn=self.document.all.item(Cate) For(j=0;jnn.length;j+) Self.document.all.item(Cate,j).ckecked=true; =,9.6新闻发布管理模块设计,系统用户都可以发布新闻,新闻发布管理模块包含以下功能: 发布新新闻; 修改新闻; 删除新闻。,9.6.1添加新闻,9.6.2新闻图片上传,9.6.3修改新闻,数据提交后,将由newsUpdate.asp进行处理,它的主要代码如下: = “) ChangeChr = Replace( ChangeChr, “ “, “) ChangeC

展开阅读全文
相关资源
相关搜索

当前位置:首页 > 高等教育 > 大学课件

电脑版 |金锄头文库版权所有
经营许可证:蜀ICP备13022795号 | 川公网安备 51140202000112号