我们一般会在两个地方用到外部数据抓取，一个是在asp中，一个是在hta中。如果外部数据是gb2312编码的，就涉及到转码的问题，但是传统的用vbs函数进行处理的方法，运算量比较大，有些特殊字符还会出错。

　　如果用adodb.stream控件来进行转码，就简单多了，不需要借助vbs的二进制处理函数了，同时速度快了很多。

<script>
function loadData(sUrl){
    var xh
    xh=new ActiveXObject("Microsoft.XMLHTTP")
    xh.open("GET",sUrl,false)
    xh.send(null)
    return gb2utf8(xh.responseBody)
}
function gb2utf8(sData){
    var oStream
    oStream=new ActiveXObject("adodb"+".stream") 
    oStream.Type=1 
    oStream.Mode=3 
    oStream.Open 
    oStream.Write(sData)
    oStream.Position=0 
    oStream.Type=2 
    oStream.Charset="GB2312"
    return oStream.ReadText()
}
</script>