运行两个实例时自动增量不正确

Question

我正在运行以下代码的 2 个实例，它们连接到 System.Data.SQLite 数据库。当我使用任何一个实例向数据库中插入一行时，从其他实例读取时自动递增的值 (ID) 不正确。这背后的原因是什么？

Imports System.Data.SQLite
Public Class Form1
    Public cnn As SQLiteConnection
    Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
        cnn = New SQLiteConnection("Data Source=\\abc\xx\x_backup.db;Password=password;Connect Timeout=55;FailIfMissing=True")
        cnn.ParseViaFramework = True
        cnn.Open()
    End Sub
    Public Function inserttoTable(ByVal sql As String) As DataTable

         Try
            sql = "SELECT max(ID) FROM joblog;"
            Dim mycommand As SQLiteCommand = New SQLiteCommand(cnn)
            mycommand.CommandText = sql
            MsgBox(mycommand.ExecuteScalar)
            sql = "INSERT INTO joblog (jobid) VALUES (123);"

            mycommand = New SQLiteCommand(cnn)
            mycommand.CommandText = sql
            MsgBox(mycommand.ExecuteNonQuery())
        Catch ex As Exception
            MsgBox(ex.ToString)
        End Try

Answer 1

简单的回答是你不应该使用共享的sqlite数据库文件，它不稳定，数据库文件很容易损坏。使用mariadb/postgresql是一个更好的主意。

我认为您的问题与事务有关，您应该手动提交更改以在更新后立即更新数据库文件。

1. SQLiteTransaction trans = conn.BeginTransaction();
2. select max(id), insert...
3. trans.commit();

Answer 2

我使用的函数有点相当于Sql Server中的Scope_Identity。我没有 SqlLite 数据库，所以无法测试。我不确定您是否可以在 SqLite 中链接命令，但如果不能仅进行 2 个单独的查询。 ExecuteScalar 返回结果集中第一行的第一列，这是您想要的数字。

Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
    Dim NewID As Long
    Using cn As New SQLiteConnection("Your connection string")
        Using cmd As New SQLiteCommand("INSERT INTO joblog (jobid) VALUES (123); Select last_insert_rowid()")
            NewID = CLng(cmd.ExecuteScalar())
        End Using
    End Using
    MessageBox.Show($"The new ID is {NewID}")
End Sub

Answer 3

当我使用任何一个实例向数据库中插入一行时，从其他实例读取时自动递增的值（ID）不正确

我怀疑这是因为您的连接和命令没有关闭/处置所以它们保持打开状态。

连接的最佳建议是使用它，然后关闭/处理它。命令也是如此，请确保它们已被释放。

这是一种方法：

 Dim intReturn As Integer
 sql = "SELECT max(ID) FROM joblog;"

 ' First query to get your scalar return value
 Using cnn As New New SQLiteConnection("Data Source=\\abc\xx\x_backup.db;Password=password;Connect Timeout=55;FailIfMissing=True")
    Using mycommand As New SQLiteCommand(sql, cnn)
       cnn.ParseViaFramework = True
       cnn.Open()

       intReturn = mycommand.ExecuteScalar
       MessageBox.Show(intReturn)

    End Using
 End Using

 ' Second query to actually do the insert
 sql = "INSERT INTO joblog (jobid) VALUES (123);"
 Using cnn As New New SQLiteConnection("Data Source=\\abc\xx\x_backup.db;Password=password;Connect Timeout=55;FailIfMissing=True")
    Using mycommand As New SQLiteCommand(sql, cnn)
       cnn.ParseViaFramework = True
       cnn.Open()

       intReturn = mycommand.ExecuteNonQuery()
       MessageBox.Show("Records affected " & intReturn)

    End Using
 End Using

另外，请注意使用SQL Parameters，否则您可能容易受到 SQL 注入攻击。