Microsoft Office Access 2007-Programmierung - Das Handbuch

BEISPIEL

BEISPIEL

HINWEIS

Aktualisieren einer Verbindung

Die Verbindung aktualisieren Sie, indem Sie sowohl die Eigenschaft Jet OLEDB:Link Datasource als auch Jet

OLEDB:Create Link erneut setzen.

Aktualisieren einer Verbindung:

Dim cat As New ADOX.Catalog

cat.ActiveConnection = CurrentProject.Connection

cat.Tables("Tabelle3").Properties("Jet OLEDB:Link Datasource") = "C:\TEMP2"

cat.Tables("Tabelle3").Properties("Jet OLEDB:Create Link") = True

Löschen einer Verbindung

Wie auch bei den DAO genügt ein Löschen der entsprechenden Tabelle (in der Access-Datenbank), um die

Verbindung zu lösen.

Löschen einer Verbindung:

Dim cat As New ADOX.Catalog

cat.ActiveConnection = CurrentProject.Connection

cat.Tables.Delete ("Personen1")

Exportieren von Daten

Unter Access haben Sie folgende Möglichkeiten für den Export von Daten:

■ TransferDatabase-Methode (DoCmd-Objekt)

■ SQL-Befehle (SELECT INTO, INSERT INTO)

Wählen Sie die zweite Variante, wenn Sie zum Beispiel mit Hilfe von generierten SQL-Anweisungen Daten

exportieren möchten.

TransferDatabase-Methode

Im Wesentlichen können Sie über die TransferDatabase-Methode all das erreichen, was Ihnen auch die Ac-

cess-Multifunktionsleiste (Externe Daten/Exportieren) bietet.

Die Syntax:

DoCmd.TransferDatabase [Transfertyp], Datenbankformat, Datenbankname

[, Objekttyp], Herkunft, Ziel[, Nur Struktur]

[, Anmeldename speichern]

Die folgende Tabelle 9.25 zeigt die Argumente im Einzelnen.

575

Exportieren von Daten