作者:陈宥治政和瑋男 | 来源:互联网 | 2023-05-17 14:24
有一段代码从文件中读取二进制数组
Const adTypeBinary = 1
Dim stream
Dim Wb(0)
Set stream = CreateObject("ADODB.Stream")
stream.Type = adTypeBinary
stream.Mode = 3
stream.Open
stream.LoadFromFile FileName
stream.Position = 108
buf = stream.read(14)
xztsm = buf(0)
buf(0)中保存有一个数字,在用buf(0)访问时老是出现“数据类型不匹配:buf”的错误,请问vbs中如何访问字节数组中的内容呢?用buf(i)访问为什么会出错?
3 个解决方案
如果是要把二进制数据用字符串方式读出来的话,还是用ADO.Stream
先用二进制写入数据,然后
Type设置为 adTypeText
Charset设置为要的字符集 utf-8或gb2312
再Open后读取