<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<!--#include file="connoklin.asp" -->
<%if trim(request("typeid"))="1" then
bbc="干洗房耗材"
elseif trim(request("typeid"))="2" then
bbc="水洗房耗材"
elseif trim(request("typeid"))="3" then
bbc="皮革耗材"
else 
bbc="设备配件及其他房耗材"
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title><%=bbc%>-凯萨洗衣</title>
<link href="pic/css.css" rel="stylesheet" type="text/css" />
<SCRIPT language=Javascript src="pic/bn.js"></SCRIPT>
</head>

<body onmousemove="HideMenu()">
<div id=menuDiv style='Z-INDEX: 2; VISIBILITY: hidden; WIDTH: 1px; POSITION: absolute; HEIGHT: 1px; BACKGROUND-COLOR: #9cc5f8'></div>
<!--#include file="ttop.asp" -->
<table width="993" border="0" cellspacing="0" cellpadding="0" align="center" bgcolor="D9F2F3">
  <tr>
<td width="230" bgcolor="B6E6E8" valign="top">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td><img src="pic/hha.gif"></td>
  </tr>
</table>
      <table width="92%" border="0" align="center" cellpadding="2" cellspacing="1">
	  <tr><td height="3"></td></tr>
             <%   sqlb2="select * from smallclass where bigclassname='洗涤耗材' order by smallclassid asc"
   set rsb2=server.createobject("adodb.recordset")
   rsb2.open sqlb2,conn,1,1
   do while not rsb2.eof %>
   <%if rsb2("smallclassname")="干洗房耗材" then
bbid="1"
elseif rsb2("smallclassname")="水洗房耗材" then
bbid="2"
elseif rsb2("smallclassname")="皮革耗材" then
bbid="3"
else 
bbid="4"
end if
%>
   <tr><td colspan="3"><a href=haocai.asp?typeid=<%=bbid%>  class="gblin"><%=rsb2("smallclassname")%></a></td></tr>
	    <%   sql2="select * from news where bigclassname='洗涤耗材' and smallclassname='"&rsb2("smallclassname")&"' and Sketch<>''  order by id asc"
   set rs2=server.createobject("adodb.recordset")
   rs2.open sql2,conn,1,1
   do while not rs2.eof %>
        <tr><td width="3"></td>
    <td><img src="pic/ddi.gif"></td><td><a href=show.asp?id=<%=rs2("id")%> title=<%=rs2("title")%> class="gbhui"><%=left(rs2("title"),15)%>
                              <%if len(rs2("title"))>15 then%>
                              ...
                              <%end if%>
                              </a></td>
  </tr>
  <%rs2.movenext
  loop
  rs2.close
  set rs2=nothing
  rsb2.movenext
  loop
  rsb2.close
  set rsb2=nothing%>
</table>
</td>
    <td width="12"></td>
    <td width="740" valign="top"> 
      <table width="739" border="0" cellspacing="0" cellpadding="0">
        <tr><td height="8"></td></tr>
        <tr>
          <td width="739" height="37" align="left" valign="top"  background="pic/555.gif" class="gblin"> 
            <table width="97%" border="0" align="right" cellpadding="0" cellspacing="0">
			<tr><td height="7"></td></tr>
              <tr>
    <td class="gblin">&nbsp;<%=bbc%></td>
  </tr>
