更新查询中的语法错误(VB.Net)

时间:2016-03-01 15:58:58

标签: sql vb.net visual-studio-2010

请帮帮我。我的项目使用访问数据库。这是我的代码:

.forEach()

为什么它不起作用? 这是错误消息:

Try
            Dim SqlQuery As String = "UPDATE Penawaran SET UP = '" & box_up.Text & "', Dari = '" & box_dari.Text & "', Hal = '" & box_hal.Text & "', No_Reference = '" & box_no_reference.Text & "', Email = '" & box_email.Text & "', CC = '" & box_cc.Text & "', No = '" & box_no.Text & "', Bahan_Proses = '" & box_bahan_proses.Text & "', Jumlah = '" & box_jumlah.Text & "', Harga_Satuan = '" & box_harga_satuan.Text & "', Total = '" & box_total.Text & "', Sub_Total = '" & box_sub_total.Text & "', Total_PPN = '" & box_ppn_10_persen.Text & "', Total_Semua = '" & box_total_semua.Text & "', Terbilang = '" & box_terbilang.Text & "', Note = '" & box_note.Text & "', Nama = '" & box_nama.Text & "', Bagian = '" & box_bagian.Text & "' WHERE Kepada = '" & box_kepada.Text & "'"
            Dim SqlCommand As New OleDbCommand
            With SqlCommand
                .CommandText = SqlQuery
                .Connection = Database
                .ExecuteNonQuery()
            End With
            MsgBox("Data yang anda pilih sudah berhasil di ubah & simpan ke dalam sistem.")
            Call Sett_pnwrn()
            'Me.button_delete.Enabled = False
            ' Me.button_edit.Enabled = False
        Catch ex As Exception
            MsgBox(ex.Message)
        End Try

我该怎么办?

0 个答案:

没有答案