Dringend! Access Problem!

[Dommet]

Hallo!

Ich habe folgendes Problem:

Wie kann ich in Access über Makros oder VB feststellen ob eine Datenbank vorhanden ist, z.B. wenn kein Netz da ist, ist die Datenbank NICHT vorhanden.

Danke für Eure Hilfe.

[Michael Kagerbauer]

Hi,

du kannst das in einem Modul innerhalb von Access machen, das du per Makro z.B. beim Start deiner Datenbank aufrufst.

Darinüberprüfst du einfach per Quellcode, ob die Datei existiert, in etwa so:

'******************************************************************************

'Funktion : FileExist

'Argumente : Pfad + Dateiname

'Beschreibung: Prüft, ob eine Datei existiert

'Rückgabe : True oder False

'Datum : 08.07.2000

'Autor : Michael Kagerbauer

'*******************************************************************************

Function FileExist(Datei As String)

On Error Resume Next

FileExist = Len(Dir(Datei)) > 0

End Function

Das wars auch schon.. musst dir nur die entsprechende Prozedur noch ins Modul schreiben:

Sub DB_Start

If FileExist("C:\MEINEDB.MDB") THEN

'weitermachen...

Else

Msgbox "DB nicht gefunden !"

'und Programm verlassen ...

End Sub

------------------

Michael Kagerbauer

Webmaster Azubidatenbank.de / Azubidatenbank.com