0 0 0
分享排行榜
修正错误贡献榜
已审核词条 未审核词条
子程序名返回值类型公开备 注
编码_编码转换对象字节集 默认“UTF-8”到“GBK”解码
参数名类 型参考可空数组备 注
待转换数据字节集
转换前编码文本型utf-8;unicode;GBK 等
转换后编码文本型utf-8;unicode;GBK 等
转换后数据开始位置整数型位置从0开始。unicode编码标识占2个字节,utf-8编码标识占3个字节
变量名类 型静态数组备 注
ret字节集 
如果真 (转换前编码 = “”)
转换前编码 = “UTF-8”

如果真 (转换后编码 = “”)
转换后编码 = “GBK”
线程_初始化COM库 ()
如果 (是否为空 (转换后数据开始位置))
ret = 内部_bmzh (待转换数据, 转换前编码, 转换后编码)
ret = 内部_bmzh (待转换数据, 转换前编码, 转换后编码, 转换后数据开始位置)
线程_取消COM库 ()
返回 (ret)
子程序名返回值类型公开备 注
内部_bmzh字节集 内部调用
参数名类 型参考可空数组备 注
待转换数据字节集
转换前编码文本型
转换后编码文本型
转换后数据开始位置整数型
变量名类 型静态数组备 注
对象对象 
文本文本型 
字节集字节集 
变体型变体型 
CoInitialize (0)
对象.创建 (“Adodb.Stream”, )
对象.写属性 (“Type”, 1) ' 流类型为字节集
对象.方法 (“Open”, )
变体型.置类型 (7)
变体型.创建数组 (1, 取字节集长度 (待转换数据))
变体型.赋值 (待转换数据, )
对象.方法 (“Write”, 变体型)
对象.写属性 (“Position”, 0)
对象.写属性 (“Type”, 2) ' 流类型为文本
对象.写属性 (“Charset”, 转换前编码)
文本 = 对象.文本方法 (“ReadText”, )
对象.方法 (“Close”, )
对象.方法 (“Open”, )
对象.写属性 (“Charset”, 转换后编码)
对象.方法 (“WriteText”, 文本)
对象.写属性 (“Position”, 0)
对象.写属性 (“Type”, 1) ' 流类型为字节集
如果真 (是否为空 (转换后数据开始位置))
对象.写属性 (“Position”, 转换后数据开始位置)
字节集 = 对象.通用方法 (“Read”, ).取字节集 ()
对象.清除 ()
CoUninitialize ()
返回 (字节集)

词条作者信息 使用例程
评论列表   发现违规评论、广告、刷屏,请点击举报(有奖)
无评论 评论
  • Copyright © ijingyi.com All Rights Reserved.