SQLite zickt bei Connection

TTX.exe · 24. Juli 2020, 10:25

Hoi Leute

ich brauch mal ein wenig hilfe, SQLite will mich irgendwie für dumm verkaufen gerade.

VB.NET-Quellcode

Dim AppConfigFolder As String = $"{GetFolderPath(SpecialFolder.ApplicationData)}\{Application.ProductName.ToString}\"
Dim SQLConnect As String = $"Data Source={AppConfigFolder}data.db;Version=3;"

Ich connecte mit dem obigen String zu einer SQLite DB. Diese DB lag bisher immer im Programmverzeichnis selbst, da möchte ich sie aber raus haben und in Appdata verlegen.
Die DB liegt auch dort, aber SQLite macht immer so als wäre sie nicht da und die DB würde die gesuchte Tabelle nicht enthalten.

Quellcode

System.Data.SQLite.SQLiteException: "SQL logic error
no such table: cards"

.
Das stimmt aber nicht, die Datei liegt im richtigen Pfad und hat ihre Tabellen wie sie soll. Irgendwie hat SQLite ein Problem diese Datenbank zu finden 8|.
Wenn ich sie im Programmverzeichnis liegen habe, kann er connecten.

petaod · 24. Juli 2020, 10:44

Welchen genauen Inhalt hat die Variable AppConfigFolder?
Stimmen die \?

TTX.exe · 24. Juli 2020, 10:55

Console.WriteLine(SQLConnectString) zeigt: Data Source=C:\Users\smier\AppData\Roaming\nv_updater\data.db;Version=3;

VaporiZed · 24. Juli 2020, 11:02

Und was sagt MessageBox.Show(IO.File.Exists("C:\Users\smier\AppData\Roaming\nv_updater\data.db").ToString)?

TTX.exe · 24. Juli 2020, 11:12

Das sagt dann True

BlueLagoonX · 24. Juli 2020, 11:21

Moin,

ich nehme für ConnectionStrings grundsätzlich den ConnectionStringBuilder.

Den enthalten alle mir bekannten Connections (Sql, MySql, Oledb, SqLite ...)

VB.NET-Quellcode

Dim ConStr As String = String.Empty
Dim Builder As New SQLiteConnectionStringBuilder
With Builder
.DataSource = "Datei"
ConStr = .ConnectionString
End With

In selbst zusammengebauten Connectionstrings hakt oft mal was, wenn nur ein Teil der Syntax nicht passt.

TTX.exe · 24. Juli 2020, 11:27

Hm das hilft leider auch nicht, das Problem bleibt das selbe

BlueLagoonX · 24. Juli 2020, 12:07

Zeig bitte mal den kompletten Code, mit Initialisierung über den ConnectionStringBuilder, bis zur Fehlermeldung

TTX.exe · 24. Juli 2020, 12:41

VB.NET-Quellcode

Dim sqlite_conn As SQLiteConnection
Dim sqlite_cmd As SQLiteCommand
Dim sqlite_datareader As SQLiteDataReader
Dim Result As Integer = Nothing
Dim DBFile As String = $"{GetFolderPath(SpecialFolder.ApplicationData)}\{Application.ProductName}\nvu_graphicscard.db"
Dim SQLConnectString As String = $"Data Source={DBFile};Version=3;"
MsgBox(SQLConnectString)
sqlite_conn = New SQLiteConnection(SQLConnectString)
sqlite_conn.Open()
sqlite_cmd = sqlite_conn.CreateCommand()

Den ConnectionStringBuilder hab ich kurz getestet, der macht das gleiche Statement, wie gesagt wenn die DB in Verzeichnis der exe liegt, dann geht es.

Die Fehlermeldung ist:

System.Data.SQLite.SQLiteException: "SQL logic error
no such table: cards"

Diese ist aber einfach falsch da SQLite scheinbar zu doof ist mit dem Pfad klar zu kommen.

