Question

图片原来使用二进制流存在access数据库中，如何一次性转存到磁盘上？

以前的时候图片都是直接存放在数据库“OLE 对象”的字段内
使用以下代码显示在网页上：
<%
Pic_id=request("pic_id")

set rs=server.createobject("ADODB.recordset")
sql="select * from caipu where id=" & pic_id
rs.open sql,conn,1,1
Response.ContentType = "image/jpeg"
Response.BinaryWrite rs("big")
%>
现在我想转存到磁盘上，如果使用在图片上击右键另存为的方法太慢了，因为图片确实太多了，有没有什么代码可以批量的一次操作完成？

Answer 1

有点复杂，参考别人的吧

方法一：

把照片放进数据库，照片的格式最好是bmp，这样就可以在窗体上显示出来，不过这样数据库的体积会暴增。
详细的使用方法请参考Access帮助中的 PictureData 属性（本文末尾有相关帮助）。
而且，你可以直接用 commdlg API 函数来给图像框赋值，然后直接读取某个图像框的 PICTUREDATA 并存储到某个 IMAGE 字段中。这样做的优点是显示、读取方便，缺点是如果图片精度高，占用的硬盘空间会爆大。
详细示例请参考：
http://access911.net/down/eg/OLEfieldAndPictureData.rar

方法二：

设一个OLE字段，然后插入对象就行了（对着字段单击右键）。但是要注意的是，用上述方法加入数据库的图片只能以手动方式保存，需要用程序读取的时候会碰到存储在ole字段中二进制数据与源文件不符的情况。主要是因为ole引擎在图片的前面加了一段信息给他自己用。
请参考：
http://access911.net/index.asp?board=4&mode=3&recordid=75FAB21E12DC

方法三：

将图片文件以二进制方式存储在数据库中，使用时调用。详细情况请参考：

使用 ADO 的 STREAM 对象的 LoadFromFile 方法以及 SaveToFile 方法实现：
http://access911.net/index.asp?board=4&mode=3&recordid=74FAB51E13DC

使用 ADO 的 RECORDSET.FIELD 对象的 GetChunk 以及 AppendChunk 方法实现：
http://access911.net/index.asp?board=4&mode=3&recordid=75FAB01E

ASP 中使用的方法：
http://access911.net/index.asp?board=4&mode=3&recordid=79FAB31E

下列例程就是采用这种方法，在显示的时候把长二进制数据保存为临时文件用于显示
http://access911.net/down/photo.rar

方法四：

不把照片放入数据库，只把照片的路径保存到数据库中，动态加载，这样可以支持很多种图片格式。作法是在窗体上放一个图像控件，然后根据员工编号或别的有关联的字段去找出路径，用以下语句来加载图像：
图像1.Picture =路径名
路径名必须包括图象文件名。
详细情况你可以参考 access xp 的示例 northwind.mdb 中的雇员窗体
你也可以参考：http://access911.net/down/eg/LinkPicture.rar