SQL Server对图像数据的存储机制介绍--.doc

　　SQL Server对图像数据的存储机制介绍 　　本文介绍MIS SQL Server对图像数据的存储机制和存取方法。针对VB开发工具，介绍了一种通过ADO Field 对象的GetChunk 方法和AppendChunk 方法来存取MIS SQL Server中的图像数据的方法。 　　在一个完善的医院信息MIS中，图像数据的存取是必不可少的，比如X光片、CT像片的保存。一方面，这些图像数据在远程诊疗为准确诊断病情提供了重要的依据，另一方面，也为快速查阅病人资料提供了基本条件。图像数据的存取在其它应用系统如GIS中也有广泛的应用。 　　1、SQL Server中图像数据的存储机制 　　在MIS SQL Server 中，对于小于 8000 个字节的图像数据可以用二进制型(binary、varbinary)来表示。但通常要保存的一些医学影像图片都会大于 8000个字节。SQL Server提供了一种机制，能存储每行大到 2GB的二进制对象（BLOB），这类对象可包括image、text和ntext三种数据类型。Image数据类型存储的是二进制数据，最大长度是 231-1 (2,147,483,647)个字节。 　　BLOB数据在MIS SQL Server系统中的存储方式不同于普通的数据类型，对于普通类型的数据系统直接在用户定义的字段上存储数据值，而对于BLOB类型数据，系统开辟新的存储页面来存放这些数据，表中BLOB类型数据字段存放的仅是一个16个字节的指针，该指针指向存放该条记录的BLOB数据的页面。 　　2、SQL Server中图像数据的存取 　　在MIS SQL Server中，当数据小于 8000 个字节时，可以用普通的SQL操纵语句(SELECT、INSERT、UPDATE、DELETE)来完成对字段的操纵，当数据大于8000个字节时，SQL提供了 zy_ct zy_ct zy_ct g_ct ptrval 16 0x54345　　可以看出，这三个函数的使用比较复杂，虽然可以通过生成存贮过程来调用执行，但有一个缺陷是在读取数据时，READTEXT函数读取的数据无法直接传递回前端应用程序。 　　3、VB 6.0中图像数据的存取 　　VB 6.0 的ADO Field 对象提供了GetChunk 方法和AppendChunk 方法来存取BLOB数据，这两个函数实质是通过API调用WRITETEXT 、READTEXT和UPDATETEXT这三个函数，简化了调用的方法。 　　(1)GetChunk 和AppendChunk方法介绍 　　GetChunk 方法检索其部分或全部长二进制或字符数据。GetChunk 调用返回的数据将赋给变量。如果 Size 大于剩余的数据，则 GetChunk 仅返回剩余的数据而无需用空白填充变量。如果字段为空，则 GetChunk 方法返回 Null。每个后续的 GetChunk 调用将检索从前一次 GetChunk 调用停止处开始的数据。但是，如果从一个字段检索数据然后在当前记录中设置或读取另一个字段的值，ADO 将认为已从第一个字段中检索出数据。如果在第一个字段上再次调用 GetChunk 方法，ADO 将把调用解释为新的 GetChunk 操作并从记录的起始处开始读取。Field 对象的 123下一页 这篇文章来自..，。第一个 AppendChunk 调用将数据写入字段，覆盖所有现有的数据，随后的 AppendChunk 调用则添加到现有数据。 　　由于系统资源总是有限的，如果一次读(存)取大量数据，可能会引起服务器、客户机死机或是服务器的性能大大下降，因此使用这两个函数时，要将图像数据进行分段读写。 　　(2)程序实现 　　程序一：写数据函数 Public Function AppendBlobFromFile (blobColumn As ADODB.Field, ByVal FileName) As Boolean Dim FileNumber　　 As Integer　　 #39;文件号 Dim DataLen　　　　　　 As Long　　　　　　#39;文件长度 Dim Chunks　　　　　　　 As Long　　　　　　#39;数据块数 Dim ChunkAry()　　 As Byte　　 #39;数据块数组 Dim ChunkSize　　　As Long　　　　　　#39;数据块大小 Dim Fragment　　　 As Long　　　　　　#39;零碎数据大小 Dim lngI　　　　　　　　　 As Long　#39;计数器 On Error GoTo ErrorHandle AppendBlobFromFile