asp小型新闻发布系统

 自己以前做的一个小型新闻发布系统,把它贴出来,1.自己熟悉一遍,2,也方便刚初学的有一点提示

首先数据库连接,因为数据小,所以选用access2003

要是你们在access2000能添加上,而在access2003连接不上,就把数据库文件的属性改一下'

现在我们开始写代码,我只写对新闻的添加,删除,查找,显示,其它代码就不写了

(1)先写一个数据连接的代码保存为conn.asp

<%

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

conn.open "provider=microsoft.jet.oledb.4.0;data source=" server.mappath("/新闻发布.mdb")

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

%>

(2)首页就应显示新闻,因为不知道有多少条新闻记录,所以我们有分页显示

<!--#include file="conn.asp"-->

<%

sql="select * from 新闻发布"

rs.open sql,conn,1,3

rs.pagesize=10

page=request("page")

if page<1 then page=1

if page>rs.pagecount then page=rs.pagecount

%>

<table border=0>

<tr><td>序号</td>

<%

for i=1 to rs.fi