<%dim rspclass,sql1 set rspclass=server.CreateObject("adodb.recordset") sql="select * from photoclass where parentID =0 and classid<>9 and classid<>10 order by xunxu asc" rspclass.open sql,conn,1,3 do while not rspclass.eof %> <% dim rspclassroot set rspclassroot=server.createobject("adodb.recordset") sql1="select * from photoclass where parentID=" & rspclass("classID") & " order by classID" rspclassroot.open sql1,conn,1,3 %> <% if rspclassroot.eof then %>
&classname=<%=rspclass("classname")%>" class="red_6_7" style="text-decoration:none;"><%=rspclass("classname")%>
<%else%> <%do while not rspclassroot.eof%> <% rspclassroot.movenext loop %> <% rspclassroot.close set rspclassroot=nothing %>
 &classID2=<%=rspclass("classid")%>&classname=<%=rspclass("classname")%>" class="red_6_7" style="text-decoration:none;"><%=rspclass("classname")%>
&classname=<%=rspclassroot("classname")%>"class="red_6_7"><%=rspclassroot("classname")%>
<%end if%> <% rspclass.movenext loop %> <% rspclass.close set rspclass=nothing %>
 
 
<% set rs=server.CreateObject("ADODB.RecordSet") rs.open "select * from Photo where OnTop=1 and deleted=0 order by updatetime desc",conn,1,1 if rs.eof and rs.bof then response.write "

No products

" else %> <%dim i i=0%> <%do while not rs.eof%> <% rs.movenext loop rs.close set rs=nothing %> <%end if%>
">" alt="点击查看产品详细资料" width="130" height="110" border="0">
  <% set rs=server.createobject("adodb.recordset") sql ="select * from article where typeid=59 and news=1 order by newsid desc" rs.open sql,conn,1,1 if rs.eof and rs.bof then response.write "

占时没有测评

" else %> <%dim ii ii=0%> <%do while not rs.eof%> <% ii=ii+1 if ii>=14 then Exit Do rs.movenext loop rs.close set rs=nothing %> <%end if%>
[<%=year(rs("dateandtime"))%>/<%=month(rs("dateandtime"))%>/<%=day(rs("dateandtime"))%>]
  <% set rs=server.createobject("adodb.recordset") sql ="select * from article where typeid=58 and news=1 order by newsid desc" rs.open sql,conn,1,1 if rs.eof and rs.bof then response.write "

占时没有测评

" else %> <%dim iii iii=0%> <%do while not rs.eof%> <% iii=iii+1 if iii>=14 then Exit Do rs.movenext loop rs.close set rs=nothing %> <%end if%>
[<%=year(rs("dateandtime"))%>/<%=month(rs("dateandtime"))%>/<%=day(rs("dateandtime"))%>]