VB6 Oracle正在将Clob检索到阵列中

我正在尝试将数据类型为clob的oracle字段检索到VB数组中，而无需重新格式化检索SQL字符串（只需从我的表中选择*）。我正在使用ADO记录集

---

当我关闭连接或对记录集执行任何其他操作时，clob值将丢失。如何实现这一点。

在我的一个项目中，我尝试使用ADO操作BLOB和CLOB，但没有成功，直到我切换到。您需要在计算机上安装和配置Oracle客户端，项目中的参考添加了“Oracle InProc Server 4.0类型库”

下面是我用于blob的示例代码：

Dim OraSession  As OracleInProcServer.OraSessionClass
Dim OraDatabase As OracleInProcServer.OraDatabase
Dim OraDynaset  As OracleInProcServer.OraDynaset
Dim srcImg As OraBlob

Set OraSession = CreateObject("OracleInProcServer.XOraSession")
Set OraDatabase = OraSession.DbOpenDatabase("myDBName", "login/password", 0&)

Set OraDynaset = OraDatabase.DbCreateDynaset("SELECT src_id, src_image from Sources where src_file_name like '%.png'", 0&)
With OraDynaset
    If .RecordCount > 0 Then
        .MoveFirst
        While (Not .EOF Or .BOF)
            Set srcImg = .Fields("src_image").Value
            srcImg.CopyToFile ("C:\sources\" & srcID & ".png")
            .MoveNext
        Wend

    End If
End With

Set OraDynaset = Nothing
Set OraDatabase = Nothing
Set OraSession = Nothing