文章正文

在线等呀急急！！！！！！！！！！！

类型：转载责任编辑：asp 日期：2007/03/01

在先线等

怎样实现像这个论坛的1 2 3 4 5 6 7 8 9 点击1或者2就跳转到指定的页面呢？
各位大虾请多多指点呀！！！
跳转行在
response.write "<a href=showlist.asp?nextpage="&i&">"&i&"</a>"
大家还是看看我的源代码吧
还是跳转不了
请大家帮我尽快解决，感激不尽呀
<html>
<head>
<title>untitled document</title>
<meta http-equiv="content-type" content="text/html; charset=gb2312">
</head>

<body bgcolor="#ffffff" text="#000000">
<%

dim intarticleid
if request.querystring("id")="" then
intarticleid=0
end if

strwhere="select * from article where articleparent="&intarticleid
strdsn="dsn=seasky;uid=seasky;pwd=123"
set rs=server.createobject("adodb.recordset")
rs.open strwhere,strdsn,3,3
rs.pagesize=10
nextpage=request.form("nextpage")
if nextpage="" then
session("abspage")=1
else
if nextpage="下一页" then
session("abspage")=session("abspage")+1
elseif nextpage="上一页" then
session("abspage")=session("abspage")-1
elseif nextpage="首页" then
session("abspage")=1
elseif nextpage="末页" then
session("abspage")=rs.pagecount
end if
rs.absolutepage=session("abspage")
end if
if rs.recordcount>0 then
i=0
response.write "<table border=1 width=100%/>"
response.write "<tr><td colspan=5 align=center>"
if intarticleid=0 then
response.write "这里是第"&session("abspage")&"页"&" 共有"&rs.recordcount&"个主题"
else
response.write "共有"&rs.recordcount&"个跟贴"
end if
response.write "</tr>"
%>
<tr>
<td align=center width=25%>时间</td>
<td align=center width=49%>主题</td>
<td align=center width=10%>作者</td>
<td align=center width=8%>被读</td>
<td align=center width=8%>跟贴</td>
</tr>
<%
do while not rs.eof and i<10
%>
<tr>
<td align=center><%=rs("articledate")%> <%=rs("articletime")%></td>
<td align=center><a href=readarticle.asp?id=<%=rs("articleid")%>><%=rs("articletitle")%></a></td>
<%
if session("username")="" then%>
<td align=center><%=rs("articleauthor")%></td>
<%else%>
<td align=center><a href=newmessage.asp?toname=<%=rs("articleauthor")%>><%=rs("articleauthor")%></a></td>
<%end if%>
<td align=center><%=rs("articleaccessnumber")%></td>
<td align=center><%=rs("articlefellownumber")%></td>
</tr>
<%rs.movenext
i=i+1
loop
response.write "</table></center>"
response.write "<center><form action showlist.asp method=post>"
if rs.pagecount>1 then
response.write "<input type=submit value=上一页 name=nextpage>"
end if
if(session("abspage"))<rs.pagecount then
response.write "<input type=submit value=下一页 name=nextpage>"
end if
end if
response.write "</form>"
end if
rs.close
set rs=nothing
%>
<form name="form1" method="post" action="showlist.asp">
<%
for i=1 to 8

response.write "<a href=showlist.asp?nextpage="&i&">"&i&"</a>"

next

%>
</form></body>
</html>

推荐阅读

美女配好男!好歌配好机!机歌大配对 [详细内容]

Unihub为证券企业量身定制VPN [详细内容]

怎样充分利用SIM卡的快速拨号 [详细内容]

微软宣布收购在线文件共享服务FOLDERSHARE [详细内容]

微软补丁程序有安全漏洞用户无法连接到VPN [详细内容]

关于T720的方向键在上网时的妙用 [详细内容]

离万元心理价位不远!佳能20D又降200 [详细内容]

网友回答:

站内导航：

IT热门资讯：

在线等呀 急急！！！！！！！！！！！

在线等呀急急！！！！！！！！！！！