<% else if rs.pagecount=0 then %>

<%if not rs.EOF then%> <% rs.PageSize=12 page=Clng(Request("page")) if page<1 then page=1 if page>rs.PageCount then page=rs.PageCount rs.AbsolutePage=page t=1 tt=0 for ipage=1 to rs.PageSize n=(page-1)*rs.PageSize+ipage %> <% if t=4 then if tt=4 then response.Write "" else response.Write "" tt=tt+1 end if t=1 else t=t+1 end if rs.MoveNext if rs.EOF then exit for next %> ">" width="180" height="180" title="<%=rs("name")%>" border=0 style="padding:2px; border:1px solid #dddddd"> <%=rs("name")%>

暂无此类信息可显示！

<% end if end if %> <% Response.Write "

" if page<>1 then Response.Write "首页 " Response.Write "上页 " else response.write "首页 上页 " End if if page<>rs.PageCount then Response.Write "下页 " Response.Write "尾页" else response.write "下页 尾页 " End if Response.Write " 页次：" & page & "/" & rs.pageCount & "页" Response.Write " 共有" & rs.recordcount & "个产品" Response.Write " 转到" & "" & "页   " response.Write "

" %>