无内存报错编码转换，支持任意互转UTF8-ANSI

对象.创建 (“adodb.stream”, ) ' 调用方法
对象.写属性 (“Type”, 1) ' Type 指定或返回的数据类型，可选参数为：字节集 =1 文本型 =2
对象.写属性 (“Mode”, 3) ' 指定打开模式，可不指定，可选参数如下：1只读 2只写 3读写
对象.方法 (“Open”, ) ' 打开对像
变体型.赋值 (data, ) ' 为对象赋值，变体型 参数2为 数组对象数组赋值，普通对象 留空
对象.方法 (“Write”, 变体型) ' Write 和 WriteText 方法将指定的数据装入对像中 前者为字节集 后者为字符串
对象.写属性 (“Position”, 0) ' 指定或返加对像内数据的当前指针
对象.写属性 (“Type”, 2)
对象.写属性 (“Charset”, Cset) ' 属性指定用于存储 Stream 的字符集
temp ＝ 对象.文本方法 (“ReadText”, ) ' Read 和 ReadText 方法将对象数据读取出来 前者为字节集 后者为字符串

API：跟CPU运行效率有关，越好的CPU坚持越久，我的I5基本是在 200+ - 600+时 程序崩溃

对象版：CPU资源占用低，速度快，程序未崩溃

借鉴了之前一些前辈给出的 对象UTF8转ANSI，经过我的提炼，做出了 任意文本编码格式转换字节集编码格式（当然字节集编码格式也可以写ANSI,GB2312等，不过主要还是为了转出 UTF8和 UNICODE）

PS：其实最通用的是 修改一下源码中的第2个方法 传参用字节集 返回 也用字节集
或者用 adodb.stream 对象的 SaveToFile 和 LoadFromFile 方法保存和恢复文件中的数据。 即可做到方法的绝对通用 任意格式间的互相转换。会写的朋友可以继续完善