ASP进阶之文章在线管理更新(七)

在线

ASP进阶之文章在线管理更新--主页面及搜索篇

作者:沙滩小子

经过了文章的添加、保存、显示,那么现在应该来谈谈关于管理程序的显示主页面,也就是显示所有文章的标题连接,以方便浏览者查找文章,其应该具有的功能有:显示所有文章的标题连接,加入日期,浏览次数等信息,另外还必须提供分页功能,要不然这么多的文章标题在一个页面都显示出来,那将非常的费时且不便浏览,另外由于本程序在这里结合了文章分栏目搜索的功能,所以在这里也将一起介绍了。

下面就为大家详细的介绍主页面index.asp的这些功能的实现过程以及其具体功用:

"建立数据库连接
<!--#include file="conn.asp"-->
<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>ASP专题栏目</title>
<meta name="GENERATOR" content="Microsoft FrontPage 3.0">
<link rel="stylesheet" type="text/css" href="style.css">
<script language="javascript">
function popwin2(path)
{ window.open(path,"","height=450,width=600,resizable=yes,scrollbars=yes,status=no,toolbar=no,menubar=no,location=no");
}
</script>
</head>
<%

"定义每页最大文章标题显示量MaxPerPage,你可以自己修改这里的数字来达到你的最佳显示效果
const MaxPerPage=18
dim totalPut
dim CurrentPage
dim TotalPages
dim i,j

"假如返回的页面信息是空的,也就是如果你直接输入index.asp,那么就用这里定义的页数第一页
if not isempty(request("page")) then
currentPage=cint(request("page"))
else
currentPage=1
end if
dim sql
dim rs
dim rstype
dim typesql
dim typeid,typename

"如果返回的栏目信息为空,那么就用这里定义的栏目,这里指定的是第三个栏目
if not isEmpty(request("typeid")) then
typeid=request("typeid")
else
typeid=3
end if

"通过返回的栏目typeid号,打开数据库显示指定的栏目,并把其值交给typename
set rstype=server.createobject("adodb.recordset")
typesql="select * from type where typeID="&cstr(typeid)
rstype.open typesql,conn,1,1
typename=rstype("type")
rstype.close
%>

<body>
<div align="center"><center>

<table border="0" width="95%" cellspacing="0" cellpadding="0">
<tr>
<td width="100%" style="border-left: thin dotted rgb(0,128,0); border-right: thin dotted rgb(0,128,0)"><p align="center"><br>

"显示栏目信息,当你点击了任何一个栏目,在typename的位置都会显示相关信息,这里没有采用栏目的自动显示方式是考虑了页面的显示效果,而采用手工添加的模式,要想采用自动模式,就自己写吧:)相信你学习到现在,不会连这个都编不出来吧!
动网ASP技巧专题>><font color="#FF0000"><%response.write ""&typename&""%></font><br>
<a href="index.asp?typeid=1">ASP FAQ</a>|<a href="index.asp?typeid=2">ASP组件</a> |<a href="index.asp?typeid=3">ASP文摘</a>|<a href="index.asp?typeid=4">ASP实例</a>|<a href="index.asp?typeid=5">ASP安全</a> </p>
<div align="center">

"打开指定的记录集article并按照文章的加入日期排序,在这里打开有两个条件,一个是利用like来查询数据库并显示相关文章标题,还有就是通过返回的typeid显示指定栏目的文章
<%
sql="select * from article where title like '%"&request("txtitle")&"%' and typeid="+cstr(typeid)+" order by date desc"
Set rs= Server.CreateObject("ADODB.Recordset")
rs.open sql,conn,1,1

"如果查询数据库的结果指向记录集的开始或者结尾,表示数据库中没有任何相关文章
if rs.eof and rs.bof then
response.write "<p align='center'>没有或没有找到任何文章</p>"
else
"如果数据库内有内容,则取得数据库内文章数目
totalPut=rs.recordcount
"假如页面参数currentpage小于1,则指定为1
if currentpage<1 then
currentpage=1
end if
"利用文章总数和每页最大文章数算得分页的页数
if (currentpage-1)*MaxPerPage>totalput then
if (totalPut mod MaxPerPage)=0 then
currentpage= totalPut \ MaxPerPage
else
currentpage= totalPut \ MaxPerPage + 1
end if

end if
"如果分页的页数为1或者页面数减1乘与页面最大文章数小于文章总数,则用已经做好的function showpage在showContent子程序也就是显示文章标题部分的上面和下面显示分页程序
if currentPage=1 then
showpage totalput,MaxPerPage,"index.asp"
showContent
showpage totalput,MaxPerPage,"index.asp"
else
if (currentPage-1)*MaxPerPage<totalPut then
rs.move (currentPage-1)*MaxPerPage
"定义书签
dim bookmark
bookmark=rs.bookmark
showpage totalput,MaxPerPage,"index.asp"

时间: 2024-11-05 19:00:46

ASP进阶之文章在线管理更新(七)的相关文章

ASP进阶之文章在线管理更新(九)

在线 ASP进阶之文章在线管理更新--管理页面篇 作者:沙滩小子 前面讲述了关于文章管理系统的密码及密码验证,通过密码验证可以限制一般浏览者所能进入的页面,这里所要限制的就是普通用户所不能进入的页面,也就是包括管理页面.删除文章页面.修改文章页面以及修改用户信息和修改栏目信息的页面.其实这里的主管理页面就是和文章管理系统的主页面类似的页面,只是在里面添加了一些有关管理内容的连接,以方便管理者对文章进行在线的修改删除等操作. 下面就为大家介绍这一页面的主要程序内容,由于它和文章管理的主页面差不多,

