例一:VFP数据表如何插入图片? 希望图片是内嵌在库文件中的,而非外链单独的图片文件夹。 1、在数据库“表”(如 ZPK.dbf)中增加类型为“备注型(二进制)的字段名,如“PIC” 2、新建立一个“表单”,在表单中创建一个“命令按钮(COMMAND)” 3、在“命令按钮(COMMAND)性属的“Click”事件中加入以下语句 JPGFile = GETFILE('JPG,BMP', '照片为 JPG格式', '保存', 1,'选择JPG格式照片') IF LEN(JPGFile) > 0 replace pic with filetostr(JPGFile) in ZPK.dbf ENDIF 这样,就可以将所选择的照片装入数据库“表”(如 ZPK.dbf)中了,以后需要直接从“表”(如 ZPK.dbf)中调用就是了。提问者评价 谢谢! 例二:vfp中照片批量导入问题 我在数据库中建了一个名为 135z143.dbf的表,其中“xh”字段下有如:“001,002,003......”的数据“bj”字段下有如:“08135,08136.....”的数据 “pic”字段由于存放照片(通用型)照片以bj+xh的方式命名(bmp格式)如:“08135001,08135002,08136065....”,存放路径为D:\学生证\08秋\bmp 因为照片很多,分别导入很费时,编写了如下程序: use 135z143.dbf &&打开135z143.dbf数据表 scan XH = trim(135z143.xh) &&将135z143表中字段名为xh的值赋给XH BJ = trim(135z143.bj) &&将135z143表中字段名为bj的值赋给XH APPEND GENERAL pic FROM 'D:\学生证\08秋\bmp\'+BJ+XH+'.bmp' endscan 程序运行到“XH = trim(135z143 |
|