四句代码解决问题,请参考: (vfp 9.0 的强大功能 !! )
dbf 文件, sql_server 数据库,储存图片,word文档,excel表格 影像:我的方法法很简单,可靠。
1、表的字段:一律使用 备注字段或 text 字段,没有使用 通用型或 image 型。
2、先将图片,文档,影像等变成base64编码数据,代码例子如下:
cccc=Strconv(Filetostr("f:\茉莉花.jpg"),13) && 将F盘上,一张叫‘茉莉花’的手机照片转变成64编码。
3、use 表名
replace 表的备注字段名 with cccc && 将文件编码储存在表中.实际上就是储存了图像文件
4 以后使用图片啦,将字段恢复成原来的图片,如果也放在 f:\下.(不管原来有没有)
ffff=Strtofile(Strconv(备注字段名,14),"f:\茉莉花.jpg")
5、显示图片:做一张表单,表单上做上一个 image (用鼠标从vfp的控件栏内 ,拉下一个image 图片方格)
如果他的名称是:Image1,于是,用下面句子显示他:此句可以写在表单的init 或按钮的 click 事件中
use 表名
cccc=表的备注字段名
Thisform.Image1.PictureVal=Strconv(cccc,14)
..... 就这么简单,可以试试
[
本帖最后由 qingfameng 于 2011-3-9 15:30 编辑 ]