Keine Verbindung zum Server

[SG05]

Hallo zusammen,

wie kann ich verhindern, dass die DB oder ein spezielles Formular nicht geöffnet werden kann, sollte keine Verbindung zum Server bestehen.

Habe versucht, ein Formular beim Starten der DB im Hintergrund zu öffnen, wo ein Feld wie folgt angesprochen wird:

    If IsError(EinFeld aud der Backend-DB) Then
    "mach nix"
    Else
    "mache was" 
    End If


Leider kommt eine Meldung "Kein zulässiger Pfad......."

Ich habe wohl zu einfach gedacht:-))

Bitte um Eure Unterstützung

Danke und Gruß

[DF6GL]

Hallo,

Du könntest z. B. mit Dir() nachsehen, ob die Backend-Datei erreichbar ist....

[database]

Hallo,

.... oder ein DLookup auf eine der eingebundenen Tabellen absetzen und den Fehler, der entsteht wenn die Tabelle nicht abgefragt werden kann, entsprechend abfangen.

[oma]

Hallo

...oder im betreffenden Formular den Fehler abfangen:

Code [Auswählen] Erweitern

Private Sub Form_Error(DataErr As Integer, Response As Integer)
Const BackEnd_Fehlt = 3024

   Select Case DataErr
     Case BackEnd_Fehlt
       Response = acDataErrContinue 'Hier irgend etwas machen; z.B. eine Meldung u. ein bestimmtes anderes Formular öffnen
           MsgBox "Ist ja gut, FehlerNr: " & DataErr
           DoCmd.OpenForm "FDein Formular"
     Case Else
       Response = acDataErrDisplay  'anderen möglichen Fehler melden
   End Select
End Sub


Gruß Oma