问题:
现在旧库中表A有一个字段是存放图片的,但是字段类型是二进制的。在进行数据迁移的时候,在新库表A里面是放图片文件的名称以及存放路径。所以在迁移的时候需要将二进制图片数据转换成文件。
由于数据迁移是在存储过程中做的,那么在存储过程中如何实现这个功能呢?
----------------------------------------------------------------------------------------------
方法一VB code:
Public filePath As String
Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset
Dim mst As ADODB.Stream
Private Sub DataGrid1_DblClick()
If MsgBox("是否接收【" & DataGrid1.Columns(3).Text & "】传送来的『" & DataGrid1.Columns(1).Text & "』吗?", vbQuestion + vbYesNo) = vbYes Then
CommonDialog1.fileName = DataGrid1.Columns(8).Text
CommonDialog1.ShowSave
filePath = CommonDialog1.fileName
Me.MousePointer = 11