分享

有关VFP数据表导入、显示、打印图片的问题_天地自然

 木子六一 2015-04-13
例一: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

    本站是提供个人知识管理的网络存储空间,所有内容均由用户发布,不代表本站观点。请注意甄别内容中的联系方式、诱导购买等信息,谨防诈骗。如发现有害或侵权内容,请点击一键举报。
    转藏 分享 献花(0

    0条评论

    发表

    请遵守用户 评论公约

    类似文章 更多