PB Blob转换成String的问题？

jxncbsr 2013-06-01 01:20:40

PB Blob转换成String的问题？

li_filenum = FileOpen("c:\ABC\561.day", streammode!, Read!, lockread!)
FOR i = 1 TO l
b1 = BlobMid(tot_b,i,1)
k = Asc(String(b1,EncodingANSI!))
ls = ls + mid( ls_hex, ( k / 16 ) + 1, 1 ) + mid( ls_hex, mod( k, 16 ) + 1, 1 )
NEXT
用这个k = Asc(String(b1,EncodingANSI!))，
则读取的(Blob)E3 -> 3F(String)
(Blob)E1 -> 3F(String)
(Blob)EB -> 3F(String)
只要大于99（HEX）的值读取转换后都变成3F，请问是什么原因？该如何解决？谢谢！使用环境：PB12.5+win8

...全文

1169 4 打赏收藏转发到动态举报

写回复

4 条回复

切换为时间正序

请发表友善的回复…

发表回复

resuc 2013-11-02

打赏
举报

回复

请问楼主如何解决的?

I_am_Z 2013-06-03

打赏
举报

回复

哈哈，凑凑热闹。

A啦Dbit 2013-06-02

打赏
举报

回复

接一下,就可以结了

jxncbsr 2013-06-01

打赏
举报

回复

已找到了方法，如何结贴呢？

PB可以把读取的图片、影音、文本等大文件（BLOB）转换成16进制的字符串，（可以放置到XML或文本里做传输），并且可以把16进制的字符串转换回BLOB文件。

1.真实代码，节省你大量时间 2.pb11.2版本一份劳动一份收获

PB9.0常用函数中文帮助文档 Dec() 功能将字符串或Blob值转换成Decimal类型的值。语法Dec ( stringorblob ) 参数stringorblob：string类型变量或Blob类型变量。Blob类型变量时，把该变量第一个值转换为Decimal类型的值，其余部分被忽略。stringorblob参数也可以是包含上述类型数据的Any类型变量返回值Decimal。函数执行成功时返回相应的Decimal类型值。如果stringorblob参数中的值不是有效的PowerScript数字或数据类型不兼容，那么Dec()函数返回0。如果stringorblob参数的值为NULL，则Dec()函数返回NULL。

pb函数库的Blob函数使用方法，介绍各自函数功能比较详尽

将字符串转化为数组，资源为pb9导出来的文本文件，可以直接导入pb9，也可以打开查看

743

社区成员

8,037

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章