</table>
           </td>
        </tr>
        <tr>
          <td width=739 height="850" valign="top" background="pic/1bg.gif"><table width="95%" border="0" align="center" cellpadding="0" cellspacing="0">
              <tr> 
                <td height="50" valign="top"> <table width="100%" border="0" cellpadding="0" cellspacing="0" class="gb">
                    <tr> 
                      <td height="25" align="center"> 
                        <% dim nowPage,aa,bbb
				  const MaxPerPage2=12
   sql="select * from news where bigclassname='洗涤耗材'  and smallclassname='"&bbc&"'  order by id desc"
   set rs=server.createobject("adodb.recordset")
   rs.open sql,conn,3,3
   if rs.eof and rs.bof then
   response.write "<p align='center'><font size=4>暂 无 信 息</font></p>"
   else
   rs.pagesize=MaxPerPage2
    	nowPage=request.querystring("page")
       if nowPage="" then
	      nowpage=1
	   else
	     nowPage=cint(nowPage)
         if nowPage<1 or nowPage>RS.PageCount then
	        NowPage=1
	      end if
	   end if	  
       RS.absolutePage=NowPage   
   dim m_nPageCount
	     m_nPageCount=Rs.PageCount
		  dim nTemp,szTemp
  		   szTemp="haocai.asp?typeid="&trim(request("typeid"))&"&Page="
		   nTemp=1
%>
                      </td>
                    </tr>
                  </table>
                  <table width="100%" border="0" cellspacing="0" cellpadding="0">
                    <%
for aa=1 to 4
if not rs.eof then
%>
                    <tr valign="top"> 
                      <% 
 for bbb=1 to 3
 if not rs.eof then 
  if rs("sketch")<>"" then
		sketch=replace(rs("Sketch"),"../../","")
		else
		sketch="pic/nopic.gif"
		end if

 %>
                      <td> <table width="95%" border="0" align="center" cellpadding="2" cellspacing="2">
                          <tr> 
                            <td align="center" class="gbhui"><a href=show.asp?id=<%=rs("id")%> title=<%=rs("title")%> class="gbhui" target="_blank"><img src="<%=sketch%>" border="0" width="200" height="180" class="img_bor"></a></td>
                          </tr>
                          <tr> 
                            <td  align="center" class="gbhui"><a href=show.asp?id=<%=rs("id")%> title=<%=rs("title")%> class="gbhui" target="_blank"><%=left(rs("title"),15)%> 
                              <%if len(rs("title"))>15 then%>
                              ... 
                              <%end if%>
                              </a></td>
                          </tr>
                          <tr> 
                            <td height="8"></td>
                          </tr>
                        </table></td>
                      <%
				rs.movenext
				else
				exit for
				end if
				next
				%>
                    </tr>
                    <%
   else
       exit for
   end if
  next 
%>
                  </table>
                  <table width="100%" border="0" cellpadding="0" cellspacing="0" class="gb">
                    <tr> 
                      <td height="30" align="center" valign="bottom"> 
                        <%response.write("共有<font color=red> "&rs.recordcount&"</font> 条,当前第 <font color=red>"&NowPage&"</font>/<font color=red>"&rs.PageCount&"</font> 页")
%>
                        &nbsp; 
                        <%
	     m_nPageCount=Rs.PageCount
		   nTemp=1
		   response.write("[<a class=gbhui href='"&sztemp&nTemp&"'>首  页</a>]")
	       if nowPage>1 then
		      nTemp=NowPage-1
		       response.write "&nbsp;"
           response.write("[<a class=gbhui href='"&szTemp&nTemp&"'>上一页</a>]")		
           end if
	       if nowPage<m_nPageCount then
               nTemp=NowPage+1
              response.write "&nbsp;"
              response.write("[<a class=gbhui  href='"&szTemp&nTemp&"'>下一页</a>]")
		   end if
           nTemp=m_nPageCount 
		   response.write "&nbsp;"  
           response.write("[<a class=gbhui href='"&szTemp&nTemp&"'>尾  页</a>]")
  end if
   %>
                      </td>
                    </tr>
                  </table>
                  <table width="100%" border="0" cellspacing="0" cellpadding="0">
                    <tr> 
                      <td height="10"></td>
                    </tr>
                  </table></td>
              </tr>
            </table> </td>
        </tr>
        <tr>
          <td><img src="pic/1end.gif"></td>
        </tr>
      </table>
	  
    </td>
    <td width="11"></td>
  </tr>
</table>
<!--#include file="eend.asp" -->
</body>
</html>
