getsearchcity.asp

来自「嘉缘人才6.0精简 ,很好用的人才系统」· ASP 代码 · 共 29 行

<!--#include file="../conn/conn.asp" -->
<!--#include file="../Inc/Commoncode.asp" -->
<%cityid=request.QueryString("cityid")
subid=mid(cityid,6,4)
if Chkrequest(subid)=True then
set rs=server.createobject("adodb.recordset")
sql="select province_city from job_provinceandcity where id="&subid&" order by date desc" 
rs.open sql,conn,1,1
 capital=rs("province_city")&"-不限"
rs.close
aa="<option value="&cityid&">"&capital&"</option>"
sql="select * from job_provinceandcity where fid="&subid&" order by date desc" 
rs.open sql,conn,1,1
if not rs.eof then
 do while not rs.eof
 aa=aa&"<option value="&cityid&"*"&rs("id")&">"&rs("province_city")&"</option>"
 rs.movenext
loop
end if
rs.close
set rs=nothing
end if
conn.close
set conn=nothing
%>
<script>
parent.ccity.innerHTML="";
parent.load200.innerHTML="<select name=city size=5 multiple style='FONT-SIZE: 12px; WIDTH:230px; FONT-FAMILY: 宋体'><%=aa%></select>";
</script>