ASP中利用ADODB.Stream对象将字节流转换为字符流

时间： 2021-07-31 作者：daque

'--------------------------------------------------------------------' 二进制转字符串'' 进口参数:字俭朴' 因变量归来:字符串' code by:madpolice 2002-12-20' 运用 adodb.stream 东西,速率比从来的字符替代法快了n倍,n≈30!!)'--------------------------------------------------------------------'底下的恒量是因变量用到的,由于我在因变量表面仍旧设置过了,所以不在这边反复设置'---- streamtypeenum values ----'const adtypebinary = 1'const adtypetext = 2function bytes2bstr(vin) dim bytesstream,stringreturn set bytesstream = server.createobject("adodb.stream") '创造一个流东西 with bytesstream .type = adtypetext '树立流东西的典型为字符流 .open '翻开流东西 .writetext vin '把vin写入流东西中 .position = 0 '树立流东西的开始场所是0,也即是发端 '这个操纵必需做,干什么我也不领会,波折了n次得出的论断 '即使不举行这个操纵,底下树立charset属性就堕落 .charset = "gb2312" '树立流东西的源代码办法为gb2312 .position = 2 '树立流东西的开始场所是2(过滤掉发端的一个遏制字符 '这个遏制字符是writetext本领按默许属性charset="unicode" '读入数据的功夫机动加到数据发端的,字符的值是ff3f '这个遏制字符占2字节,以是position树立为2 '表白略过2个字节,底下的readtext本领从position发端读数据 stringreturn = .readtext '把流东西的实质生存在stringreturn变量中 .close '封闭流东西 end with set bytesstream = nothing '废弃流东西 bytes2bstr = stringreturnend function'--------------------------------------------------------------------

ASP中利用ADODB.Stream对象将字节流转换为字符流

相关推荐

推荐下载

热门阅览

最新排行