产 品 系 列
 
<% set RsA = server.createobject("adodb.recordset") RsA.source = "select id,parentid,content from deeptree where parentid=0 order by id" RsA.open RsA.source,conn,1,1 if RsA.eof then response.write"还没有相关内容!" while not RsA.eof Pid=RsA("id") %>
&Str=<%=RsA("content")%>"><%=RsA("content")%>
<% RsA.movenext wend RsA.close set RsA=nothing %>
<% Set Rs = server.createobject("adodb.recordset") Rs.source = "select * from News where Putout=true and TreeID like '%14%' order by id asc " Rs.open Rs.source,conn,1,1 Response.Write"" if Rs.BOF then response.write "" else for i=1 to 8 if Rs.EOF or Rs.BOF then exit for Newtitle=Rs("Newtitle") if len(Newtitle)>19 then Newtitle=left(Newtitle,19)&"…" Response.Write"
暂无信息!
&Str=<%=RsA("content")%>"><%=RsA("content")%>
<% RsA.movenext wend RsA.close set RsA=nothing %>