Edit:
Das Problem hat sich erledigt, ich hatte noch eine zweite Connection die auf den falschen Pfad gezeigt hat... Man bin ich lost

.
Der Code ist so korrekt :rolleyes:

Die Farbe Rot ist der Moderation vorbehalten ~VaporiZed

BlueLagoonX · 24. Juli 2020, 13:07

Schau dir Visual Studio - Empfohlene Einstellungen das bitte durch, bevor du weiter machst.

Schmeiß den Microsoft.VisualBasic Verweis raus (MsgBox)

Weiterhin finde ich auch die Deklaration des DBFile Strings sehr merkwürdig.
Strings für Pfade kombiniert man eigentlich immer mit der IO.Path.Combine(...) Methode.
Alles Andere ist Murks und verursacht schnell Fehler.

Auch wenn dein Problem schon behoben ist, ich habe gerade ein Beispiel fertig, wie ich die Connection lösen würde.

Connection, Cmd und Reader gehören Disposed wenn sie nicht mehr benötigt werden. Optimal geht das, wenn du sie mit Using verwendest.

VB.NET-Quellcode

Dim ConnStr As String = String.Empty
Dim CSB As New SQLiteConnectionStringBuilder
With CSB
.DataSource = IO.Path.Combine(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData), Application.ProductName, "nvu_graphicscard.db")
ConnStr = .ConnectionString
End With
Dim DeinSqlCommand As String = "UPDATE Tabelle ..."
Using SQLiteCon As New SQLiteConnection(ConnStr)
Using SqlCmd As New SQLiteCommand(DeinSqlCommand, SQLiteCon)
With SqlCmd.Connection
If Not .State = ConnectionState.Open Then .Open()
End With
'machwas
With SqlCmd.Connection
If .State = ConnectionState.Open Then .Close()
End With
End Using
End Using

Wenn du es dann richtig machen willst ...

VB.NET-Quellcode

Dim DbFile As New IO.FileInfo(IO.Path.Combine(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData), Application.ProductName, "nvu_graphicscard.db"))
If Not DbFile.Exists Then
MessageBox.Show("DbFile" & " ist nicht vorhanden.", "Test", MessageBoxButtons.OK, MessageBoxIcon.Error)
Exit Sub
End If
Dim CSB As New SQLiteConnectionStringBuilder
With CSB
.DataSource = DbFile.FullName
ConnStr = .ConnectionString
End With

TTX.exe · 24. Juli 2020, 13:15

Hey danke für deine Mühe

Was meinst du mit "Microsoft.VisualBasic Verweis"? Die Msgbox da war nur zum testen drin.
Den Pfad hatte ich beim rumprobieren mit IO.Path.Combine auch mal drin, finde es aber so wie das jetzt ist ein wenig übersichtlicher :whistling:

, aber die Variante ist natürlich sauberer.
Die Connection wird aber geschlossen, wenn das fertig ist

Aber den ConnectionStringBuilder hab ich nun eingebaut :thumbup:

VaporiZed · 24. Juli 2020, 21:20

TTX.exe schrieb:

Was meinst du mit "Microsoft.VisualBasic Verweis"? Die Msgbox da war nur zum testen drin

Durch die Tatsache, dass Du MsgBox nutzen kannst, wird klar, dass Du den VB6-Namespace in den Generalimporten drin hast, da MsgBox aus diesem Namespace stammt.

TTX.exe · 25. Juli 2020, 00:08

Achso ok das ging aber einfach immer schon, egal bei welchen Projekten, ist das schlimm?

SQLite zickt bei Connection

SQLite zickt bei Connection

VB.NET-Quellcode

Quellcode

VB.NET-Quellcode

VB.NET-Quellcode

VB.NET-Quellcode

VB.NET-Quellcode

TTX.exe schrieb:

Ähnliche Themen

4 Benutzer haben hier geschrieben