<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%> <% dim SQL,sUrl,ParentID,LeftClassNum,ChnlName,i sUrl="Products.asp" LeftClassNum="ChnlID=2" SQL="SELECT top 1 ChnlName FROM Channels where ID=2" Rs.open SQL,Conn,1 If Rs.Eof and Rs.bof Then ChnlName="产品中心" else ChnlName=rs("ChnlName") end if rs.close %> <%=SiteTitle%>
<% SQL="SELECT pptImgURI FROM ppts order by orderid asc" Rs.open SQL,Conn,1 If not Rs.Eof and not Rs.bof Then for hmenui= 1 to rs.recordcount %> )"> <% rs.movenext if rs.eof then exit for next end if rs.close %>
News And Information
新闻资讯
<% SQL="SELECT top 1 * FROM News where ChnlID=1 and IsDelete=0 and ClassID=1 order by id desc" Rs.open SQL,Conn,1 If Rs.Eof and Rs.bof Then else for i= 1 to rs.recordcount %>
  • "">
    )">
    集团热点
    The Group
    Hotspot
    <%=ConLen(Rs("Title"),32)%>
    <%if rs("SubTitle") <> "0" then%>
    <%=rs("SubTitle")%>
    <%else%>
    <%=GetDate(Rs("UpdateTime"),2)%>
    <%end if%>
  • <% rs.movenext if rs.eof then exit for next end if rs.close %> <% SQL="SELECT top 1 * FROM News where ChnlID=1 and IsDelete=0 and ClassID=43 order by id desc" Rs.open SQL,Conn,1 If Rs.Eof and Rs.bof Then else for i= 1 to rs.recordcount %>
  • "">
    )">
    集团风采
    Group of
    Elegant Appearance
    <%=ConLen(Rs("Title"),32)%>
    <%if rs("SubTitle") <> "0" then%>
    <%=rs("SubTitle")%>
    <%else%>
    <%=GetDate(Rs("UpdateTime"),2)%>
    <%end if%>
  • <% rs.movenext if rs.eof then exit for next end if rs.close %> <% SQL="SELECT top 1 * FROM News where ChnlID=1 and IsDelete=0 and ClassID=44 order by id desc" Rs.open SQL,Conn,1 If Rs.Eof and Rs.bof Then else for i= 1 to rs.recordcount %>
  • "">
    )">
    项目新闻
    Have Great
    Originality
    <%=ConLen(Rs("Title"),32)%>
    <%if rs("SubTitle") <> "0" then%>
    <%=rs("SubTitle")%>
    <%else%>
    <%=GetDate(Rs("UpdateTime"),2)%>
    <%end if%>
  • <% rs.movenext if rs.eof then exit for next end if rs.close %>
    Product Category
    产品类别
    Research and design
    研发设计
    研 · 发
    Research
    设 · 计
    Design