<%
str="北京*上海*天津*重庆*长白山"
citys_array=split(str,"*")
response.write(ubound(citys_array))
%>
 
 在下拉列表中调用
<select name="citys" id="citys">
       <%for i=0 to ubound(citys_array)%>
  <option value="<%=citys_array(i)%>"><%=citys_array(i)%></option>
  <%next%>
      </select>