以下代码直接复制即可使用。 . ^) P& Q8 [& _5 L! t* ?
<%dim newsid newsid=Request("showid") * a& L, M$ O a. z
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
1 A2 k/ n& V& J1 Q* T%> - ?8 J; Q4 ^: h1 |3 r% e
4 x- k9 O8 X; `2 U7 U {* @[此贴子已经被作者于2012-8-8 15:23:51编辑过]
/ W2 v7 c2 A+ s3 ^ |