以下代码直接复制即可使用。 2 I+ O a7 l: ^% y2 d/ T2 m/ K
<%dim newsid newsid=Request("showid") , K( _7 K5 m6 e+ O; C
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 3 Q) b4 {+ P( O% o. \- m0 G5 C
%> ; s; K6 `, s9 L9 A" `1 X, \
8 ]' n) V5 {. O# ^[此贴子已经被作者于2012-8-8 15:23:51编辑过]
: `( G1 V2 H4 H3 ~, M |