下面是全部的程序,各位高手帮忙看看
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="3%">&nbsp;</td>
<td width="97%"><table width="99%" border="0" cellspacing="1" cellpadding="0" height="37" class="css">
<tr >
<td height=80 align="center" valign="top"
class=css>
<%if myrs.RecordCount=0 then%>
对不起!没有找到<b><%=keyword%></b>相关图片!<a href="javascript:history.back();"><span class=p14>返回</span></a>
<%else
myrs.PageSize=20'每页显示的记录数
total_page=myrs.PageCount
total_red=myrs.RecordCount
current_page=Request.Form("me_page")
if current_page="" then
current_page=1
elseif not isnumeric(current_page) then
current_page=1
else
current_page=cint(current_page)
end if
if current_page>total_page then
current_page=total_page
elseif current_page<1 then
current_page=1
end if
myrs.AbsolutePage=current_page
'加入的返回代码！
session("back_page")=current_page
session("back_keyword")=keyword
session("back_catalogid")=catalogid
session("back_type_id")=type_id
session("back_ver")=current_ver
%>
<table border="0" cellpadding="0" cellspacing="0" class="bfont" width="100%">
<form name="frm_list" method="post">
<tr align=center>
<td>
<%select case current_table%>
<%case "t_business_product_1" %>
<!--#include file="l_product_1.asp"-->
<%case "t_business_product_2" %>
<!--#include file="l_product_2.asp" -->
<%case "t_business_product_3" %>
<!--#include file="l_product_3.asp"-->
<%case "v_business_product"%>
<!--#include file="l_product_0.asp"-->
<%end select%>
</td>
</tr>
</form>
</table></td>
</tr>
<%if total_page>1 then%>
<tr height="24" class="css">
<td align="right"><div align="right">显示第<%=current_page%>/<%=total_page%>页
<%call showpage%>
转到第
<input type="text" name="goto_page1" value="<%=current_page%>" style="border: 1px solid rgb(200,200,200)" size=2 maxlength=3>
页
<input style="height:20;WIDTH: 42px;font-family:Arial" class="s02" hideFocus type="button" value="GoTo" name="cmd_goto" onClick="javascript:viewPage(document.all.goto_page1.value);">
</div>
<form action="mengxiang1.asp" method=post name="frm_page">
<input type="hidden" name="me_page">
<input type="hidden" name="action" value=<%=action%>>
<input type="hidden" name="catalogid" value=<%=catalogid%>>
<input type="hidden" name="keyword" value=<%=keyword%>>
<input type="hidden" name="sortname" value=<%=sortname%>>
<input type="hidden" name="type_id" value=<%=type_id%>>
<%if action="advsearch" then%>
<input type="hidden" name="keyField" value=<%=keyField%>>
<input type="hidden" name="is_hot" value=<%=is_hot%>>
<%end if%>
</form></td>
</tr>
<!--#include file="../../include/showpage.asp"-->
<%end if%>
<%end if%>
</table></td>
</tr>
</table>
l_product_1.asp的程序:
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
<%For j = 1 to 5
If myrs.EOF Then Exit For
%>
<tr>
<%
for x=1 to 3
%>
<td valign="bottom" ><table width="170" height="188" border="0" align="left" cellpadding="0" cellspacing="0">
<tr>
<td
height="114" class="STYLE6"><table width="100%" height="114" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="114"><div align="center"><a href="prodmain.asp?catalogid=<%=myrs("catalogid")%>&amp;type_id=<%=myrs("type_id")%>&amp;productid=<%=myrs("productid")%>" target="_blank">
<%if instr(myrs("small_photo"),"http://")>0 then%>
<img src="<%=myrs("small_photo")%>"
border="0" />
<%else%>
<img src="../prob/Prod_Photo/s/<%=myrs("small_photo")%>"
border="0" />
<%end if%>
</a></div></td>
</tr>
</table></td>
</tr>
<tr>
<td height="21" valign="middle" class="STYLE6"><div align="center"><span class="STYLE8"><a href="prodmain.asp?catalogid=<%=myrs("catalogid")%>&amp;type_id=<%=myrs("type_id")%>&amp;productid=<%=myrs("productid")%>" target="_blank"><%=myrs("product_name")%></a></span></div></td>
</tr>
<tr>
<td height="29" valign="top" class="STYLE6"><table width="100%" border="0" cellpadding="0" cellspacing="1" bgcolor="#CCCCCC">
<tr>
<td height="18" valign="middle" bgcolor="#FFFFFF">&nbsp;<span class="STYLE10"><a href="prodmain.asp?catalogid=<%=myrs("catalogid")%>&amp;type_id=<%=myrs("type_id")%>&amp;productid=<%=myrs("productid")%>">预览图像</a></span></td>
</tr>
<tr>
<td height="19" valign="middle" bgcolor="#FFFFFF">&nbsp;<span class="STYLE10"><a href="savepic.asp?picid=<%=myrs("productid")%>" target="_blank">收藏</a></span></td>
</tr>
</table></td>
</tr>
<tr>
<td height="13" class="STYLE6">&nbsp;</td>
</tr>
</table></td>
<%
myrs.MoveNext
If myrs.EOF Then Exit For
next
%>
</tr>
<%
'myrs.MoveNext
'If myrs.EOF Then Exit For
next
%>
</table>
你说清楚啊