<%
ProvinceID=rs2("ProvinceID")
Sql="select * from City_1 where ProvinceID ='"&ProvinceID&"'"
set rs=server.CreateObject("ADODB.RecordSet")
rs.open SQL,conn,1,1
do while not rs.eof
%>
<%
id=rs("SortNameID")
sql1="select * from City_2 where SortNameID='"&id&"'"
set rs1=server.CreateObject("ADODB.RecordSet")
rs1.open sql1,conn,1,1
do while not rs1.eof
%>