asp 中 XMLHttpRequest提交时中文乱码

<!--#include file="conn.asp"-->
<%
Response.CharSet = "gb2312" //加这句话了没有服务器端 ,加上这个就行
area=""
'--------------得到地区参数
objstr=request("objstr")
'--------------根据参数读取相应的下级地区
set rs=server.createobject("adodb.recordset")
rs.open"select * from area where fmc='"&objstr&"' order by id",conn,3,3
'--------------循环得到数组并返回客户端
for i=1 to rs.recordcount
if i=1 then
area=rs("mc")
else
area=area&"|"&rs("mc")
end if
rs.movenext
next
'--------------返回数据
response.write area
%>