超链接多值问题
当我的地址栏的地址是http://localhost/sssss/files/lb.asp?typestr='鲁菜'&PageNo=1是
大家看清楚图片我是有第二页的，但是当我点击下一页的时候地址是http://localhost/sssss/files/lb.asp?typestr='鲁菜'&PageNo=2出现
这是什么情况页面代码：<%
Dim X_typestr
X_typestr=Request.QueryString("typestr")
Dim db,strSql,rs
Set db=Server.CreateObject("ADODB.Connection")
db.Open "Dsn=background"
Set rs=Server.CreateObject("ADODB.Recordset")
strSql="Select * From news where typestr ="&X_typestr
rs.Open strSql,db,1
%>
<table cellspacing="0" cellpadding="0" width="510" background="../images/tu_di.gif" border="0">
<tr>
<td width="7"><img height="29" src="../images/tu(1).gif" width="7" /></td>
<td ><font color="#ffffff"><b>列表</b></font></span></td>
<td width="7"><img height="29" src="../images/tu1.gif" width="7" /></td>
</tr>
</table>
<%
Rs.PageSize = 3
If Request("PageNo") = "" Then PageNo=1 Else PageNo = CInt(Request("PageNo"))
If PageNo < 1 Then Response.Redirect "?PageNo=1" & Qs
If PageNo > Rs.PageCount And Rs.PageCount > 0 Then Response.Redirect "?PageNo=" & Rs.PageCount & Qs
If Rs.Eof and Rs.Bof Then PageNo = 0 Else Rs.AbsOlutePage = PageNo
dim FY_i
FY_i=1
For x = 1 to Rs.PageSize
If Rs.Eof Then Exit For
if FY_i=1 or FY_i mod 3=1 then
%>
<table style="BORDER-RIGHT: #1f92ff 1px solid; BORDER-TOP: 0px; BORDER-LEFT: #1f92ff 1px solid; BORDER-BOTTOM: 0px;" cellspacing="0" width="510" border="0" >
<tr height="10"><%end if%>
<td valign="top" width="170">
<div align="left"><%
if len(rs("title")) > 8 then
if (InStr(rs("memo"),"<img")>0) or (InStr(rs("memo"),"<IMG")>0) then
%><a href="zw.asp?id=<%=rs("id")%>" target="_blank"><%
response.Write left(rs("title"),5)&" ..." %></a> <img src="../images/pic.gif" width="12" height="12"><%
else
%><a href="zw.asp?id=<%=rs("id")%>" target="_blank"><%
response.Write left(rs("title"),5)&" ..."%></a><%
end if
else
if (InStr(rs("memo"),"<img")>0) or (InStr(rs("memo"),"<IMG")>0) then
%><a href="zw.asp?id=<%=rs("id")%>" target="_blank"><%
response.write rs("title")%></a> <img src="../images/pic.gif" width="12" height="12"><%
else
%><a href="zw.asp?id=<%=rs("id")%>" target="_blank"><%
response.write rs("title")%></a><%
end if
end if
%></div></td> <%
if FY_i mod 3=0 then
%>
</tr>
</table><% end if
FY_i=FY_i+1
rs.movenext
next
%> <table style="BORDER-RIGHT: #1f92ff 1px solid; BORDER-TOP: 0px; BORDER-LEFT: #1f92ff 1px solid; BORDER-BOTTOM: #1f92ff 1px solid" cellspacing="0" width="510" border="0" >
<tr><td> </td></tr>
<tr>
<td align="center">
总[<span class="style1">
<% = Rs.RecordCount%>
</span>]条<strong>|</strong> <span class="style1">
<% = Rs.PageSize%>
</span>条<strong>/</strong>页 <strong>|</strong> 当前<span class="style1">
<% = PageNo%>
</span><strong>/</strong><span class="style1">
<% = Rs.PageCount%>
</span>页 <a href="lb.asp?typestr='<%=rs("typestr")%>'&PageNo=<% =Rs.AbsOlutePage%>" >首页</a> <a href="lb.asp?typestr='<%=rs("typestr")%>'&PageNo=<% = PageNo - 1%><% = Qs%>">上一页</a> <a href="lb.asp?typestr='<%=rs("typestr")%>'&PageNo=<% = PageNo + 1%><% = Qs%>">下一页</a> <a href="lb.asp?typestr='<%=rs("typestr")%>'&PageNo=<% =Rs.PageCount%>">尾页</a>
<!--分页代码结束-->
</td>
</tr>
</table>
新建文件夹.rar
