0

背景: Visual Studio 2010 に VB.NET コードを含む Windows フォームがあります。フォームには、SQL テーブルからレコードを選択できるコンボ ボックスがあります。選択すると、いくつかのテキスト ボックスに SQL テーブル データが入力されます。

問題: これらのテキスト ボックスにダンプされる情報を編集する必要があります。編集とは、Windows フォームのテキスト ボックスの内容を変更し、[更新] ボタンをクリックして、SQL テーブルの内容を更新する必要があることを意味します。

これが私のコードです：

    Dim con As New SqlConnection
    Dim conDim cmd As New SqlCommand
    Try
        con.ConnectionString = "Server=fakeservername; Database=fakedatabasename; integrated security=true"
        con.Open()
        cmd.Connection = con
        cmd.CommandText = ("UPDATE Users " & _
                           "SET User_FName = '" & Trim(txtFName.Text) & "'," & _
                           "User_LName = '" & Trim(txtLName.Text) & "' ," & _
                           "User_Address = '" & Trim(txtAddress.Text) & "'," & _
                           "User_City = '" & Trim(txtCity.Text) & "'," & _
                           "User_State = '" & Trim(txtState.Text) & "'," & _
                           "User_Zip = '" & Trim(txtZip.Text) & "'," & _
                           "User_Phone = '" & Trim(txtPhone.Text) & "'," & _
                           "User_AltPhone = '" & Trim(txtAltPhone.Text) & "'," & _
                           "WHERE Users.User_ID ='" & (txtUserID.Text) & "';")
        cmd.ExecuteNonQuery()
    Catch ex As Exception
        MessageBox.Show("Error while inserting record on table..." & ex.Message, "Insert Records")
    Finally
        con.Close()
    End Try

これが私のエラーです：

「「Where」という単語の近くの構文が正しくありません。」

この質問に対する答えを求めて、インターネット全体を見てきました。私は答えをつま先立ちしていると思いますが、指を置くことはできません。ということで、皆様のところへ。助言がありますか？前もって感謝します！

4

1 に答える 1

2

There is additional comma in the last column before where condition that is not required.

"User_AltPhone = '" & Trim(txtAltPhone.Text) & "',"

should be

"User_AltPhone = '" & Trim(txtAltPhone.Text) & "'"
于 2013-04-28T05:51:24.907 に答える