Wert aus anderer Access DB abfragen

10/05/2010 - 18:43 von Michael Grober | Report spam
Hallo

Ich möchte Tabellen in eine zweite (gleiche) Access Datenbank exportieren um
untereinander Daten auszutauschen.
Das klappt auch alles wunderbar.

Jetzt will ich aber vor den Datenexport die Versionsnummer der Zieldatenbank
prüfen (Diese steht im Feld "Version" der Tabelle "ProgrammStand").

Die Versionsnummer meiner eigenen Datenbank kann ich ja mit Dlookup
strEigenVer = Dlookup("Version", "ProgrammSTand") ermitteln und sie danach
mit der Versionsnummer der zweiten Datenbank vergleichen.

Aber wie kann ich das Feld in der zweiten Datenbank auslesen?

Den Ort und Namen der zweiten Datenbank hab ich in der Variablen strFremdDB
schon ermittelt aber wie kann ich auf das Feld zum Auslesen zugreifen?

Auch mit Dlookup? und wenn ja wo muss ich dann den Ort / Name der zweiten
DB angeben (Syntax)?


Danke schonmal für die Hilfe

Michael
 

Lesen sie die antworten

#1 Winfried Sonntag
10/05/2010 - 19:57 | Warnen spam
Michael Grober schrieb:

Jetzt will ich aber vor den Datenexport die Versionsnummer der Zieldatenbank
prüfen (Diese steht im Feld "Version" der Tabelle "ProgrammStand").

Die Versionsnummer meiner eigenen Datenbank kann ich ja mit Dlookup
strEigenVer = Dlookup("Version", "ProgrammSTand") ermitteln und sie danach
mit der Versionsnummer der zweiten Datenbank vergleichen.

Aber wie kann ich das Feld in der zweiten Datenbank auslesen?

Den Ort und Namen der zweiten Datenbank hab ich in der Variablen strFremdDB
schon ermittelt aber wie kann ich auf das Feld zum Auslesen zugreifen?



Die IN-Klausel hilft dir z.B. weiter:
http://support.microsoft.com/kb/113701/de

Dim db as DAO.Database
Dim rs as DAO.Recordset
Dim strSQL as String
Dim strEigenVer as String
strSQL = "SELECT Version FROM ProgrammStand IN '" & strFremdDB & "'"
set db = DBEngine(0).OpenDatabase(strFremdDB)
set rs = db.openrecordset(strSQL)
strEigenVer = rs!Version
rs.close
db.close
set rs = nothing
set db = nothing

Servus
Winfried
Connect2WSUS: http://www.grurili.de/tools/Connect2WSUS.exe
KnowHow.mdb: http://www.freeaccess.de/knowhow.asp
Access-FAQ: http://www.donkarl.com/AccessFAQ.htm
Access-Stammtisch: http://www.access-muenchen.de

Ähnliche fragen