sqlserver存储图像数据的策略与方法.txt

delphi程序绘制jpeg图像源代码

SQLServer存储图像数据的策略与方法 

--------------------------------------------------------------------------------
 
http://www.pcdog.com 2004-12-19 3L工作窒 
 
上一页 1 2 




　　使用Remote Data控件建立与远程数据库的连接步骤如下：
　　1．在Visual Basic的窗体中加入一个Remote Data控件。 ，

　　2．在Remote Data控件DataSourceName属性的下拉列表中选择一个ODBC数据源。例如pubs。

　　3．在Remote Data控件的 
SQL属性中输入SQL查询语句。例如，Select * from pub_info。

　　2.3 绑定OLE和Remote Data控件实现图像数据的存储与编辑

　　OLE是允许应用程序相互之间交换和显示数据的一项技术，使用OLE，可以从支持OLE技术的任何应用程序中读取信息，也可以在任何支持OLE的程序中显示和编辑它。在Visual Basic中，可利用OLE容器控件与Remote Data控件的绑定，来实现显示、存储和编辑SQL Serve数据库中的image类型数据。

　　1.显示SQL Serve数据库image类型字段的图像数据

　　具体步骤如下：
　　(1)在加入了Remote Data控件的Visual Basic的窗体中，添加一个OLE容器控件。创建OLE容器控件时，会出现“插入对象’：对话框，此时点击“取消”按钮，不必为该容器指定对象。

　　(2)将OLE容器控件的DataSource属性设置为Remote Data控件的名字，实现控件的绑定。

　　(3)在OLE容器控件。DataField属性的下拉列表中选择要显示的字段名。例如，logo。

　　(4)运行应用程序。对于包含image数据类型的logo字段的数据将在OLE容器控件中显示一幅图像。

　　2.在SQL Sever数据库image类型字段中添加存储图像数据

　　具体步骤如下：
　　(1)将Remote Data控件的EOFAction属性设置为rdAddNew，实现数据库的数据添加功能。

　　(2)在Visual Baisic的窗体中添加一个CommandButton控件，并编写图像文件嵌入OLE容器控件的程序代码。例如：
    Private Sub Command_Click()

    OLEl.CreateEmbed“c：＼图片．bmp”

    End Sub 

　　(3)运行应用程序，点击Remote Data控件的记录指示按钮，移动到新的记录，然后点击CommandButton控件按钮，实现图像数据的添加入库操作。

　　3.编辑SQL Serve数据库image数据类型字段的图像数据

　　具体步骤如下：

　　(1)在Visual Basic的窗体中添加一个CommandButton控件，编写对OLE对象的编辑程序代码。例如：
    Private Sub Command2--_Click()

    OLEl.DoVerb VbOLEOpen

    End Sub  

　　(2)运行应用程序，点击Remote Data控件的记录指示按钮，选择需要编辑的图像，然后点击CommandButton控件按钮，在分隔的应用程序窗口打开对象，进行图像的编辑操作。

　　4、图像文件自动入库方式的实现

　　在数据库的实际应用中，经常需要将图像文件批量存储，以提高数据入库操作的自动化程度。对于图像文件批量存储，在程序代码的编写中，可充分利用OLE容器控件与RemoteData控件的诸多属性和方法，加以实现。

　　具体步骤如下：
　　(1)将OLE和RemoteData控件的Visible属性设置成False，使OLE和RemoteData控件不可视。

　　(2)建立图像文件的批处理文件。

　　(3)编写以下基本代码，实现批处理功能。
    Private Sub Command3_Click()

    Dim FileName As String

    Open "c:＼tesffile．txt"ForlnputAs#1注释：打开批处理文件。

    DoWhileNotEOF(1)注释：循环至文件尾。

    Input#l，FileName注释：读入图像文件名。

    MSRDCl.Resultset.AddNew‘结果集添加记录

    OLEl.CreateEmbedFileName‘嵌入图像文件

    MSRDCl.Resultset.Update

    Loop

    Close #1

    End Sub 

　　(4)运行应用程序。点击CommandButton控件按钮，完成图像文件的自动入库。

　　五、结束语

　　随着SQL Serve数据库管理系统功能的不断增强、性能的不断完善，将各类数据完全由数据库管理系统统一存储和管理，已成为技术发展的趋势。只有这样，SQL Serve数据库管理系统的强大功能才能得到充分发挥，数据的安全性才能得到充分的保障，使得诸如数据库复制、数据的转移等许多工作，变得非常简单容易。