<% set conn=server.CreateObject("adodb.connection") conn.Open application("connstr") set rs=conn.Execute("SELECT DISTINCT calling,count(*) as cnt,sum(money) as totalmoney FROM enterprise WHERE calling is not null GROUP BY calling") %> 行业分布图

公明镇总体规划——组团布局图


 
<%set rs=nothing set conn=nothing%>