asp实现二进制字符串转换为Unicode字符串
更新时间:2007年08月01日 19:52:05 作者:
若需要utf-8格式,请自行将下面的GB2312改成utf-8。
' 二进制转字符串,否则会出现乱码的!
Function sTb(vin)
Const adTypeText = 2
Dim BytesStream,StringReturn
Set BytesStream = Server.CreateObject("ADODB.Stream")
With BytesStream
.Type = adTypeText
.Open
.WriteText vin
.Position = 0
.Charset = "GB2312"
.Position = 2
StringReturn = .ReadText
.Close
End With
Set BytesStream = Nothing
sTb = StringReturn
End Function
' 二进制转字符串,否则会出现乱码的!
Function sTb(vin)
Const adTypeText = 2
Dim BytesStream,StringReturn
Set BytesStream = Server.CreateObject("ADODB.Stream")
With BytesStream
.Type = adTypeText
.Open
.WriteText vin
.Position = 0
.Charset = "GB2312"
.Position = 2
StringReturn = .ReadText
.Close
End With
Set BytesStream = Nothing
sTb = StringReturn
End Function
您可能感兴趣的文章:
相关文章
asp下request.querystring("id")与request("id&quo
一下问题一天遇到2次,复制过来以供下次参考,一般来说还使用万能的request("id")比较好2008-01-01
在asp中使用js的encodeURIComponent方法
encodeURIComponent 方法返回一个已编码的 URI。如果您将编码结果传递给 decodeURIComponent,那么将返回初始的字符串2012-03-03


最新评论