<% set rs=Server.CreateObject("adodb.recordset") set rsimg=server.CreateObject("ADODB.RecordSet") MainType=Request("Type") Select case MainType Case "业界资讯" picName="yjzx" ShowNumber=47 sql="SELECT Top " & ShowNumber & " * FROM xinwen as a,type as b WHERE ( a.Type='2' or a.Type='6' or a.Type='12' or a.Type='32') and b.typeid=a.type and disappare='1' order by Newsid desc" Case "协会动态" picName="cyts" ShowNumber=47 sql="SELECT Top " & ShowNumber & " * FROM xinwen as a,type as b WHERE a.Type='3' and b.typeid=a.type and disappare='1' order by Newsid desc" Case "分析透视" picName="fxyc" MainType="分析研究" ShowNumber=47 sql="SELECT Top " & ShowNumber & " * FROM xinwen as a,type as b WHERE ( a.Type='16' or a.Type='24' or a.Type='51' or a.Type='44') and b.typeid=a.type and disappare='1' order by Newsid desc" Case "行业数据" picName="hysj" ShowNumber=47 sql="SELECT Top " & ShowNumber & " * FROM xinwen as a,type as b WHERE ( a.Type='34' or a.Type='45' or a.Type='48') and b.typeid=a.type and disappare='1' order by Newsid desc" Case "国际贸易" picName="gpmy" ShowNumber=47 sql="SELECT Top " & ShowNumber & " * FROM xinwen as a,type as b WHERE ( a.Type='26' or a.Type='35' or a.Type='37' or a.Type='52') and b.typeid=a.type and disappare='1' order by Newsid desc" Case "产业集群" picName="cyjjd" ShowNumber=47 sql="SELECT Top " & ShowNumber & " * FROM xinwen as a,type as b WHERE ( a.Type='36' or a.Type='50') and b.typeid=a.type and disappare='1' order by Newsid desc" Case "即时新闻" picName="jsxw" ShowNumber=47 sql="SELECT top 28 * FROM xinwen as a,type as b WHERE a.Type<>'33' and a.Type<>'61' and a.Type<>'63' and a.Type<>'64' and b.typeid=a.type and disappare='1'" sql=sql+" and homefabu='1'" sql=sql+" and location='3'" sql=sql+" order by ntime desc,NewsID Desc" End Select %> 中国服装协会官方网站-行业资讯
 首页 > 行业资讯 > <%=maintype%>
<% 'sql=sql+" order by Ntime Desc" rs.open sql,conn,1,1 While not rs.eof %> <% rs.MoveNext wend rs.close %>
  <%=MainType%>>>    
  <% permission=int(rs("linkpermission")) if permission=1 then %> " target="_blank"><%=rs("shorttile")%> <%else%> " target="_blank"><%=rs("shorttile")%> <%end if%>
<%=rs("NTime")%>