Не уверен, как обновить отдельные записи клиентов.VB.net

Question

Когда я избавляюсь от «где» в выражении SQL, оно работает, но перезаписывает все данные, однако я не могу заставить его работать только с одним конкретным клиентом.Может кто-нибудь показать мне, где я иду не так, спасибо.

Приватный Sub Save_but_Click (отправитель как объект, e как EventArgs) Обрабатывает Save_but.Click

    Dim sqlcmd As New OleDbCommand
    cn.Open()
    sqlcmd.Connection = cn
    sqlcmd.CommandText = "Update TblCustomers Set CFName= @CFName, CSName = @CSName, Caddress= @Caddress,"
    sqlcmd.CommandText &= "CTelNo = CTelNo WHERE CustID = @PublicCustID"
    sqlcmd.Parameters.AddWithValue("@FName", TxtFirstName.Text)
    sqlcmd.Parameters.AddWithValue("@CName", TxtSurname.Text)
    sqlcmd.Parameters.AddWithValue("@Caddress", TxtAddress.Text)
    sqlcmd.Parameters.AddWithValue("@CTelNo", TxtTelNo.Text)
    sqlcmd.Parameters.AddWithValue("CustomerId", PublicCustID)

    sqlcmd.ExecuteNonQuery()

    cn.Close()
    MessageBox.Show("Customer information has been updated.", PublicCustID)

Answer 1

Просто добавьте параметр для @PublicCustID перед выполнением запроса

 sqlcmd.Parameters.AddWithValue("@PublicCustID", yourPublicCustID)

Удаление строки

 sqlcmd.Parameters.AddWithValue("CustomerId", PublicCustID)