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

ttx9n · 发表于 2007-8-1 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

kestlhoxn · 发表于 2022-9-23 21:15:35

源码源码源码源码源码源码源码源码源码源码源码源码源码

u7yxn9 · 发表于 2022-10-9 18:57:25

额风风风微风微风违法

白狐软件 · 发表于 2022-12-15 02:39:14

还有什么好东西没

醉梦娱乐网 · 发表于 2023-3-2 23:33:20

谢谢您的分享！

a75620618 · 发表于 2023-10-16 01:31:38

好人好人好人好人

wangdj110 · 发表于 2023-10-21 11:23:21

快更新啊，我擦

123456 · 发表于 2023-11-29 13:45:17

管灌灌灌灌灌灌灌灌灌灌

qwe520 · 发表于 2024-5-24 00:04:34

哦哦哦哦哦哦哦哦哦

5vulod · 发表于 2024-6-29 10:12:29

天天源码社区论坛

账号		自动登录	找回密码
密码			立即注册

[ASP编程] asp实现二进制字符串转换为Unicode字符串

相关帖子