程序代码：

<SCRIPT language=JavaScript>

var onecount;
onecount=0;
subcat = new Array();
        <%
        dim count:count = 0
        do while not rs.eof 
        %>
subcat[<%=count%>] = new Array(\"<%=rs(\"city\")%>\",\"<%=rs(\"id\")%>\",\"<%=rs(\"twoid\")%>\");
        <%
        count = count + 1
        rs.movenext
        loop
        rs.close
        set rs=nothing
        %>
onecount=<%=count%>;
            
<%
set rs=conn.execute(\"select * from china_city_sp where id>0 and twoid>0 and threeid>0\")
%>

 选择城市  选择城市  选择城市 *