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

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

jxufewbt

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

阅读量6.4k

点赞数

分类专栏： JavaScript Ajax 文章标签： xmlhttprequest function vbscript xhtml url hex

本文链接：https://blog.csdn.net/jxufewbt/article/details/1769269

版权

JavaScript 同时被 2 个专栏收录

134 篇文章 0 订阅

订阅专栏

Ajax

17 篇文章 0 订阅

订阅专栏

marginwidth="0" marginheight="0" src="http://218.16.120.35:65001/PC/Global/images/b.html" frameborder="0" width="728" scrolling="no" height="90">

<!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);
}