Word-Macro:Oracle数据库连接

时间:2016-01-08 14:39:46

标签: oracle vba ms-word

我需要一个连接到Oracle-Dateabase的Word宏,获取一些信息并将其放入我的Document中。

第一步是连接数据库。我在http://dbaforums.org/oracle/index.php?showtopic=2071

上找到了以下代码
'--------------------------------------
' create and open connection
'--------------------------------------
Dim oCn As New ADODB.Connection
oCn.Open "Driver={Microsoft ODBC for Oracle};" & _
"Server=myserver;" & _
"Uid=gh_pc;" & _
"Pwd=gh_pc"

'---------------------------------------
' open recordset
'---------------------------------------
Dim oRs As New ADODB.Recordset
Set oRs = oCn.Execute("SELECT * FROM pc_ficha_clinica")
While Not oRs.EOF
Debug.Print oRs.Fields(0).Value
oRs.MoveNext
Wend
'---------------------------------------
' cleanup
'---------------------------------------
oCn.Close
Set oRs = Nothing
Set oCn = Nothing

这不起作用,因为它缺少对ADOB.Connection的引用。出现以下错误(对我来说是德语,我在这里翻译它)。

The User defined Type is not declared

我需要知道如何引用此OR或如何连接到数据库。如果无法使用Word Makco连接到Oracle数据库,我也想知道。

编辑 Dirk Vollmar和Wernfried Domscheit发现的解决方案:

工具 - 参考 - 添加Microsoft ActiveX Data Objects

提示无法点击“参考”选项的人:转到Run->Reset然后重试

2 个答案:

答案 0 :(得分:2)

您似乎仍需要添加对ADO库的引用。你可以通过工具 - >来做到这一点。 VBA编辑器的参考... 菜单。

他们需要在您要使用的版本(以及任何相关程序集)中选择 Microsoft ActiveX数据对象库。

答案 1 :(得分:1)

您必须引用ADODB库。

转到菜单工具 - >参考文献 - >选择“Microsoft ActiveX Data Objects 2.7 Library”(或您喜欢使用或拥有的任何版本)