连接指定服务器上Oracle数据库的语句

单位的财务软件是用友NC，数据库是oracle。想与数据库建立连接，把序时账表的数据完整地导出到EXCEL。
请问ADO对象和SQL语句能做到吗？如果能，代码该怎么写呢？
请高手赐招呵，非常感谢！

搜一下，很多。

ORACLE数据库查询用类模块。
有使用ORACLE数据库的朋友可以用用看，很方便的。

Option Explicit
Public OraDynaset As Object 'RecordSet
Private OraSession As Object 'Declare variables as OLE Objects
Private OraDatabase As Object

Public Sub RunSQL (ByVal strSQL As String)
Application.StatusBar = "Searching DataBase ..."
Set OraDynaset = OraDatabase.DbCreateDynaset (strSQL, 0&)
DoEvents
Application.StatusBar = ""
End Sub

Public Sub Connect ()
Set OraSession = CreateObject ("OracleInProcServer.XOraSession")
Set OraDatabase = OraSession.DbOpenDatabase("服务器名", "接入字串", 0&)
End Sub

Public Sub DisConnect ()
Set OraDatabase = Nothing
Set OraSession = Nothing
End Sub