Hallo zusammen,
Ich habe in meinem Projekt diesen Code eingebaut, welches dafür sorgen soll, das die Datenbankdatei auf Existenz prüft, ansonsten soll eine Meldung erscheinen, welches dem Nutzer darauf hinweist, das die Datenbankdatei nicht gefunden wurde und ihn dann Fragt, ob eine neue Datenbankdatei erstellt werden soll.
Wenn der Nutzer auf "Ja" klickt, dann soll eine Datenbankdatei erstellt werden, ansonsten wenn der Nutzer auf "Nein" klickt, sollte dennoch das Programm gestartet werden, aber der Nutzer kann keine Datensätze speichern.
Der Code sieht so aus:
Nur ich habe das Problem, das diese Meldung immer kommt, selbst dann wenn die Datenbankdatei bereits vorhanden ist.
Meine Frage: Wie mache ich das richtig?
Ich habe in meinem Projekt diesen Code eingebaut, welches dafür sorgen soll, das die Datenbankdatei auf Existenz prüft, ansonsten soll eine Meldung erscheinen, welches dem Nutzer darauf hinweist, das die Datenbankdatei nicht gefunden wurde und ihn dann Fragt, ob eine neue Datenbankdatei erstellt werden soll.
Wenn der Nutzer auf "Ja" klickt, dann soll eine Datenbankdatei erstellt werden, ansonsten wenn der Nutzer auf "Nein" klickt, sollte dennoch das Programm gestartet werden, aber der Nutzer kann keine Datensätze speichern.
Der Code sieht so aus:
VB.NET-Quellcode
- Private Sub FrmContactManager_Load(sender As Object, e As EventArgs) Handles MyBase.Load
- Dim DatenankFehltErstellen As DialogResult
- DatenankFehltErstellen = MessageBox.Show("Die Datenbankdatei wurde nicht gefunden. Soll eine neue Datenbankdatei erstellt werden?", "Fehler beim Laden der Datenbank", MessageBoxButtons.YesNo, MessageBoxIcon.Exclamation)
- If IO.File.Exists(_Datenquelle) Then
- DtsCmDaten.ReadXml(_Datenquelle)
- Else
- If (DatenankFehltErstellen) = DialogResult.Yes Then
- DtsCmDaten.WriteXml(_Datenquelle)
- End If
- End If
- End Sub
Nur ich habe das Problem, das diese Meldung immer kommt, selbst dann wenn die Datenbankdatei bereits vorhanden ist.
Meine Frage: Wie mache ich das richtig?
Liebe Grüße
Skayritares
Skayritares