|
以下代码直接复制即可使用。
+ A$ |- O' _+ t4 v& |5 H5 r. o- R$ |4 T( R<%dim newsid newsid=Request("showid") - _& R9 u. t) m1 n4 X7 g
sql="select top 1 title,id from cnnew where id<"&newsid&" order by id desc" set rsnews=conn.execute(sql) if rsnews.eof then response.write "上一篇文章: 已经是首篇文章了" else response.write "上一篇文章: <a href=news-cn.asp?showid="&rsnews("id")&">"&rsnews("title")&"</a>" end if response.Write"<p>" sql="select top 1 title,id from cnnew where id>"&newsid&" order by id" set rsnews=conn.execute(sql) if rsnews.eof then response.write "下一篇文章: 请等待更新" else response.write "下一篇文章: <a href=news-cn.asp?showid="&rsnews("id")&">"&rsnews("title")&"</a>" end if
5 v3 r: I6 _2 |! u; Q0 k G%>
. t5 _1 x& Q, X6 j6 J" r ) J! S- M+ h+ `+ i
[此贴子已经被作者于2012-8-8 15:23:51编辑过] $ N$ B- f, S5 [) {9 G& E5 R
|