<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%> 深圳市鸿运达楼梯有限公司,鸿运达楼梯,实木楼梯系列,钢木楼梯系列,铁质系列,护栏系列,立柱及五金配件系列,实木门系列
<% bid = ReplaceStr(Request.QueryString("bid")) sql="select * from Zm_Case where Name <> '' " if bid <>"" then sql = sql & " and Bid="&bid&"" LinkUrL = "&bid="&bid&"" end if if sid <>"" then sql = sql & " and Tid="&sid&"" LinkUrL = LinkUrL&"&sid="&sid&"" end if sql = sql & " order by ord asc,id asc" %> <% pagesize=12'每页显示数量 set Pro_Rs = server.CreateObject("adodb.recordset") Pro_Rs.open sql,conn,1,1 if Pro_Rs.eof or Pro_Rs.bof then response.write"对不起,没有案例." else dim page_no if request.querystring("page_no")="" then page_no=1 else page_no=cint(request.querystring("page_no")) end if Pro_Rs.pagesize=pagesize Pro_Rs.absolutepage=page_no i = 0 %> <% do while not Pro_Rs.eof and i <% i = i + 1 Pro_Rs.movenext if Pro_Rs.eof then Response.Write("") exit do end if %> <% i = i + 1 Pro_Rs.movenext if Pro_Rs.eof then Response.Write("") exit do end if %> <% i = i + 1 Pro_Rs.movenext loop %>
">" width="210" height="158" border="0" style="border:1px #fead00 solid; padding:1px;" />
"><%=Pro_Rs("Name")%>
   
">" width="210" height="158" border="0" style="border:1px #fead00 solid; padding:1px;" />
"><%=Pro_Rs("Name")%>
  
">" width="210" height="158" border="0" style="border:1px #fead00 solid; padding:1px;" />
"><%=Pro_Rs("Name")%>
[ 共 <%=Pro_Rs.recordcount%> 案例 ]  [ 页数:<%=page_no%> / <%=Pro_Rs.pagecount%> ] [ 首页 ] <% if page_no=1 then response.write"上一页 " else%> [ 上一页 ] <%end if %> <%if page_no=Pro_Rs.pagecount then response.write "下一页" else%> [ 下一页 ] <%end if%> [ 尾页 ]  
<% end if Pro_Rs.close set Pro_Rs=nothing %>
版权所有:© 2010 深圳市鸿运达楼梯有限公司 粤ICP备11030397号
工厂地址:深圳市龙华新区观澜街道大水坑新塘工业区056号   电话:0755-28793335  0755-28151825