PB updateblob 数据长度截断现象

[sonata_001]

存入数据代码：
handle = fileopen(s_file, streammode!)
len = filereadex(handle, im)

len1 = len(im) //此处我调试看了，长度正确是 6KB

if len > 0 then

sqlca.autocommit = true
//insert into t_mreport (日期, 报告编号, 报告名称, 报告存档) values ('2008-1-1', 0, '测试1', 'sadadasd') using sqlca;
//insert into t_mreport (日期, 报告编号, 报告名称, 报告存档) values ('2008-1-1', 0, '测试1', convert(varbinary,:im)) using sqlca;

updateblob t_mreport set 报告存档 = :im where 序号 = 1;


if sqlca.sqlcode = 0 then
commit;
messagebox("成功！","更新数据库成功！")
else
rollback;
messagebox("失败！","更新数据库失败！" + sqlca.sqlerrtext )
end if

sqlca.autocommit = false
end if


下面是读出代码：

blob im
string s_file, s_file_dest
long handle
long len, len1

s_file = "E:\workspace\PB10.0\fileTest_d_connect_002.doc"
s_file_dest = "E:\workspace\PB10.0\fileTestdump_d.doc"


selectblob 报告存档 into :im from t_mreport where 序号 = 1;

len1 = len(im) //此处调试查看是 6KB 的一半

if sqlca.sqlcode = 0 and sqlca.sqlnrows > 0 then

handle = fileopen(s_file_dest, streammode!, write!, shared!, replace!)

if handle > 0 then
len = filewriteex(handle, im)
fileclose(handle)

end if

end if


所以我怀疑是存入是截断的，注意数据库:sql2005中,字段是 varbinary(max).

请大家指点！

[AFIC]

打开C:\Program Files\Sybase\Shared\PowerBuilder
找到pbodbxx.ini如果你是9就是pbodb90.ini，如果你是11就是pbodb110.ini，类推
搜索你用的数据接口，比如Microsoft SQL Server
下边必然有一个PBMaxBlobSize='32767'
改成你需要的大小，比如1024000

[AFIC]

仔细一想，也可能不是我说的原因，最好说出你的pb版本和用的接口
sqlca.dbms那个

[编程夜猫]

恩，有可能是接口的问题

[sonata_001]

修正下：上面的6KB 写错了，是62KB(62796bytes)
同样，上面的6KB的一半写错了，是32KB（32767bytes）.

[sonata_001]

回复SKY_4K_PPM ：
我的字段是 字段是 varbinary(max)来存储blob的。

[AFIC]

32767bytes的话，肯定是我说的问题

[sonata_001]

结果验证，如AFIC 所提示的，原因正在此。好了，又长了见识了！非常感谢大家了！给afic接分了.

[AFIC]

不说估计你也知道，
等你给用户发布的时候，
一定也要代上那个文件阿。

[SKY_4K_PPM]

不知道你在SQL中定义什么类型的字段，来存BOLB的,长度不够，可能就强制截断了。