以下代码直接复制即可使用。
3 q1 Z6 n% ]$ }<%dim newsid newsid=Request("showid") 0 U' |3 X3 L* n' z( m* u. ?
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 P$ Z1 O, g( r& Y) T" ?9 }
%>
! ~. l- S# y9 w( s; Z
! _* _- G/ r$ U7 Z[此贴子已经被作者于2012-8-8 15:23:51编辑过] 5 ? z% b% M- f1 ~9 ~
|