<%
function DbCombox()
dim rs,sql,msg
sql = "select DISTINCT Province from City where country='中国'"
set rs = conn.execute(sql)
while not rs.eof
msg = msg & "<option value=""" & rs("Province") & """>" & rs("Province") & "</option>"
rs.movenext
wend
rs.close
set rs = nothing
DbCombox = msg
End function
%>
<script language ="javascript" >
Citys = new Array();
<%
dim rs,sql,i
sql = "select * from City where country='中国'"
set rs = Conn.execute(sql)
i = 0
while not rs.eof
%>
Citys[<%=i%>] =new Array("<%=rs("Province")%>","<%=rs("City")%>");
<%
i = i + 1
rs.movenext
wend
rs.close
set rs = nothing
%>
function changeselect(selvalue){
var selvalue = selvalue;
var i;
document.setp.City.length = 0 ;
//document.setp.City.options[document.setp.City.length] = new Option("请选择","");
for (i = 0 ;i <Citys.length;i++){
if(Citys[i][0]==selvalue){
document.setp.City.options[document.setp.City.length] = new Option(Citys[i][1],Citys[i][1]);
}
}
}
//document.XMYC.City.options[document.XMYC.City.length] = new Option("请选择","");