Datenbank zur Laufzeit wechseln

  • VB.NET

Es gibt 4 Antworten in diesem Thema. Der letzte Beitrag () ist von ctm5000.

    Datenbank zur Laufzeit wechseln

    Hallo,
    es gibt ein Problem wo mir zum lösen ein kleiner Denkanstoss fehlt.
    Ich habe eine Software die bis jetzt mit SQLCE problelos arbeitet. Nun wollte ich das Programm so erweitern, das ich auswählen kann ob ich SQLCE oder Mysql/MariaDB (damit es netzwerkfähig wird) nutzen kann.
    Ich kann problemlos auf beide DB's zugreifen. Ich deklariere meine Variablen folgendermaßen für den DB-Zugriff:

    Quellcode

    1. ​
    2. Dim dbfile As String
    3. Dim sAppPath As String
    4. Dim reader As SqlServerCe.SqlCeDataReader
    5. sAppPath = IO.Path.GetDirectoryName(Reflection.Assembly.GetExecutingAssembly.Location)
    6. If Not sAppPath.EndsWith("\") Then sAppPath = sAppPath & "\"
    7. dbfile = sAppPath & "db.sdf"
    8. Dim con As New System.Data.SqlServerCe.SqlCeConnection
    9. Dim cmd As New SqlCeCommand
    10. Dim gesp as integer=0
    12. 'etwas auslesen...
    13. Try
    14. con = New SqlCeConnection("Data Source=" & dbfile & " ; Database Password='123'")
    15. cmd.CommandText = "select anzahl from einstellungen"
    16. con.Open()
    17. cmd = New SqlCeCommand(cmd.CommandText, con)
    18. reader = cmd.ExecuteReader()
    19. Do While reader.Read()
    20. If Not IsDBNull(reader("anzahl")) Then
    21. gesp = CInt(reader("anzahl"))
    22. End If
    23. Loop
    24. reader.Close()
    25. con.Close()
    26. Catch ex As Exception
    27. con.close()
    28. MsgBox(ex.Message)
    29. End Try
    30. 'fertig

    So klappts mit sqlce ohne Probleme.

    Jetzt muss ich vorher abfragen ob MySQl oder SQLCE.
    Was bei der Deklaration nicht funktioniert ist:

    Quellcode

    1. ​
    2. if datenbank="ce" then
    3. Dim con As New System.Data.SqlServerCe.SqlCeConnection
    4. Dim cmd As New SqlCeCommand
    5. Dim reader As SqlServerCe.SqlCeDataReader
    6. else
    7. Dim con As New MySql.Data.MySqlClient.MySqlConnection
    8. Dim cmd As New MySql.Data.MySqlClient.MySqlCommand
    9. Dim reader As MySql.Data.MySqlClient.MySqlDataReader
    10. end if

    Ist ja auch logisch.

    Was aber auch nicht geht ist die Variable(n) "con" als public zu deklarieren und dann später als MySql.Data.MySqlClient.MySqlConnection oder System.Data.SqlServerCe.SqlCeConnection zuzuweisen.

    Mir geht es darum, wie ich am einfachsten meinen Code umstellen kann, um entweder den mysqlserver oder sqlce anzusprechen.Dabei möchte ich gerne meine bisherige Struktur erhalten und eigentlich am liebsten nur die Variablen ändern(da sie ja überall so drinnstehen). Irgendwie steh ich grad aufm Schlauch.

    alle Connections von alle DBProvider erben von der Klasse DBConnection.
    Guck dir die Geschichte im ObjectBrowser an.
    Du kannst also jede Connection in eine Variable dieses allgemeineren Typs tun, und im Weiteren damit programmieren.

    Wenn du deine Architektur so aufbaust, dass dieses an zentraler Stelle geschieht, dann kannst du die DB wechseln, ohne dass deine Anwendung es "merkt".

    Dieses OOP-Feature mit der allgemeiner gefassten Basisklasse nennt man "Polymorphie", und das Konzept, den DataAccess-Layer der Anwendung unterm Hintern auszuwechseln ist eine Anwendung des sog. "Strategy-Pattern".

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „ErfinderDesRades“ ()

    Vielen Dank. Das hat geholfen. Diesen Denkanstoss hab ich gebraucht. :thumbsup:

    Ich hab mal kurz getestet mit:

    Quellcode

    1. ​ Dim con As System.Data.Common.DbConnection

    und dann später zugewiesen mit:

    Quellcode

    1. ​ con = New System.Data.SqlServerCe.SqlCeConnection("Data Source=" & dbfile & " ; Database Password='123")


    .. klappt wunderbar. Jetzt kann ich mir nochmal Gedanken machen wie ich das am einfachsten umsetze.

Facebook
Telefonspende