<%@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%>
<% dim ppk SQL="SELECT * FROM ppts order by orderid asc" Rs.open SQL,Conn,1 If not Rs.Eof and not Rs.bof Then for ppk= 1 to rs.recordcount %>
<% rs.movenext if rs.eof then exit for next end if rs.close %>