Hallo liebes Forum,
ich möchte beim Start eines Programms prüfen, ob die Verbindung zur Datenbank (Access) Ok ist, und wenn das nicht der Fall ist den OleDb-ConnectionString neu definieren.
Ich habe es so probiert:
ist aber wieder einmal nicht die Lösung.
<Edit>Entschuldigt bitte: My.Settings.Settings ist ReadOnly - gibt es für das Problem trotzdem eine Lösung? <\Edit>
liebe Grüsse
Christian
ich möchte beim Start eines Programms prüfen, ob die Verbindung zur Datenbank (Access) Ok ist, und wenn das nicht der Fall ist den OleDb-ConnectionString neu definieren.
Ich habe es so probiert:
Code:
... Dim conString As String = My.Settings.WaldJagdConnectionString.ToString Dim con As New OleDbConnection con.ConnectionString = conString If con.State = ConnectionState.Closed Then Try con.Open() Catch ex As Exception Me.OpenFileDialog1.RestoreDirectory = True Me.OpenFileDialog1.ShowDialog() My.Settings.PropertyValues.Item("OleDBConnectionString").PropertyValue = Me.OpenFileDialog1.FileName.ToString My.Settings.Save() End Try End If ...
<Edit>Entschuldigt bitte: My.Settings.Settings ist ReadOnly - gibt es für das Problem trotzdem eine Lösung? <\Edit>
liebe Grüsse
Christian
Comment