0
我有這個疑問的作品不錯插入aaccess DB數據,但我現在試圖插入一個sqllite3分貝,但其使用相同的查詢插入查詢
Imports System.Data.Odbc
Public Class Form1
Public con As New OdbcConnection("Dsn=SQLite3 Datasource;database=C:\Users\pcampos\Desktop\spiceworks_prod.db;stepapi=0;syncpragma=NORMAL;notxn=0;timeout=100000;shortnames=0;longnames=0;nocreat=0;nowchar=0;fksupport=0;oemcp=0;bigint=0")
Dim query As String = "INSERT INTO INSERT INTO tickets(id, summary, status) VALUES(@id,@summary,@status)"
con.Close()
con.Open()
Using cmd As New OdbcCommand(query, con)
cmd.Parameters.AddWithValue("@id", OdbcType.VarChar).Value = test
cmd.Parameters.AddWithValue("@sumamry", OdbcType.VarChar).Value = "ola ola ola"
cmd.Parameters.AddWithValue("@staus", OdbcType.VarChar).Value = "close"
Dim x As Integer = cmd.ExecuteNonQuery()
MsgBox(x)
If x < 1 Then
MessageBox.Show("Erro ao inserir", My.Application.Info.Title, MessageBoxButtons.OK, MessageBoxIcon.Error)
Else
MessageBox.Show("Registo1 inserido com sucesso!", My.Application.Info.Title, MessageBoxButtons.OK, MessageBoxIcon.Information)
End If
End Using
End Class