环境: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了,太棒了。
|