asp实现二进制字符串转换为Unicode字符串

2018-09-06 10:52

阅读:544

  若需要utf-8格式,请自行将下面的GB2312改成utf-8。

二进制转字符串,否则会出现乱码的!
FunctionsTb(vin)
ConstadTypeText=2
DimBytesStream,StringReturn
SetBytesStream=Server.CreateObject(ADODB.Stream)
WithBytesStream
.Type=adTypeText
.Open
.WriteTextvin
.Position=0
.Charset=GB2312
.Position=2
StringReturn=.ReadText
.Close
EndWith
SetBytesStream=Nothing
sTb=StringReturn
EndFunction


评论


亲,登录后才可以留言!