四川省泸州市张氏茶业有限公司新闻发布系统.doc

摘 要
ASP.NET是新一代Web应用程序开发平台，它是一个已编译的、基于.NET的开发环境，它提供了生成企业级应用程序所必需的全部服务。新闻发布系统又称为网站发布系统，这个系统是用来将网页上的某些需要经常变动的信息，类似新闻、新产品发布和业界动态等更新信息集中管理，标准化发布到网站上的一种网站应用程序。对于一些任何一个商业网站来说，一个新闻系统是必不可少的。实现新闻发布系统的方式比较简单，新闻发布系统是管理员发布给浏览者看的。该系统使用ASP.NET(C#语言)和ADO.NET技术开发,实现了网站新闻的动态管理，使得对信息的管理更加及时、高效、提高了工作效率，具有一般新闻系统的功能，主要包括前台新闻查看区和后台管理区，可为公司发布新闻，为公司网站提供新闻发布与管理的服务。

关键词: ASP.NET； ADO； 新闻显示； 新闻文章录入； 新闻管理
目 录
引 言 1
第1章 绪论 2
1.1 ASP的认识 2
1.2 开发目的 2
1.3 项目背景 3
1.4 系统开发的具体工作 3
第2章 系统分析 4
2.1 系统开发环境 4
2.1.1 硬件条件 4
2.1.2 软件条件 4
2.1.3 系统平台 5
2.1.4 开发工具 5
2.1.5 运行需求 5
2.2 需求分析 5
2.2.1 设计目标 5
2.2.2 系统功能分析 6
2.2.4 基本功能设计 8
2.2.5 扩展功能设计 9
2.3 系统特点 9
2.3.1 友好的用户界面 10
2.3.2 可靠性和安全性 10
第3章 功能模块与数据库 11
3.1 设计框架 11
3.2 数据库设计 12
3.2.1 进入数据库的方法 12
3.2.2 基本表设计 13
第4章 系统实现 14
4.1 通用文件 14
4.2 管理员登录模块 14
4.3 添加新闻模块 18
4.4 编辑新闻模块 21
4.5 前台查看新闻模块 24
4.6 页面的风格设计 26
4.7 功能实现 27
4.7.1 普通用户功能 27
4.7.2 管理员功能 27
结 论 28
参考文献 29
致 谢 30

引 言
计算机技术的快速发展，网络对我们的生活和工作显得越来越重要，现在信息高度发达，我们对最新信息的需求迫切的需要及时性，只有及时可靠的新闻才能体现新闻的价值，才能被新闻浏览者所需要和接受。
目前，用于网站开发的主要技术有ASP、JSP和PHP，随着微软公司大力推广.NET平台，现在.NET。技术也在飞速民展之中，为许多网站开发人员所使用。但是，各种技术都有其各自的缺点和优点，ASP仍然是目前应用最为广泛的WEB开发技术之一。
新闻发布系统（News Release System）是上个世纪九十年代互连网技术发展以后才出现的技术，最初表现是解决一些网站的信息动态发布而开发，最初只是简单的发布和显示，应用对于各种不同的站点需要构建不同的系统来满足需要，而且功能十分单一，在九十年代后期，互连网技术进一步发展，网络作为新起的新闻媒介工具，其用户大大增加，对系统的要求也越来越高，新闻发布系统在这样的一个环境中提出、开发、并改进，到现在，新闻系统开发的成功案例已经不计其数，而且已经应用到各种站点上，可以说，各行各业的绝大部分的网站都使用到了新闻系统，大量的用户引发了新闻系统功能的进一步扩大和深化，给新闻系统提出了更高的要求。
我做的新闻发布系统，是对外了解公司的最新动态的系统。系统管理员可以通过专用通道对新闻进行添加、修改和删除等，而普通的用户只能对显示的新闻进行查看和复制。本系统，很简洁，但实用性比较强。

第1章 绪论
1.1 ASP的认识
ASP是一种应用程序环境，可以利用VBscript 或者Java Script语言来设计，主要是用于网络数据库的查询和管理。
利用 ASP 生成的网页，与HTML相比具有更大的灵活性。只要结构合理，一个ASP页面就可以取代成千上万个网页。尽管ASP在工作效率方面较之一些新技术要差，但胜在简单、直观、易学，是涉足网络编程的一条捷径。它具备一个服务器端的脚本执行环境，用它可产生和执行动态的、交互的、高性能的Web服务器应用程序。
Active Server的另一大优点是代码的安全性。页面的访问者所能看到的只是服务器方的处理结果。ASP文件可以用常规的文本编辑器编辑，ASP使用VBScript、JavaScript等脚本语言作为开发工具，镶嵌于HTML文本中，使用""将ASP的程序包含起来。当用户从浏览器向Web服务器提出请求时，Web服务器会自动将ASP的程序解释为标准的HTML格式的主页内容，用户端只要使用常规可执行HTML程序的浏览器，就可浏览ASP所设计的主页内容，因此与浏览器无关，并且保证了ASP的源程序代码不会外漏。
ASP技术的程序员可以利用Java、Visual Basic、Visual C++等语言制作适应自己特殊需要的ActiveX服务器组件来扩充ASP的功能，使自己的动态网页几乎具有无限的扩充能力，这是传统的CGI程序所不及的。
总而言之ASP具有学习快、设计快的特点，不需花许多时间即可学会和快速设计出WEB应用程序。ASP的源程序码在服务器端执行，代码保密性好。集成与HTML中，无需编译链接可直接执行，而且使用文本编辑器即可设计。
1.2 开发目的
社会动态频繁，各类部门的事情种种越来越多，需要把最新动态发表于网上告诉其他人，交互式网页刚好提供了这些功能，本系统就是一个能够在网上实现新闻的网上多用户发布，多栏目管理，实时的进行行为统计和记录的网上交互系统。
随着计算机信息技术和网络通讯等高新技术的发展，对公司新闻信息的发布提出了更高的要求，要求公司新闻发布系统更好的发挥新闻的及时性和准确性。这样就可以使信息发布者从繁杂的信息传递中解脱出来，而且能为信息浏览者提供了快捷、灵活、方便的信息服务。
通过本系统可以实现公司新闻发布的网络化，解决以往信息传递不及时，不快捷等问题，使公司管理人员能够方便的在网上发布新闻，浏览者在网上查看新闻。因此，应用本系统可以大大提高工作效率，节省人力和物力，提高公司行政管理水平，有利于推动企业新闻发布管理的无纸化办公进程。
1.3 项目背景
HTML作为一种样式语言，随着Internet上信息量的增多和交互性的加强使HTML显得越来越难以胜任的情况之下，在ASP编程语言高度发展的形式下，我们开始了对新闻发布系统的开发。
1.4 系统开发的具体工作
论文分析了Web数据库，Dreamweaver工具及ASP技术在公司新闻发布系统中的应用，本文的主要工作如下：
1 重点讨论了B/S结构的工作原理及其特点，分析了实现Web数据库的不同方法，客观的分析了它们的优缺点。得出结论：ASP技术无论在操作的可行性、方便性还是性能上都是一种实现Web数据库的最好方法。
2 探讨了ASP技术的五个主要的内置对象和ActiveX服务器组件在公司新闻发布系统中的应用，并介绍了如何利用ASP技术向数据库添加、修改和删除数据。
3 重点讨论了如何利用数据库访问组件，ADO技术实现新闻数据库与服务器的连接，并利用其属性和方法完成对新闻的访问。
4 详尽介绍了公司新闻发布系统的总体框架、工作流程和系统使用的主要技术。

13
第2章 系统分析
2.1 系统开发环境
2.1.1 硬件条件
个人计算机一台或多台，网络通迅设备。
2.1.2 软件条件
1.Dreamweave MX
Dreamweave MX是建立Web站点和应用程序的专业工具，能把可视化布局工具、应用程序开发功能和代码编辑支持组合在一起，使不同层次的用户都可以快速创建网页。专业人员可以手动编码；开发人员可以建立数据库连接，而入学者可以创建自己的个人网站等。
Dreamweave MX是我最常用的网页制作软件，界面效果很好，功能强大，最主要的是使用非常方便。对入学者来说，它应该是学习制作网页的最好选择。
2.Access
Access 是微软公司推出的基于Windows的桌面关系数据库管理系统（RDBMS），是Office系列应用软件之一。它提供了表、查询、窗体、报表、页、宏、模块7种用来建立数据库系统的对象；提供了多种向导、生成器、模板，把数据存储、数据查询、界面设计、报表生成等操作规范化；为建立功能完善的数据库管理系统提供了方便，也使得普通用户不必编写代码，就可以完成大部分数据管理的任务。虽然没有SQL的功能强大，但对于制作本系统已经够了。
3.IIS
IIS是Internet Information Server的缩写，它是微软公司主推的服务器，最新的版本是Windows2003里面包含的IIS6，IIS与WindowNT Server完全集成在一起，因而用户能够利用Windows NT Server和NTFS（NT File System.NT的文件系统）内置的安全特性，建立强大，灵活而安全的Internet和Intranet站点。
IIS是操作系统自带的一个管理工具，可以在控制面板中“添加/删除组件”里安装此软件。IIS自身支持windows2000系统，而我们多数便宜windows XP系统，所以不能直接装备，得下载M Framework、Microsoft Data Access components、Windows Installer三个软件和Internet浏览器混合使用才能浏览页面效果。
2.1.3 系统平台
采用Browser/Server体系结构，服务器端采用Microsoft Windows NT4.0作为网络操作系统，Web服务器软件采用IIS3.0（Internet Information Server）。客户端软件，包括单机操作系统和浏览器软件，分别选用Windows 2000和Internet Explorer，数据库系统采用Microsoft Access有利于方便操作。
2.1.4 开发工具
基于Web的系统开发工具应使开发者使用各种各样的技术来创建动态的Web应用程序，并且应是一个可视化的工具。我们采用了DreamweaverMX进行开发，它是用来快速创建数据驱动Web应用程序的基于团队的开发环境，支持ASP，以ODBC连接数据库，脚本语言为简单易学的JavaScript或VBScript。
2.1.5 运行需求
正常使用时不应出错，若运行时遇到不可恢复的系统错误，也必须保证数据完好无损，对数据的精确度、时间特性、适应性等都有一定要求，要求系统运行时能够保证正确性、可靠性、高效性、完整性、易使用性、可维护性、可测试性、复用性、安全保密性、可移植性、互联性。
2.2 需求分析
新闻发布系统说到底就是一个能够自动地发布各种信息的平台,可以使用此系统构造新闻内容页面,自动生成首页的新闻链接,同时产生历史新闻列表,提供新闻页面的管理界面,自动发布行业新闻,并且新闻内容页中支持插入图片方式和网页代码,自由设置新闻类别,自动显示信息的发布时间。
2.2.1 设计目标
一个新闻信息发布系统是综合网站的最基础的部分，在这个新闻发布系统中，需要实现主要功能是用户对新闻的浏览以及搜索功能，管理员对新闻的浏览、添加、编辑、删除以及复制等功能。在这个系统中的核心是对新闻文本的编辑，设计一个类似于记事本效果的文本编辑器。设计思路就是要围绕着这个目标展开。
2.2.2 系统功能分析
由于新闻发布系统是一个综合网站的基础部分，所以在设计思路上并不是很复杂。涉及的对象也只有两个，就是新闻以及管理员。将这2个对象设计成2个数据实体，并使用数据库来存储这两个对象。
接下来分析每一个对象的相互操作，即为每个对象设置操作方法，由于现在只是设计程序的框架，所以更多设置参数细节将在具体的编码过程中进行解释说明。管理员对象的方法也较为简单，其具体的功能分配效果如表2-1所示：

图2-1 分类对象相关用例
新闻对象的方法有许多，都是与管理新闻对象有关，有浏览、搜索、添加、编辑、删除、以及复制等。系统数据流图如2-2所示：
2-2 顶层数据流图

2-2 0层数据流图

2-2 一层数据流图
经过分析，现在已经基本清楚了新闻发布系统的功能对象。接下来，再将归纳好的类对象及其方法分配给不同的用户，其具体的功能分配效果如表2-5所示：

表2-5 新闻发布系统功能和用户权限对应表
对象实体
功能方法
用户类型
新闻
浏览新闻
用户
搜索新闻
用户
添加新闻
管理员
编辑新闻
管理员
编辑新闻标题
管理员
复制新闻
管理员
删除新闻
管理员
在新闻发布系统中，一般将该系统普通用户有关的功能称为系统的前台功能，新闻发布系统的前台系统就是用户浏览新闻功能以及搜索新闻功能。反之，与管理员有关的功能就是系统的后台功能，也就是添加新闻、编辑新闻、编辑新闻标题、复制新闻。对此，本系统基本数据流程图如图2-4所示。
图2-4 系统数据流
为了要实现以上的功能，首先要定义数据字典。数据库数据字典不仅是每个数据库的中心。而且对每个用户也是非常重要的信息。数据字典如表2-6所示。
表2-6 系统数据字典（1）
字段名
类型
长度
允许空值
备注
Name
Char
12
N
管理员账号
Password
Int
8
N
密码
表2-6 系统数据字典（2）
字段名
数据类型
长度
允许空值
备注
ID
3
Int
N
新闻序号
Headline
20
Char
N
新闻标题
E-mail
30
Char
Y
电子邮件
Poster
10
Char
N
发布人
AddDate
8
Date
N
添加日期
Description
30
Char
N
新闻描述
Artikel
1000
Char
N
新闻文章
2.2.4 基本功能设计
通过分析，新闻以发布系统的基本功能就是可以从众多的需求中筛选出来。基本功能是构成新闻发布系统的必需的功能，也就是说新闻发布系统必须要具备这些基本功能。
下面就是新闻发布系统的基本功能。
（1）添加新闻
（2）浏览新闻
事实上，以上的两个基本功能反复的循环就构成了整个新闻发布系统同，整个系统的构成 就是管理员在后台系统中添加新闻，这样用户就可以在前台系统中查看新闻。
2.2.5 扩展功能设计
除了以上的几个基本功能之外，其他的功能都是新闻发布系统的扩展功能。
（1）搜索新闻
当新闻发布系统中的新闻达到一定的数量，用户在大量的新闻中找到需要的新闻就有一定的难度，这是就需要一个搜索新闻功能。
（2）编辑新闻标题
管理员可以使用该功能来编辑新闻标题。
（3）编辑新闻
若是需要修改新闻内容是新闻格式，这就需要增加了编辑新闻这一扩展功能。
（4）复制新闻
使用该功能可以新闻发布系统中复制相同的新闻，复制的新闻无论是内容还是排版都和原来的新闻是一致的。
（5）删除新闻
使用该功能可以将不需要的新闻删除，当新闻发布系统中的新闻达到一定数量的时候，也需要使用该功能删除新闻，为该系统的数据库找出更多的空间。
2.3 系统特点
该系统主要是通过网络对公司的新闻进行发布和管理，主要有如下几个特点：
本系统采用的是当今比较流行的浏览器/服务器(B/S)三层体系结构，在客户端只需要安装浏览器(如IE等)就可以对服务器进行访问，一般只要能上网的地方就可以从客户端访问服务器。而且，B/S结构的开发、维护工作都集中在服务器端，当需要升级时，只需更新服务器端的软件，不必更换客户端的软件，减低了维护的难度和成本。
2.3.1 友好的用户界面
本系统设计的界面友好简洁，各个功能模块排布清晰明确，一目了然。用户只需要通过简单的操作就可以查找自己需要的新闻，充分体现了简单，灵活，方便等特点。
2.3.2 可靠性和安全性
本系统会自动对输入信息的正确性和完整性进行检查，保证写入数据库内信息的正确性。系统还会自动检测用户的管理权限，使得用户不能使用超出自己权限的功能。

第3章 功能模块与数据库
3.1 设计框架
模块分为两类:前台模块和后台模块。用户在前台模块中可以浏览新闻、搜索新闻。后台模块中基本是与管理员有关的模块，如添加新闻、编辑新闻、删除新闻等。该新闻发布的模块体系如图3-1所示。

图3-1 新闻发布系统功能模块体系结构
对于一般的用户在新闻发布系统中的行为可分为：
（1）浏览新闻，在新闻发布系统中最关键的就是可以查看新闻。
（2）搜索新闻，浏览者可以搜索到需要的新闻。
管理员需要维护整个新闻以布系统，因此管理员就要更多的管理权限和功能。
（1）添加新闻
（2）编辑新闻标题
（3）编辑新闻
（4）复制新闻
（5）删除新闻
由于本系统中的前台模块中功能较少，所以其中客户端文件列表如表3-1所示。
表3-1 客户端文件列表
编 号
文 件 名
相对存储位置
说 明
1
News.asp
/
新闻列表
2
News_detail.asp
/
查看新闻详细内容
新闻管理系统中的管理员后台管理模块中的主要文件，列表如表3-2所示。
表3-2 管理员后台管理模块中的主要文件
编 号
文 件 名
相对存储位置
说 明
1
Addnews.asp
/admin
添加新闻
2
Default.asp
/admin
默认主页
3
Index.asp
/admin
用户登录
4
Login_validate.asp
/admin
登录信息核对
5
Logout.asp
/admin
退出
6
Newsdelete.asp
/admin
删除新闻
7
Newsedit.asp
/admin
编辑新闻
8
Newslist.asp
/admin
新闻列表
9
Newsview.asp
/admin
查看新闻
常用函数声明、变量声明、数据库连接等，如表3-3所示。
表3-3 常用函数声明、变量声明、数据库连接
编 号
文 件 名
相对存储位置
说 明
1
Aspmkrfn.asp
/include
页面初始化参数
2
Db.asp
/admin
数据库连接
3
Footer.asp
/admin
底部页面文件
4
Header.asp
/admin
顶部页面文件
5
Select_color.html
/admin
选择颜色
6
Table.htm
/admin
创建表
7
IsLoggedln.asp
/admin
核对用户是否已登录
3.2 数据库设计
3.2.1 进入数据库的方法
ASP是基于Web的一种编程技术，可以轻松的实现对页面内容的动态控制，根据不同的浏览者，显示不同的页面内容。而浏览这一点也感觉不出来，就像为他们专门制作的页面一样。有ADO(Active Database Object，动态数据库对象)的支持，ASP对数据库的操作非常得心应手。甚至可以像使用本地数据库那样，管理远程主机上的数据库，对表格和记录进行操作。
ASP着重于处理动态网页和Web数据库的开发，编程灵活、简洁，具有较高的性能，是目前访问Web数据库的最佳选择。
3.2.2 基本表设计
Access 2000，定义数据库名称为“Links”数据库，其中News表中保存新闻的基本信息。该表的字段设计如表3-4所示。
表3-4 News表
字段名称
数据类型
说 明
Id
自动编号
新闻编号
Headline
文本
新闻标题
Email
文本
电子邮件
Poster
文本
发布人
Hiddenbool
文本
是否隐藏
Addate
文本
添加日期
Description
备注
描述
Aetikel
备注
文章
Members表用于用户信息，该表的字段中表3-5所示。
表3-5 Members表
字段名称
数据类型
说 明
Id
自动编号
用户编号
Username
文本
用户名称
Password
文本
用户密码
Email
文本
电子邮件

第4章 系统实现
本系统由前台新闻显示和后台新闻管理这两个大的模块组成。前台主要用于显示新闻列表，图片及浏览具体新闻内容。后台是提供系统管理员和新闻添加员登陆并使用本系统的新闻的发布和管理功能。系统管理员可以使用系统提供的所有功能，而新闻添加员只有添加新闻的功能。由于作者主要制作的是“前台新闻显示模块”，所以下面仅对这个模块的设计和实现作具体的介绍。
4.1 通用文件
在这个系统中，有很多地方需要连接数据库，重复编写相同的连接数据库的代码，所以有点浪费精力，对系统以后的维护也有点不方便。/include/db/asp这个文件就是该系统中连接数据库的文件，很多模块中连接数据库都是通过包含它来实现的.db.asp主要代码如下：
<%
Set conn =server.createobject(“ADODB.Connection”)
Conn.open = “DRIVER={Microsoft Access Driver (*.mdb)};DBQ=” &/server.mappath(“db/Ticker.mdb”)
%>
代码中，conn.open=”DRIVER” ={Microsoft Access Driver (*.mdb)};DBQ=” &/server.mappath(“db/Ticker.mdb”)来定义数据库的驱动程序以及数据库放置的物理路径，可以知道红运程序为Microsoft Access Driver，数据库的物理路径为db/Ticker.mdb。
4.2 管理员登录模块
用户登录模块主要由三个文件组成即default.asp、login_validate.asp和logout.asp文件，其中default.asp文件提供一个供用户输入信息的登录表彰，而login_validate.asp文件中代码的功能才是真正实现密码验证，logout.asp文件用来退出用户登录。该用户登录文件的表彰设计效果如图4-1所示。

图4-1 用户登录界面
default.asp
在管理员登录系统模块中首先要判断管理员是否已经登录，其主要代码如下：
<%
If request.cookies(“project”) (“user”) < > “” then
If session(“loggedin”)= ”yes” then
Response.redicrect”default.asp”
End if
End if
Dim strMessage
strMessage = Request(“Message”)
%>
在代码中，设置了一个Session变量LoggedIn，这样管理员只需要登录一次，就不会重复显示登录窗口；如果If Session(“LoggedIn”)=”Yes”,那么就表示用户已经登录成功；如果If Session(“LoggedIn”)=”No”，则表示用户并没有登录成功。
在图4-2中 表单内有用户账号和用户密码文本框。文本框的名称分别为：UserName和Password。其主要代码如下：
<html>
<head>
<title> 四川省泸州市张氏茶业有限公司新闻发布系统</title>
<Link title=style-sheet href=”mail.css” type=text.css rel=stylesheet><style type=”text/css”>
……
If strmessage < > “ ” then
Response.write(“<font color=’#000000’ face=”verdana size=’2’>” & strmessage & “</font>”)
Else
<%
End if
%>
……
<td width=”101”><font face=”verdana” style=”font-size;9pt” color=”#000000”>管理员账号</font></td>
<td width=”187”><input type=”text” name=”UserName” size=”28” class=text tabindex=”1”></td>
</tr>
<tr>
<td width=”101”><font color=”#000000” face=”verdana”>管理员密码</font></td>
<td width=”187”><input type=”Password” name=”Password” size=”28” class=text tabindex=”2”></td>
</tr>
<tr>
<td width=”288” colspan=”2”><p align=”right”>
<input type=”submit” value=”登录” name=”B1” class=submit tabindex=”3”>……
代码中，将表提交给login_validate.asp文件，验证用户账号以及用户密码是否正确。
login_validate.asp
本页面是真正实现检查输入的管理员用户名和密码是否错误，并实现管理员登录的页面，其主要代码如下：
If NOT Objrs.EOF Then
If Objrs("Password") = StrPassword Then
Response.Cookies("Project")("User") = StrUserName
Response.Cookies("Project").Expires = Date() + 1
Session("LoggedIn") = "Yes"
Set Objrs = Nothing
Set ObjConn = Nothing
Response.redirect"addnews.asp"
Else
Set Objrs = Nothing
Set ObjConn = Nothing
Response.redirect"index.asp?Message=错误的用户名或密码，再重新试一次!"
End If
Else
Set Objrs = Nothing
Set ObjConn = Nothing
Response.redirect"index.asp?Message=错误的用户名或密码，请再重新试一次!" ……
End If
%>
在代码中，当Session(“LoggedIn”)=”Yes”时，说明用户已经成功登录，页面将跳转到添加新闻页（addnews.asp）;如果输入的密码不正确，页面将跳转到index页面，并出现提示“错误的密码，再重新试一次”信息，进行重新登录；如果输入的管理员用户名不正确，页面也将跳转到index页面，并出现提示“错误的用户名，再重新试一次”信息。如图4-2所示。

图4-2 错误提示
logout.asp
如果用户要退出系统，为了保障系统安，可以单击如果4-3所示页面的“退出登录”链接，退出用户登录。
图4-3 单击“退出登录”链接
退出用户登录后，将直接跳转回index.asp登录页面并出现“退出成功”提示，此时，也以登录其他用户，重新登录到新闻发布系统上，如图4-4所示。

图4-4 重新登录
主要代码如下：
<%
If request.cookies(“project”)(“user”)<> “ ” or session(IsloggedIn”)=”Yes” then
Response.cookies(“project”)(:user”) = “ ”
Response.cookies(“project”).expires=now()
Session(“loggedIn”)= ” ”
Response.redirect”index.asp?Messgae＝退出成功”
Else
Response.redirect”index.asp?Message=这不是正确的方法”
End If
如需退出登录，Response.cookies(“project”)(“user”)=””语句清空cookies中的用户登录信息，重新跳转到index.asp页面，用户可以使用不同的用户账号重新登录。
4.3 添加新闻模块
添加新闻模块是新闻发布系统中最为重要的模块，管理员在该页面中添加新闻内容，浏览者才可以在浏览页面中查看新闻内容，如果在新闻发布系统中没有任何新闻信息，那么各种操作都无法进行。
在本模块中由4个页面组成，其中addnews.asp是主要页面，用来添加新闻，其他3个都是包含文件。其中，function.asp中旋转实现各个按钮功能的代码，select_color.html中是选择字体颜色的色盘，table.html中是创建表格时对表格的设置。
addnews.asp中新闻输入员只具有添加新闻的权限，任何浏览者都可注册成为新闻输入员，但所添加的新闻并不能直接发布到网站上显示，而需经过审核员或管理员审核是否给予通过，这保证了网站内容管理的合理性，并不是随便添加的新闻都能发布；
添加文件页面addnews.asp 是该系统中一个十分重要的页面，集中了几乎所有关于管理员管理系统的链接。在这个页面中，管理员可以为这个新闻发布系统添加新闻信息，在该系统中还集成了一个简单的文本编辑器，可以对将要发布的新闻进行一个简单的文本编辑，例如选择字体 、选择字号等操作，添加新闻模块的界面如图4-5所示。
图4-5 添加新闻模块
添加新闻模块主要实现的功能是向数据库中添加新闻，其他的一些关于文本编辑的按钮都是通过调用funcion.asp中的函数实现的。其主要代码如下：
<!--#Include File="IsLoggedIn.asp"-->
<%
'Option Explicit
Response.buffer=true
Dim email,sql,dbpath,Conn,datetime,user,artikel,fso,temp,tempname,datei
%>
<%
Dim StrMessage
StrMessage = Request("Message")
%>
<!--#include file ="include/db.asp"-->
<%
Function quotes(x)
quotes = Replace (x, "'", "''")
End Function
dim checkArray
checkArray =
Array(
Array("email","^[\w\-\.]*[\w\.]\@[\w\.]*[\w\-\.]+[\w\-]+[\w]\.+[\w]+[\w $]", ">错误的电子邮件格式!")
Array("nick","[^ ]","> 输入姓名!")
Array("subject","[^ ]","> 输入新闻标题!")
Array("description","[^ ]","> 输入新闻描述!")
Array("editor","[^ ]","> 输入新闻内容!") ……
代码中包含了IsLoggedIn.asp以及include/db.asp两文件，IsLoggedIn.asp文件用来判定用户是否已经登录，如果没有登录，将无法进行添加新闻页面，直接转入到登录页面。Include/db.asp文件用来连接数据库。
创建向数据库中添加新闻的表单，addnews.asp中的表单为editor。退出管理员登录，其主要代码如下：
If Request.Cookies("Project")("User") <> "" Then
Response.Write("<font Color='RED' Face='Verdana' Size='2'>您的用户名为 <b>" & Request.Cookies("Project")("User") & "</b></font>")
Else
%>
<% End If %>
</td>
<td width="9%" align="right"><font face="Verdana" style="font-size: 9pt; font-weight: 700"> <a href="logout.asp" style="text-decoration: none">退出登录</a></font></td>……
4.4 编辑新闻模块
1. newslist.asp
审核员管理页面主要是对新闻进行审核，可对需审核的新闻内容进行查看和编辑，以确定是否授权发布，审核员除审核新闻外，也可添加新闻和管理新闻，所添加的新闻不需审核而可以直接发布，管理新闻包括修改和删除新闻；
在图4-5中，单击“编辑新闻”将弹出newslist.asp编辑新闻主界面，编辑新闻模块是该系统中功能最强大的一个功能。用户可以对新闻进行各种数据库管理操作，如查看新闻，编辑新闻标题，复制新闻及删除新闻等。Newslist.asp编辑新闻主界面如图4-6所示。
图4-6 编辑新闻模块
编辑新闻主界面主要代码如下：
……
<%
x_id = Null: ox_id = Null
x_headline = Null: ox_headline = Null
x_email = Null: ox_email = Null
x_poster = Null: ox_poster = Null
x_adddate = Null: ox_adddate = Null
x_description = Null: ox_description = Null
x_artikel = Null: ox_artikel = Null
%>……
代码中，首先对该网页进行一些初始化设置，初始化公共变量，并根据用户的等级设置权限。如代码如下：
<%
sExport = Request.QueryString("export") ' Load Export Request
If sExport = "word" Then
Response.ContentType = "application/vnd.ms-word"
Response.AddHeader "Content-Disposit