PB读取照片的问题

[ZHANGYANSHUANG]

我是新手,建了一个ACCESS数据库,表名zPB,字段名BH和zP,请教各位高手.怎样保存和读取照片.急!!!!!!!!!!!!!!

[liubocy]

//存图片
integer li_fnum, li_bytes

blob lb_Pic
//这个是图片小于32765长度，大于的看fileread函数帮助的示例
li_fnum = FileOpen("C:\HR\EMP_PIC1.BMP", StreamMode!)//jpg,bmp等都可
li_bytes = FileRead(li_fnum, lb_Pic)
fileclose(li_fnum)

updateblob table set pic = :lb_Pic where id = 1;

//取图片，生成到C:\EMPLOYEE\EMP_PICS.BMP
blob lb_pic
int li_FileNum

selectblob pic into :lb_pic from table where id = 1;
li_FileNum = FileOpen( "C:\EMPLOYEE\EMP_PICS.BMP", StreamMode!, Write!, Shared!, Replace!)
FileWrite(li_FileNum, lb_pic)
fileclose(li_filenum)

[tavey1985]

简单的说：
平时用的字段用select;update
对于存取照片的我们用
selectblob,updateblob对字段进行操作
至于存insert就可以了
如果还不知道：
打开pb ->然后点F1 ->弹出帮助输入selectblob或updateblob，查看用法

回答完毕

[softvery]

写用 updateblob

int fh

blob Emp_id_pic

fh = FileOpen("c:\emp_100.bmp", StreamMode!)

IF fh <> -1 THEN

FileRead(fh, emp_id_pic)

FileClose(fh)

UPDATEBLOB Employee SET emp_pic = :Emp_id_pic

WHERE Emp_num = 100

USING Emp_tran ;

END IF

IF Emptran.SQLNRows > 0 THEN

COMMIT USING Emp_tran ;

END IF

[softvery]

读取用selectBlob

Blob Emp_id_pic

SELECTBLOB Emp_pic

INTO :Emp_id_pic

FROM Employee

WHERE Employee.Emp_Num = 100

USING Emp_tran ;

p_1.SetPicture(Emp_id_pic)

[AFIC]

网上找例子去

[javaxi]

数据库中,zP用ole属性.
pb代码中,保存照片只要把文件流FileRead出来保存到blob变量中,然后执行updateblob的sql语句用where BH=** 就可以保存了.
详细的代码自行编写吧,或者baidu一下,一堆