<% toptype=1 topimg="/link/job.jpg" toplink="/" dim pagenow pagenow = 1 pagenow = request("page") if pagenow = null or pagenow = "" then pagenow = 1 if not isnumeric(pagenow) then pagenow = 1 pagenow = cint(pagenow) if pagenow < 1 then pagenow = 1 %>
         家具品牌
         
          家具分類
        <% for i = 0 to ubound(cpA) %> <% if (i+1) mod 6 = 0 then response.Write("") next %>
        <%=cpa(i)%>[<%=p_num(i)%>]
          家具品牌
        <% xrs.close set xrs = nothing %>
        <% 'sql="select top 28 logo,gsname,hidd from pp order by ptop desc,id desc" 'sql="select top 40 logo,gsname,hidd from pp order by ptop desc,id desc" 'set rs=conn.execute(sql) 'sql = "select itemid,dispname,altname,hid,picurl from AdPro where locationid=8 and starttimeGETDATE() order by disporder desc,itemid desc" sql = "select a.itemid,a.dispname,a.altname,a.hid,a.picurl from AdPro a,userinfo b where locationid=8 and starttimeGETDATE() and ( hid>0 and a.hid=b.hidd and b.endtime>GETDATE() ) order by disporder desc,itemid desc" set crs = server.createobject("adodb.recordset") crs.pagesize = 28 crs.open sql,conn,1,1 if not crs.eof then if pagenow > crs.pagecount then pagenow = crs.pagecount crs.absolutepage = pagenow end if i=0 'do while not crs.eof for ci=1 to crs.pagesize i=i+1 %> <% if i mod 4 =0 then Response.Write("") end if crs.movenext if crs.eof then exit for next 'loop %>
        " target="_blank" title="<%=crs("altname")%>">" width="128" height="70" border="0" alt="<%=crs("altname")%>">
        " target="_blank" class="Czi9pt" title="<%=crs("altname")%>"><%=crs("dispname")%>
        首頁 <% if pagenow > 1 then %> 上一頁 <% end if%> <% for iprev=5 to 1 step -1 if (pagenow - iprev) > 0 then %> <%=(pagenow - iprev)%> <% end if next %> <%=pagenow %> <% for inext=1 to 5 if (pagenow + inext ) <= crs.pagecount then %> <%=(pagenow + inext)%> <% end if next %> <% if crs.pagecount > pagenow then %> 下一頁 <% end if %> <% if crs.pagecount > 1 and pagenow < crs.pagecount then %> 末頁 <% end if %> <% if pagenow = crs.pagecount then response.write " 末頁 " %> 共 <%=crs.recordcount %> 個 第 <%=pagenow %> 頁 / 共 <%=crs.pagecount %> 頁
          選購指南 +更多
        <%Call news(15,13,14,25,1)%>
          精彩推薦 +更多
        <%Call news(15,1,14,25,1)%>
          流行元素 +更多
        <%Call news(15,5,15,25,1)%>
        X-POWER-BY FNC V0.5.2 FROM ZZ55