Servus,
der Tip von Rudi hat mir schon weitergeholfen, aber irgendwie stehe ich auf der Leitung...
Ziel ist es, das Ergebnis der Query in einer Excel-Tabelle abzubilden.
Mein VBA-Code sieht wie folgt aus:
Dim str_conn As String
Dim conn As New ADODB.Connection
Dim command As New ADODB.command
Dim dataset As New ADODB.Recordset
str_conn = "Provider=OraOLEDB.Oracle.1; Data Source=pair01.csam.com; User ID='gagaga'; Password='HiDalgo';"
conn.ConnectionString = str_conn
' Öffnen der Verbindung
conn.Open
Set command.ActiveConnection = conn
' Die Query
With command
.CommandText = "SELECT cd_client.CLIENTREF AS [ClientRef], cd_client.IDENTIFICATION AS [Client Ident], cd_client.NAME AS [Client Name], cd_client.CLIENTTYPE AS [ClientType], cd_container.CONTAINERREF AS [ContRef], cd_container.IDENTIFICATION AS [ContIdent], cd_container.DESCRIPTION1 AS [ContName], cd_container.CONTAINERTYPE AS [ContType], cd_container.DAILYPERFORMANCESINCE AS [DailyPerfSince], cd_container.SEGMENTATIONROLEREF AS [SegmentatRole], cd_container.DOWNLOADID AS [DownloadID], cd_container.SOURCESYSTEM AS [SourceSystem], cd_container.LEGALINCEPTIONDATE AS [LegalInceptDate], cd_container.PERFORMANCEINCEPTIONDATE AS [PerfInceptDate]" & _
" FROM cd_client LEFT JOIN cd_container ON cd_client.CLIENTREF = cd_container.CLIENTREF" & _
" GROUP BY cd_client.IDENTIFICATION, cd_client.NAME, cd_client.CLIENTREF, cd_container.IDENTIFICATION, cd_container.CONTAINERREF, cd_container.DESCRIPTION1, cd_container.CONTAINERTYPE, cd_container.DAILYPERFORMANCESINCE, cd_container.SEGMENTATIONROLEREF, cd_container.DOWNLOADID, cd_client.CLIENTTYPE, cd_container.SOURCESYSTEM, cd_container.LEGALINCEPTIONDATE, cd_container.PERFORMANCEINCEPTIONDATE;"
.CommandType = adCmdText
End With
Set dataset = New ADODB.Recordset
Set dataset.ActiveConnection = conn
dataset.Open command
Und hier mault er mich an: ORA-00923: FROM keyword not found where expected.
Die gleiche Fehlermeldugn erhalte ich wenn ich bei
with command
noch ein .execute
einfüge...
Vielen Dank schon vorab für die Hilfe!
Gruss
Claus