杭州设计公司,杭州广告设计公司
网页设计
网页实现上一篇下一篇JS代码
信息来源:http://www.51wisdom.com.cn     栏目类别: 网页设计     浏览次数:     发表评论 减小字体 增大字体

以下代码为本站所用代码,供大家交流。

因为我们有时候会删除**己的文章,为了更好的实现这个功能所以本站选择JS代码实现这个功能。ID为**动编号。

html页面JS调用上一页代码

以下是引用片段:
<script src="http://www.51wisdom.com.c**/sec.asp?id=852"></script>

html页面JS调用下一页代码

以下是引用片段:
<script src="http://www.51wisdom.com.c**/**ext.asp?id=852"></script>

以下是引用片段:

sec.asp代码

<!--#i**clude file="co****.asp"-->
<%
id=request.QueryStri**g("id")

hits=co****.execute("select top 1&**bsp; title from **ews where id<" &id&" order by id desc")(0)
I**id=co****.execute("select top 1&**bsp; id from **ews where id<"&id&" order by id desc")(0)&**bsp;

respo**se.write("docume**t.write(""<FONT color=red>上一篇:<\/FONT><a href='../html/"&I**id&".html'>"&hits&"</a>"")")
%>

带判断的代码

<!--#i**clude file="co****.asp"-->
<%
id=request.QueryStri**g("id")
Set Rss=Server.CreateObject("adodb.recordset")
Sql="select top 1 *from **ews where &**bsp;id<"&id&" a**d show=true order by id desc"
Rss.Ope** SQL,Co****,1,1
If **ot Rss.EOF The**
respo**se.write("docume**t.write(""<FONT color=red>上一篇:<\/FONT><a href='../html/"&rss("id")&".html'>"&rss("title")&"</a>"")")
else
respo**se.write("docume**t.write(""<FONT color=red>上一篇:<\/FONT>没有了"")")
e**d if
&**bsp; Rss.Close
&**bsp; SET Rss=Nothi**g
%>

**ext.asp代码

<!--#i**clude file="co****.asp"-->
<%
id=request.QueryStri**g("id")

hits=co****.execute("select top 1&**bsp; title from **ews where id<" &id&" order by id asc")(0)
I**id=co****.execute("select top 1&**bsp; id from **ews where id<"&id&" order by id asc")(0)&**bsp;

respo**se.write("docume**t.write(""<FONT color=red>上一篇:<\/FONT><a href='../html/"&I**id&".html'>"&hits&"</a>"")")
%>

带判断的代码

<!--#i**clude file="co****.asp"-->
<%
id=request.QueryStri**g("id")
Set Rss=Server.CreateObject("adodb.recordset")
Sql="select top 1 *from **ews where&**bsp; id>"&id&" a**d show=true order by id asc"
Rss.Ope** SQL,Co****,1,1
If **ot Rss.EOF The**
respo**se.write("docume**t.write(""<FONT color=red>下一篇:<\/FONT><a href='../html/"&rss("id")&".html'>"&rss("title")&"</a>"")")
else
respo**se.write("docume**t.write(""<FONT color=red>下一篇:<\/FONT>没有了"")")
e**d if
&**bsp; Rss.Close
&**bsp; SET Rss=Nothi**g
%>

&**bsp;

&**bsp;

以上代码为本站原创转载请注明!

本文标签:把本文收藏到 网摘 博采 百度
上一篇:网站版面设计的步骤           回网页设计列表         下一篇: 平面设计之八点“心”
搜索本站其他内容: 百度一下:[网页实现上一篇下一篇JS代码]   Google搜索:[网页实现上一篇下一篇JS代码]
最新网友评论文章↓
1.靠2009-11-19 20:42:45
2.去2009-11-19 20:39:41
3.脑残还是变相炫富?2009-11-16 20:17:58
4.好感动哦2009-11-7 15:40:32
5.怎么学习2009-10-20 10:54:50

文章添加时间:2008-7-16,文件大小:20.3 KB,最近更新时间:2011-12-16 18:06:03 返回TOP↑            

本站文章搜集自网络;共享网络,共享快乐,我为人人,人人为我;如果您知道本站未知来源文章请告知本站谢谢!
文中及留言观点不代表本站;本站转载内容只是为了更好的交流;
若侵犯了您的版权请联系E-mail:有事儿,您Q我!,本站核实后立即处理!

  •             平面设计| 标志设计| 包装设计| 网页设计| 广告设计| VI设计| 画册设计| 专卖店设计| 展位设计| 名片设计| 网站地图|    建议使用IE5及以上1024*768分辨率
  •             友情链接 版权所有 © 杭州威迪广告公司 2008-2010 | TEL:0571-88385993 13296756810 浙ICP备09011107号