*-- vfp8.0、9.0 *-- 保存 1、将 图片 文件 用 filetostr ()转成字符a。 2、再用 strconv (字符a,13)将字符a转成base64编码数据的字符b。 3、将字符b 保存 到sql server的text 类型 字段 或者 access的 备注 字段 。 *-- 还原 或 显示 1、用 strconv (字符b,
*-- vfp8.0、9.0
*--保存
1、将图片文件用 filetostr()转成字符a。
2、再用 strconv(字符a,13)将字符a转成base64编码数据的字符b。
3、将字符b保存到sql server的text类型字段或者access的备注字段。*--还原或显示
1、用 strconv(字符b,14)将base64编码数据还原成未编码的数据字符a。
2、用 strtofile()转成图片文件或把字符a覆给image控件的pictureval属性来显示
*--图片例子
* 保存
lctextstring=strconv(filetostr(路径\图片名a),13)&& base64编码数据，可以将此数据(lctextstring)保存
* 还原
=strtofile(strconv(lctextstring或表字段,14),路径\图片名b)&& 将字符还原base64编码前数据，还原成文件
thisform.image1.picture=路径\图片名b&& 将还原后的图片覆给image控件的的picture属性
* 或
thisform.image1.pictureval=strconv(lctextstring,14)&& 将字符还原base64编码前数据后直接覆给image控件的pictureval属性(vfp9.0)
*--注：
以上方法除了可以对图片文件操作外，对其他文件如word，文本，exe，音频，视频等文件均可，但文件不要过大，否则速度慢。
*------------------
此方法也适用于dbf表的memo字段(推荐用二进制备注字段，普通备注字段，在代码页有变化的时候会自动转变的，会破坏字段内容，二进制备注字段就不会。
如果直接用dbf二进制备注字段保存任何文件内容，那么可以直接用 filetostr/strtofile函数，不需要转成base64（sql或access需要转成base64），因为vfp没unicode功能，所有二进制文件功能都可用字符串函数来处理。)。
如果是dbf表的memo字段，就直接用下面备注字段专用的命令，而且还可以保存和还原大文件（注：不管是什么数据库，不建议将大量大文件保存至表中），用filetostr/strtofile函数对文件大小是有限制的。
* 保存：
append memo memo字段名from文件名overwrite
* 还原：
copy memo memo字段名to生成文件名
*------------------
如果是vfp9.0建议改为使用 blob 类型字段(对应sql server的image或text类型)，它可以存储任何类型的数据。这样不需要使用 activex，直接使用 vfp 自带的image控件的pictureval属性即可显示 bmp/gif/png/jpg/tif 等格式的图片。
blob 类型字段要比上面方法好，因为前一种方法有一个缺点就是转成base64后，数据变大了，不利于网络负载。
至于blob类型字段的文件存储和还原
*存储
replace blob字段with filetostr(d:\文件全名)
*还原
=strtofile(blob字段,d:\文件全名)
使用通用字段是已过时的技术，而且存在很多的弊病，例如：放入通用字段的图像没有绝对可靠的方法重新再保存为磁盘文件。