错误:更新语句中存在语法错误



请给出此错误的解决方案。

Private Sub btnUpdate_Click(sender As Object, e As EventArgs) Handles btnUpdate.Click

Try
Dim cmd As New OleDbCommand("update tblSales SET NoOfCars=@noofcars,Date=@dte where CarNo=@cno", con)
cmd.Parameters.Add("@noofcars", OleDbType.Numeric).Value = nudnoofcars.Value
cmd.Parameters.Add("@dte", OleDbType.Date).Value = dtpdate.Value
cmd.Parameters.Add("@cno", OleDbType.Numeric).Value = cmbno.Text

Dim flag As Integer = 0
con.Open()
flag = cmd.ExecuteNonQuery()
con.Close()
If flag > 0 Then
MsgBox("Record updated")
DisplayRecord()
ClearControl()
Else
MsgBox("Something went wrong.....Record is not updated")
End If
Catch ex As Exception
MsgBox(ex.Message)
Finally
If con.State = ConnectionState.Open Then
con.Close()
End If
End Try
End Sub

您似乎忘记了命令文本中的SET关键字。尝试"更新tblSalesSETNoOfCars=@NoOfCars,Date=@dte,其中CarNo=@cno">

相关内容

最新更新