首页 > 解决方案 > System.Data.SqlClient.SqlException:'附近的语法不正确

问题描述

我不明白为什么会收到此错误:

System.Data.SqlClient.SqlException:''12' 附近的语法不正确。'

我的代码:

Imports System.Data.SqlClient
Public Class produktm
    Dim Con As New SqlConnection("Data Source=(LocalDB)\MSSQLLocalDB;AttachDbFilename=C:\Users\MON\Documents\profitmon.mdf;Integrated Security=True;Connect Timeout=30")
    Public Sub populate()
        Con.Open()
        Dim sql = "select * from ProduktTable"
        Dim adapter As SqlDataAdapter
        adapter = New SqlDataAdapter(sql, Con)
        Dim builder As SqlCommandBuilder
        builder = New SqlCommandBuilder(adapter)
        Dim ds As DataSet
        ds = New DataSet
        adapter.Fill(ds)
        ProduktDataList.DataSource = ds.Tables(0)

        Con.Close()
    End Sub

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

        Con.Open()
            Dim query As String
            query = "Insert Into ProduktTable values(" & ProduktId.Text & ",'" & ProdEmri.Text & ",'" & ProdSasia.Text & ",'" & ProdQmimi.Text & ",'" & ProdPershkrimi.Text & ",'" & ProdKategori.SelectedItem.ToString() & "')"
            Dim cmd As SqlCommand
            cmd = New SqlCommand(query, Con)
            cmd.ExecuteNonQuery()
            MsgBox("Produkti u shtua me sukses")
            Con.Close()

    End Sub

    Private Sub produktm_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        populate()
    End Sub
End Class

Visual Studio 说这条线是问题所在

        cmd.ExecuteNonQuery()

标签: sql-servervb.netvisual-studio

解决方案


在“查询”行设置断点并检查“查询”字符串。

在此处输入图像描述

试试下面的代码:

query = "Insert Into ProduktTable values('" & ProduktId.Text & "','" & ProdEmri.Text & "','" & ProdSasia.Text & "','" & ProdQmimi.Text & "','" & ProdPershkrimi.Text & "','" & ProdKategori.SelectedItem.ToString() & "')"

推荐阅读