ASP进阶之文章在线管理更新(十)

在线 ASP进阶之文章在线管理更新--文章删除篇 作者:沙滩小子 上一节我们介绍了文章管理的主页面,而这里的主页面只是显示了相关的连接而已,要是没有相关的程序来执行,那么也只是空连接而已,并不会显示出它的具体功用,而文章的在线删除是本系统不可缺少的一部分,虽然它的程序很简单,但是还是有必要为大家介绍一下. 在ASP中,对数据库的操作有更新(update).删除(delete)等操作,在本系统中对文章的删除就是利用了DELETE来进行文章的删除操作的,下面就为大家介绍本删除程序(delete.as

ASP进阶之文章在线管理更新(八)

在线 ASP进阶之文章在线管理更新--管理者登陆及验证篇 作者:沙滩小子 前面已经介绍了文章管理系统的前台程序,其前台程序主要就是提供给大家浏览的页面,主要是文章浏览.文章搜索.转发EMAIL等程序,其实开始介绍的文章添加和保存实际上是本系统的后台程序,但是文章的显示的具体内容是和文章的搜集.添加.保存是分不开的,要不然何来文章显示?我们现在开始介绍的文章管理系统的后台程序将具有以下功能:管理员登陆验证.文章在线添加(前面已经介绍过).文章在线修改删除.管理员密码修改.文章栏目修改添加及删除等主

ASP进阶之文章在线管理更新(十一)

在线 ASP进阶之文章在线管理更新--文章修改篇 作者:沙滩小子 上一节我们讲了文章的在线删除的具体实现方法,在这里我将为大家介绍关于文章管理系统的在线修改.在本系统中,提供在线修改是一项必不可少的内容,因为当大家在网上更新文章的时候,总会碰上这样那样的问题,一个不小心就会造成添加的失误,有时候是内容不全,也有可能是文章的栏目原来添加的时候选错了,同时也就是这样那样的错误才显得这个程序的必要性. 文章的在线修改保存的程序其实和文章的添加和保存程序差不多,只是这里是对数据库进行更新,而文章添加则是

ASP进阶之文章在线管理更新(十二)

在线 ASP进阶之文章在线管理更新--管理员&栏目管理篇 作者:沙滩小子 前面的章节已经基本实现了文章管理系统的大部分功能,但是在本系统中,管理员姓名和密码以及栏目的更新都要自己在数据库中操作,这样并没有完全实现系统的完全在线管理更新,所以我最近对管理系统进行了进一步的完善,对其增加了相关功能,实现的真正意义上的文章管理系统在线管理更新! 实现这些功能也是通过对数据库的更新甚至新增内容来实现的,在这里活用数据库操作命令updata和addnew是关键,那些地方该用UPDATA,那些地方该用ADD

ASP进阶之文章在线管理更新(一)

在线 ASP进阶之文章在线管理更新--数据库连接篇 作者:沙滩小子 上一节为大家介绍了文章管理系统的数据库结构,建立了数据库以后,就要用ASP建立与数据库相关的程序,包括连接数据库.显示数据库内容.更新数据库等与之相关的程序,所以本篇将为大家讲述在管理系统中怎样与数据库进行连接,并打开数据库.在ASP程序中,一般都将建立数据库连接的程序单独放到一个文件中,以后就直接用<!--include file="xxx.asp"-->来调用就可以了,这样即省去了以后在需要建立数据库连

ASP进阶之文章在线管理更新(二)

在线 ASP进阶之文章在线管理更新--文章的添加篇 作者:沙滩小子 上一节已经介绍了关于文章管理的数据库连接,本篇将讲述文章的在线添加,当你找到了一篇很好的资料,并且想尽快放到你的网站上面,如果你首先想到的是快点做好一个页面,并且赶快用FTP把它上传,那么在这里这些都显得没有必要了,在这里你可以通过进入管理页面的添加文章,然后直接把文章粘贴复制过来就可以了,这也是本篇将要讲述的重点--文章的在线添加. 另外通过下面的一步步讲解,相信你可以领会到其中的意义,在这里对HTM代码将不做讲述. 新建一A

ASP进阶之文章在线管理更新(三)

在线 ASP进阶之文章在线管理更新--文章的保存篇 作者:沙滩小子 经过了文章的添加过程,我想大家更想知道ASP代码是怎样将页面上的信息保存到数据库里面的呢?而且这一功能还必须由另外一个页面来实现,由于ASP对数据库支持的完好性,由ASP来实现对数据库的操作是非常简单的,很容易对数据库进行新增.更新.修改.删除等操作,而我们的程序正好对这些方面都有一定的要求,下面就来介绍本程序中的文章保存页面! 新建一ASP文件savearticle.asp,以下注明其主要代码的具体含义: "插入数据库连接文件

ASP进阶之文章在线管理更新(四)

在线 ASP进阶之文章在线管理更新--对HTM代码的转化篇 作者:沙滩小子 前面为大家介绍了文章的在线添加以及保存,但如果仅仅是这样还不够的,因为有很多的文章本身带有的HTM代码必须完整的显示出来,而不是显示出它的效果来,这也就是说必须转化HTM代码以使它能具体显示出它的代码,比如:<a href="">你好</a>你并不想在页面上显示出它是一个连接,而是显示其代码,这就象FRONTPAGE里面的直接在编辑页面写代码,只不过FRONTPAGE提供了转化的功能而已