<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>

<% set cnn=server.createobject("ADODB.connection") cnn.open connstr sql="select * from DataTree where DataType='CATALOG_PRODUCTS'" set rst=cnn.execute(sql) do while not rst.eof %> <% rst.movenext loop %> "><%=rst("s1")%>

<% set cnn=server.createobject("ADODB.connection") cnn.open connstr sql="select * from DataTree where DataType='CATALOG_PRODUCTS'" set rst=cnn.execute(sql) do while not rst.eof %> ">" width="230" height="156" border="0"> <%=rst("s1")%>   <% rst.movenext loop %> .