关于 Microsoft.XMLHTTP 乱码，您还可以参考千一网络的专业＋原创内容：Ajax 专题。

环境：JavaScript 作为脚本语言的 ASP，也可扩展到客户端的 JavaScript。

以下函数为自定义组件 bluec.bluecData2 的代码:
function execSql(pSql, params)
{
    var result = -3;
    formDoc = "<sqls>\n" +
              "<sql>" + pSql + "</sql>\n" +
              "</sqls>";
    var oXmlHttp = new ActiveXObject("Microsoft.XMLHTTP");
    oXmlHttp.Open("POST", "../util/execsql.asp", false);
    oXmlHttp.setRequestHeader("Content-Type", "text/xml");
    oXmlHttp.setRequestHeader("charset", "utf-8");

    oXmlHttp.Send(formDoc);
    if (oXmlHttp.status == 200)
    {
        var rText = oXmlHttp.responseText;
        if (rText.substring(0,1) == "0")
        {
            return true;
        }
        else
        {
            return false;
        }
    }

    return false;
}

调用 bluec.bluecData2 组件的页面内容:
<%@LANGUAGE="JAVASCRIPT" CODEPAGE="936"%>
<%
var errMsg = "0";
obj = new ActiveXObject("bluec.bluecData2");
errMsg = obj.execSql(Request);
Response.Charset = "utf-8";
Response.ContentType = "text/xml";
Response.Write(errMsg);
obj = null;
%>

当errMsg包含中文时，oXmlHttp.responseText 返回的值是乱码，怪了，在 jsp 中同样的实现方法居然没有问题。在网上搜索，发现解决最重要的解决办法是写一个函数来转换 oXmlHttp.responseText 的编码格式。该 VBScript 函数是 byte2sBSTR，但是我的代码全部是 JavaScript，据说 JavaScript 也可以直接调用 VBScript 函数，心里好不舒服，这些小问题好花时间。继续搜索吧，看有没有纯 JavaScript 的解决办法，在一个论坛上发现一个高手对此问题的回复:

unescape

真是简单之至，点到为止。unescape 有什么用，通过实验：

var rText = oXmlHttp.responseText; 改成 var rText = unescape(oXmlHttp.responseText);

且

Response.Write(errMsg); 改成 Response.Write(escape(errMsg));

居然OK了，太棒了。