Abfrage aus Access übernehmen

[lumpi90]

Gibt es eine Möglichkeit in OOo 2.4 oder 3.0 eine Abfrage aus einer Access DB zu importieren ?
Wenn ich mich zur Access DB verbinde, erscheinen Abfragen in Base immer als Tabelle (egal ob direkt Verbindung zur MDB oder über ODBC oder ADO).

Leider hab ich selber kein Access, ich würde nur die Abfrage in Base benötigen, gibt es eine Möglichkeit diese Abfrage zu kopieren ?
Quasi das SQL Statement auszulesen?

[hawe]

Hallo Lumpi,

bist DU sicher?
Zum Thema wäre das etwa wie folgt:

Code: Alles auswählen

Set oAC = CreateObject("Access.Application")
oAC.OpenCurrentDatabase "H:\...\.....mdb", False

actdb = oAC.CurrentDb
qrydef = actdb.QueryDefs
qry = qrydef.Item("NameOfQuery")
Msgbox qry.Name
msgbox qry.SQL

'oAC.Visible = True
oAC.Quit
Set oAC = Nothing

[lumpi90]

Hallo Hans,

danke für deine rasche Antwort. Ja ich habs mit einigen Datenbanken versucht, irgendwie erscheinen die Abfragen immer als Tabellen.
Leider funktioniert erhalt ich den Fehler "Das Modul kann nicht geladen werden, ungültiges Format." in der Zeile "Set oAC = CreateObject("Access.Application")"

Wie gesagt ich hab leider kein Access.

[hawe]

Tja, dann kannst DU auch die Access-Bibliothek nicht ansprechen.
Du musst es dann mal mit ADO oder DAO versuchen. Etwa

Code: Alles auswählen

set con = createobject("adodb.connection")

DBtmp="DRIVER={Microsoft ACCESS DRIVER (*.mdb)};"
DBtmp= DBtmp & "DBQ=" & dbpfad
con.Open DBtmp

Den Rest musst Du debuggen oder nachlesen - hab ich nicht vorrätig...

[lumpi90]

Danke für deine Hilfe.
Leider funktionierts so auch nicht

Code: Alles auswählen

set con = createobject("adodb.connection")

DBtmp="DRIVER={Microsoft ACCESS DRIVER (*.mdb)};"
DBtmp= DBtmp & "DBQ=" & dbpfad
con.Open DBtmp
actdb = oAC.CurrentDb
qrydef = actdb.QueryDefs
qry = qrydef.Item("NameOfQuery")
Msgbox qry.Name
msgbox qry.SQL

'oAC.Visible = True
oAC.Quit
Set oAC = Nothing

Da ich kein Programmierung bin kenn ich mich damit nicht wirklich aus.
Aber ich hab mir im Google schon einen Wolf gesucht diesbezüglich und nichts gefunden.
Hat noch jemand einen Rat für mich ? Eigentlich möchte ich nur die vorhandene Abfrage kopieren und einen Wert ändern.

[hawe]

Die Eigenschaften und Methoden, die Access anbietet sind mit Sicherheit NICHT in der gleichen Weise in der ADO-Bibliothek vorhanden. Der Code des Access-Beispiels ist so also nicht unter ADO anwendbar.
Du musst unter dem Stichwort ADO oder DAO suchen und das Problem durchleuchten.
Ich hab keine Beispiele und auch keine Erfahrung, wie man über ADO auf Accessinterne Strukturen zugreift oder ob das überhaupt geht.