在vb2010中插入查询不起作用

时间:2012-05-24 08:30:51

标签: visual-studio-2010 sqlite insert

我有这个查询,在访问数据库中插入数据很好,但现在我试图插入一个sqlite3数据库,但我在使用相同的查询时遇到问题

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

1 个答案:

答案 0 :(得分:1)

该查询无效SQL。它应该是这样的:

 Dim query As String = "INSERT INTO tickets (id, summary, status) VALUES( @id, @summary, @status )"

请参阅SQLite Insert Query Manual以获取详细说明SQL Insert语句中关键字顺序的图表。 SQL在其他基于SQL的系统上会出错,而不仅仅是SQLite。我只是想到了这个手册页,因为它非常有用。