asp乱码问题如何解决
在做实施过程中出现，如下情况：A系统保存了B系统（asp系统）的登录账号及密码信息，通过A系统实现单点登录B系统，但出现的为问题是：当账号信息为英文及数字时，无问题可正常登录；但当用户账号为中文时，无法登录，经测试中文变成了乱码。查阅相关资料说的在B系统（asp系统）进行编码转换，找了个转码函数如下：可实现奇数汉字的登录，偶数还是不行。望高手能帮忙解决一下不胜感激。<%Function utf2gb(Body)
Dim Objstream
Set Objstream = Server.CreateObject("adodb.stream")
objstream.Charset = "gb2312"
objstream.Type = 2
objstream.Mode =3
objstream.Open
objstream.WriteText body
objstream.Position = 0
objstream.Charset = "utf-8"
objstream.Type = 2
utf2gb = objstream.ReadText
objstream.Close
set objstream = nothing
End Function
%>
