当前位置: 首页 > 图文教程 > XML家族 > XML > Xml Http抓取数据时乱码问题解决
内码问题.用这段代码的吧,我已经改得很精简了.
使用XMLHTTP抓取地址并进次内容处理
使用Adodb.Stream处理二进制数据
| 以下为引用的内容: Function BytesToBstr(strBody,CodeBase) dim objStream set objStream = Server.CreateObject("Adodb.Stream") objStream.Type = 1 objStream.Mode =3 objStream.Open objStream.Write strBody objStream.Position = 0 objStream.Type = 2 objStream.Charset = CodeBase BytesToBstr = objStream.ReadText objStream.Close set objStream = nothing End Function |
评论 (0) All