如何解决XmlHttp.responseText的乱码问题

最新推荐文章于 2022-10-26 14:01:25 发布

iteye_14265

最新推荐文章于 2022-10-26 14:01:25 发布

阅读量649

点赞数

文章标签： php 开发工具 xhtml

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml"><head>
<title>如何解决XmlHttp.responseText的乱码问题</title>
<script type="text/vbscript">
Function URLEncoding(vstrIn)
strReturn = ""
For i = 1 To Len(vstrIn)
ThisChr = Mid(vStrIn,i,1)
If Abs(Asc(ThisChr)) < &HFF Then
strReturn = strReturn & ThisChr
Else
innerCode = Asc(ThisChr)
If innerCode < 0 Then
innerCode = innerCode + &H10000
End If
Hight8 = (innerCode And &HFF00)/ &HFF
Low8 = innerCode And &HFF
strReturn = strReturn & "%" & Hex(Hight8) & "%" & Hex(Low8)
End If
Next
URLEncoding = strReturn
End Function

Function bytes2BSTR(vIn)
strReturn = ""
For i = 1 To LenB(vIn)
ThisCharCode = AscB(MidB(vIn,i,1))
If ThisCharCode < &H80 Then
strReturn = strReturn & Chr(ThisCharCode)
Else
NextCharCode = AscB(MidB(vIn,i+1,1))
strReturn = strReturn & Chr(CLng(ThisCharCode) * &H100 + CInt(NextCharCode))
i = i + 1
End If
Next
bytes2BSTR = strReturn
End Function
</script>
<script type="text/javascript">
function Test()
{
var http = GetXmlHttp();
var url;
url = "http://www.baidu.com/s?tn=cjlgainmoney&ct=&lm=&z=&rn=&word=%CA%AF%BE%B8&_sv=1&_si=%CB%D1%CB%F7";
// url = "http://www.baidu.com/s?tn=cjlgainmoney&word=%CA%AF%BE%B8&_sv=1&_si=%CB%D1%CB%F7";
http.open("GET", url, true);
http.onreadystatechange = function()
{
if (http.readyState == 4 && http.status ==200)
{
var text;

//乱码处理,主要是用vbscript的bytes2BSTR
//看到主题<title>和</title>之间是【百度搜索_石靖】了。
text = bytes2BSTR(http.responseBody);

// text = http.responseText;//直接用http.responseText会显示乱码

alert(text);//看到主题<title></title>之间是乱码

// document.getElementById("HtmlDiv").innerText = text;
}
}
http.send(null);
}

function GetXmlHttp()
{
var C = null;
try
{
C = new ActiveXObject("Msxml2.XMLHTTP");
}
catch(e)
{
try
{
C = new ActiveXObject("Microsoft.XMLHTTP");
}
catch(sc)
{
C = null;
}
}