图片存储问题,急,谢谢
integer li_file
blob lb_pic
li_file=fileopen('1.jpg',StreamMode!,read!,lockread!)
fileread(li_file,lb_pic)
sqlca.AutoCommit=True
updateblob hb_gnlk set pic=:lb_pic where lkbm='3204008888200311030001' using sqlca;
If SQLCA.SQLDBCode <> 0 Then
messagebox("提示:","图片提交错误!")
RollBack;
End If
Commit;
sqlca.AutoCommit=False
fileclose(li_file)
数据库SQL 2000,字段image,图片不大,只有5K,但是图片保存不进去,SQLCA.SQLDBCode不等于0,提交失败,请大侠指教
问题点数:100、回复次数:10Top
1 楼workhand(我可憨了...)回复于 2003-11-03 17:02:17 得分 50
http://expert.csdn.net/Expert/topic/2416/2416503.xml?temp=.5173151Top
2 楼aiq(aiq)回复于 2003-11-03 17:44:27 得分 0
我用SQLCA.SQLErrText
它提示“在关键字‘NULL’附近有语法错误”
谢谢Top
3 楼wantsong(WantSong)回复于 2003-11-03 18:18:31 得分 0
看上去没什么问题,你查查lb_pic的长度,是不是赋直为null?
Top
4 楼mittee(最后一条大白鲨[无限深情凝视花花版])回复于 2003-11-03 18:27:07 得分 0
数据库中是否
有某列的值不能为空Top
5 楼langel(小白)回复于 2003-11-04 00:03:40 得分 0
同意楼上这位的观点,我想也是Top
6 楼doublevip(大无忧_老实和尚)回复于 2003-11-04 08:05:32 得分 50
autocommit = true就不用commit;了,判断sqlnrows > 1 成功!Top
7 楼aiq(aiq)回复于 2003-11-04 08:22:55 得分 0
integer li_file
blob lb_pic
li_file=fileopen('1.jpg',StreamMode!,read!,lockread!)
fileread(li_file,lb_pic)
sqlca.AutoCommit=True
updateblob aaa set pic=:lb_pic where code='3204008888200311030001' using sqlca;
If SQLCA.sqlnrows>1 Then messagebox("提示","图片提交成功!")
sqlca.AutoCommit=False
fileclose(li_file)
图片肯定有内容,但就是没保存成功,我表就两个字段code,pic,做实验用得Top
8 楼Awang_126(王小虎)回复于 2003-11-04 08:28:43 得分 0
PIC字段一允许为空Top
9 楼thelazyman(卧虎藏龙)回复于 2003-11-04 08:36:32 得分 0
注意字段pic为image类型,允许为null。Top
10 楼aiq(aiq)回复于 2003-11-04 08:46:26 得分 0
该问题我已经解决,谢谢各位帮助,但各位一个都没说对,也不是我操作问题Top




