|
以下代码直接复制即可使用。 & u, C s0 F& A0 E: W7 Q3 j1 e- N
<%dim newsid newsid=Request("showid")
! {/ J i7 W9 K+ y+ b, M; Bsql="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
- G/ O. k3 k% P7 b+ }%> 3 N( h; m& ^2 Q1 f* L
; X+ E. ~# E' ]6 z: y' N
[此贴子已经被作者于2012-8-8 15:23:51编辑过] ! ?3 }8 b5 G+ X
|