Product Catalog
<%set rec=conn.execute("select top 6 * from class where PartID='0' order by Classorder") while not rec.eof%> <%if rec("NumberID")=left(request("ClassID"),3) then set rs=conn.execute("select * from class where PartID='"&rec("NumberID")&"' order by Classorder") while not rs.eof%> <%if len(request("ClassID"))>=6 then if rs("NumberID")=left(request("ClassID"),6) then set rs1=conn.execute("select * from class where PartID='"&rs("NumberID")&"' order by Classorder") while not rs1.eof%> <% rs1.movenext wend end if end if %> <%rs.movenext wend rs.close set rs=nothing end if%> <%rec.movenext wend rec.close set rec=nothing%>
"> <%=rec("Class")%>
　 " style="color:#000000"><%=rs("Class")%>
     ·"> <%=rs1("Class")%>
More>>
About Us More>>
　
News More>>
　
Links
<% set rs=server.createobject("adodb.recordset") sql="select * from ServeInfo where ServeOrder=1" rs.open sql,conn,1,1 if rs.eof then response.write "The material is being increased......" else if len(rs("ServeContent"))>260 then response.write left(rs("ServeContent"),260)&"... ..." else response.Write rs("ServeContent") end if end if%> More>>
　 <% set rs=server.createobject("adodb.recordset") sql="select top 4 * from News where class='001' order by datetime desc" rs.open sql,conn,1,1 for i=1 to 4 if rs.eof then exit for end if %>
" target="_blank"> · <%if len(rs("Title"))>36 then response.write left(rs("Title"),32)&"..." else response.write rs("Title") end if%> [<%=rs("datetime")%> ]
<% rs.movenext next rs.close set rs=nothing %>		 　
CCTV:      http://www.icctv.cc
                  http://www.cctung.com
FACEID:   http://www.faceid.cc
               http://www.icctv.me
  Sales:      http://www.vmile.com
   Blog:       http://cctung.52rd.net
New Products
<% sql="select top 20 * from product where NewProduct=1 order by EditTime desc" set rec= Server.CreateObject("adodb.recordset") rec.open sql,conn,1,1 if not rec.eof then rec.pagesize=20 iCount=rec.RecordCount ' 记录总数' iPageSize=rec.PageSize maxpage=rec.PageCount page=request("page") if Not IsNumeric(page) or page="" then page=1 else page=cint(page) end if if page<1 then page=1 elseif page>maxpage then page=maxpage end if rec.AbsolutePage=Page if page=maxpage then x=iCount-(maxpage-1)*iPageSize else x=iPageSize end if else response.Write("



      没有找到相关产品！") end if%> <%i=1 while not rec.eof and i<=1%>
<%if not rec.eof then%>
"> " width="156" height="116" border="0"/>
<%rec.movenext end if%>		 <%if not rec.eof then%>
"> " width="156" height="116" border="0"/>
<%rec.movenext end if%>		 <%if not rec.eof then%>
"> " width="156" height="116" border="0"/>
<%rec.movenext end if%>		 <%if not rec.eof then%>
"> " width="156" height="116" border="0"/>
<%rec.movenext end if%>		 <%if not rec.eof then%>
"> " width="156" height="116" border="0"/>
<%rec.movenext end if%>		 <%if not rec.eof then%>
"> " width="156" height="116" border="0"/>
<%rec.movenext end if%>		 <%if not rec.eof then%>
"> " width="156" height="116" border="0"/>
<%rec.movenext end if%>		 <%if not rec.eof then%>
"> " width="156" height="116" border="0"/>
<%rec.movenext end if%>		 <%if not rec.eof then%>
"> " width="156" height="116" border="0"/>
<%rec.movenext end if%>		 <%if not rec.eof then%>
"> " width="156" height="116" border="0"/>
<%rec.movenext end if%>		 <%if not rec.eof then%>
"> " width="156" height="116" border="0"/>
<%rec.movenext end if%>		 <%if not rec.eof then%>
"> " width="156" height="116" border="0"/>
<%rec.movenext end if%>		 <%if not rec.eof then%>
"> " width="156" height="116" border="0"/>
<%rec.movenext end if%>		 <%if not rec.eof then%>
"> " width="156" height="116" border="0"/>
<%rec.movenext end if%>		 <%if not rec.eof then%>
"> " width="156" height="116" border="0"/>
<%rec.movenext end if%>		 <%if not rec.eof then%>
"> " width="156" height="116" border="0"/>
<%rec.movenext end if%>		 <%if not rec.eof then%>
"> " width="156" height="116" border="0"/>
<%rec.movenext end if%>		 <%if not rec.eof then%>
"> " width="156" height="116" border="0"/>
<%rec.movenext end if%>		 <%if not rec.eof then%>
"> " width="156" height="116" border="0"/>
<%rec.movenext end if%>		 <%if not rec.eof then%>
"> " width="156" height="116" border="0"/>
<%rec.movenext end if%>
<% i=i+1 wend%>

Hot Products
<% sql="select top 108 * from product where NewProduct=1 order by EditTime desc" set rec= Server.CreateObject("adodb.recordset") rec.open sql,conn,1,1 if not rec.eof then rec.pagesize=12 iCount=rec.RecordCount ' 记录总数' iPageSize=rec.PageSize maxpage=rec.PageCount page=request("page") if Not IsNumeric(page) or page="" then page=1 else page=cint(page) end if if page<1 then page=1 elseif page>maxpage then page=maxpage end if rec.AbsolutePage=Page if page=maxpage then x=iCount-(maxpage-1)*iPageSize else x=iPageSize end if else response.Write("



      没有找到相关产品！") end if%> <%i=1 while not rec.eof and i<=3%>
<%if not rec.eof then%>
"> " width="120" height="100" border="0"/>
Name: <%=rec("ProductName")%>
Model: <%=rec("Goods_Key")%>
Spec: <%=rec("Brand")%>
">
<%rec.movenext end if%>		 <%if not rec.eof then%>
"> " width="120" height="100" border="0"/>
Name: <%=rec("ProductName")%>
Model: <%=rec("Goods_Key")%>
Spec: <%=rec("Brand")%>
">
<%rec.movenext end if%>
<% i=i+1 wend%>