<select name="city" style="font-size:9px" onChange="form.submit()">
<%
set rscitycode = con.execute("select CityCode from dbo_tp_city where ProvinceName = '"& state &"' order by CityCode asc")
do until rscitycode.eof
set rscityname = con.execute("select dbo_tp_cityname.CityName,dbo_tp_city.CityCode from dbo_tp_cityname,dbo_tp_city where dbo_tp_city.CityCode = '"& rscitycode("CityCode") &"' and dbo_tp_cityname.CityCode = '"& rscitycode("CityCode") &"' order by dbo_tp_cityname.CityName")
%>
<option value="<%=rscityname("CityName")%>"><%=rscityname("CityName")%></option>
<% 
rscitycode.movenext
loop
%>
</select>