如何向ORACLE数据库表中存入带图片的文件？

create table test

(

NID VARCHAR2(1) not null,

IMG BLOB,

zhengqueFlag VARCHAR2(1),

cuowuFlag VARCHAR2(1)

)

说明：

1、IMG字段只需要保存图片，将图片信息经过Base64编码，存到数据库BLOB字段中。显示的时候要经过Base64解码。

2、对于像“正确”、“错误”用标志位在区别。你可以用1表示正确、0表示错误。当然你也可以用汉字的保存这样的信息。自己来设计。

然后你到网上查一下怎么样对BLOB字段进行 *** 作。如果不行，我在增加回复。

1、明白一些概览：

1）上传的图片并没有真正的存储在oracle数据库里，orcale数据库里其实存储的是图片的路径。

2）从浏览器上传图片到后端Action，action调用相应文件存储逻辑（文件存储系统）由文件存储系统完成图片的存储，并返回文件的路径。最后将这个路径保存到oracle数据库（这个部分可以很简单也可以很复杂视实际情况而定）。

2、相关删除逻辑，通过数据库里的文件路径找到实际的存储位置执行删除。删除成功后再删除数据库里相关记录。

Public Sub Combo1_Click()

Dim adoCnn As ADODB.Connection

Dim rstOra As ADODB.Recordset

Dim intI As Integer

Set adoCnn = New ADODB.Connection

Set rstOra = New ADODB.Recordset

adoCnn.ConnectionString = "Provider=OraOLEDB.OracleUser ID=dzjcpassword=zlkjData Source=dzjc_2005" '读blob字段要用Provider=OraOLEDB.Oracle

adoCnn.CursorLocation = adUseClient

adoCnn.Open

rstOra.CursorLocation = adUseClient

rstOra.ActiveConnection = adoCnn

rstOra.Open "SELECT zp FROM dzjc.dzjc_wfzp WHERE xh = '5'"

'Set Image1.DataSource = rstOra

Set Image1.Picture = PictureFromByteStream(rstOra.Fields("zp").Value)

End Sub

---