|
以下代码直接复制即可使用。
6 R* Z4 g& \8 H8 D# i% V% L<%dim newsid newsid=Request("showid") - m2 e3 @* d' [9 E" u! \! U" k
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 / n5 R9 h' n& a* ~ y k
%>
3 b; A& g1 t. _1 L
& f" q7 W" K: w/ g5 u; T; M[此贴子已经被作者于2012-8-8 15:23:51编辑过] , T! u: x; f+ _* x
|