我正在尝试使用VB.NET和SQLite创建应用程序,我使用SQLiteManager和 I HAVE SET ENCRYPTION TO THE DATABASE and THE PASSWORD IS SAME AS WHAT IN THE CONNECTION STRING 创建数据库和表 .

但是,当我试图将示例记录插入表时,它给出了一个错误 file is encrypted or is not a database

这是产生错误的代码示例 .

Using ConLite = OpenConLite()
        Using LiteCmd As New SQLiteCommand
            Dim TglWaktuSekarang As String = CurrentDateTime()
            LiteCmd.CommandText = "INSERT INTO finger_stamp(emp_id,emp_name,date_time) VALUES('1','DIANA','" & TglWaktuSekarang & "')"
            LiteCmd.CommandType = CommandType.Text
            LiteCmd.Connection = ConLite
            LiteCmd.ExecuteNonQuery()
        End Using
End Using

这是我的连接代码

Public Function OpenConLite() As SQLiteConnection
    Dim SQLiteCon As SQLiteConnection
    Try
        Dim ConLiteString As String = "Data Source=C:\SQLiteDB\attendance.sqlite;Version=3;Password=hahaha;"
        SQLiteCon = New SQLiteConnection(ConLiteString) ' Connection DataSource
        SQLiteCon.Open()
        OpenConLite = SQLiteCon
    Catch ex As Exception
        OpenConLite = Nothing
        MsgBox("Failed to connect to Database", MsgBoxStyle.Information, "Warning")
    End Try
End Function