偶看新闻男人激烈吃奶视频:VFP将图片或其他文件保存到SQL Server的Text类型字段或者Access的备注字...
来源：百度文库 编辑：偶看新闻 时间：2024/04/30 13:23:19
VFP将图片或其他文件保存到SQL Server的Text类型字段或者Access的备注字段中，并可以还原或显示。
分类： VFP - 编程技巧 2008-04-25 16:10 4076人阅读 评论(10) 收藏 举报*--保存
1、将图片文件用 FileToStr()转成字符A。
2、再用 Strconv("字符A",13)将字符A转成base64编码数据的字符B。
3、将字符B保存到SQL Server的Text类型字段或者Access的备注字段。
*--图片例子
* 保存
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字段(推荐用二进制备注字段，普通备注字段，在代码页有变化的时候会自动转变的，会破坏字段内容，二进制备注字段就不会。)。
如果是VFP9.0建议改为使用 Blob 类型字段，它可以存储任何类型的数据。这样不需要使用 ActiveX，直接使用 vfp 自带的 Image 控件的 PictureVal 属性即可显示 bmp/gif/png/jpg/tif 等格式的图片。
Blob 类型字段要比上面方法好，因为前一种方法有一个缺点就是转成Base64后，数据变大了，不利于网络负载。
至于Blob类型字段的文件存储和还原
*存储
Replace blob字段 With Filetostr("D:/文件全名")
*还原
=Strtofile(blob字段,"d:/文件全名")
使用通用字段是已过时的技术，而且存在很多的弊病，例如：放入通用字段的图像没有绝对可靠的方法重新再保存为磁盘文件。