SQL Update错误+ WHERE子句澄清

时间:2014-01-19 02:06:35

标签: mysql sql sql-server vb.net datagridview

我有一个SQL表格的编辑表格,其中包含供用户编辑所选记录详细信息的文本框。加载时,所选记录/行的详细信息/信息将插入相应的文本框中,一旦用户更改了所需内容,单击Updatebtn即可更新整个记录。

成功建立连接,编辑表单按预期填充文本框。但是,当我单击Updatebtn时,我收到以下错误(尽管它可能不仅限于一个错误!)

  

类型'System.Data.SqlClient.SqlException'的未处理异常   发生在System.Data.dll

中      

其他信息:找不到存储过程'P'。

突出显示cmd.ExecuteScalar()

Updatebtn代码如下 - 注意我使用并调整了我的添加按钮中的代码,该代码运行良好,所以我知道这种方法有效。还请查看我的WHERE条款;我不确定这是否是引用我选择并想要更新的记录的正确方法。

其他信息:WHERE子句中的midtxt.Text由表单加载填充,并包含DataGridView中所选索引/项的Members_ID。

Private Sub Updatebtn_Click(sender As Object, e As EventArgs) Handles Updatebtn.Click
    stcon = "Data Source =**.**.**.***;Initial Catalog=Members_Details;Integrated Security=False;User=UGSTUDIOLEADERSHIP;Password=****************;"
    con = New SqlConnection(stcon)

    con.Open()
    p(0) = New SqlParameter("@Members_ID", SqlDbType.Int)
    p(1) = New SqlParameter("@Gamer_Tag", SqlDbType.VarChar, 255)
    p(2) = New SqlParameter("@Screenname", SqlDbType.VarChar, 255)
    p(3) = New SqlParameter("@First_Name", SqlDbType.VarChar, 255)
    p(4) = New SqlParameter("@Last_Name", SqlDbType.VarChar, 255)
    p(5) = New SqlParameter("@DoB", SqlDbType.VarChar, 255)
    p(6) = New SqlParameter("@E_Mail_Address", SqlDbType.VarChar, 255)
    p(7) = New SqlParameter("@Position", SqlDbType.VarChar, 255)
    p(8) = New SqlParameter("@UG_Studio", SqlDbType.VarChar, 255)
    p(9) = New SqlParameter("@Cautions", SqlDbType.VarChar, 255)
    p(10) = New SqlParameter("@Record", SqlDbType.VarChar, 255)
    p(11) = New SqlParameter("@Event_Attendance", SqlDbType.VarChar, 255)
    p(12) = New SqlParameter("@Members_Status", SqlDbType.VarChar, 255)
    p(13) = New SqlParameter("@GTA_V_Crew_Member", SqlDbType.VarChar, 255)
    p(14) = New SqlParameter("@Games_Owned", SqlDbType.VarChar, 255)
    p(15) = New SqlParameter("@Rep_Group", SqlDbType.VarChar, 255)
    p(0).Value = midtxt.Text
    p(1).Value = gttxt.Text
    p(2).Value = sntxt.Text
    p(3).Value = fntxt.Text
    p(4).Value = lntxt.Text
    p(5).Value = dobtxt.Text
    p(6).Value = emailtxt.Text
    p(7).Value = teamptxt.Text
    p(8).Value = ugptxt.Text
    p(9).Value = ugctxt.Text
    p(10).Value = recordtxt.Text
    p(11).Value = eventatxt.Text
    p(12).Value = memberstatcombo.Text
    p(13).Value = gtavcrewmembercombo.Text
    p(14).Value = gamesownedtxt.Text
    p(15).Value = RepGroupcombo.Text

    cmd = New SqlCommand("UPDATE PersonsA SET(Members_ID=@Members_ID,Gamer_Tag=@Gamer_Tag,Screenname=@Screenname,First_Name=@First_Name,Last_Name=@Last_Name,DoB=@DoB,E_Mail_Address=@E_Mail_Address,Position=@Position,UG_Studio=@UG_Studio,Cautions=@Cautions,Record=@Record,Event_Attendance=@Event_Attendance,Members_Status=@Members_Status,GTA_V_Crew_Member=@GTA_V_Crew_Member,Games_Owned=@Games_Owned,Rep_Group=@Rep_Group WHERE Members_ID =)"(midtxt.Text), con)
    cmd.Parameters.Add(p(0))
    cmd.Parameters.Add(p(1))
    cmd.Parameters.Add(p(2))
    cmd.Parameters.Add(p(3))
    cmd.Parameters.Add(p(4))
    cmd.Parameters.Add(p(5))
    cmd.Parameters.Add(p(6))
    cmd.Parameters.Add(p(7))
    cmd.Parameters.Add(p(8))
    cmd.Parameters.Add(p(9))
    cmd.Parameters.Add(p(10))
    cmd.Parameters.Add(p(11))
    cmd.Parameters.Add(p(12))
    cmd.Parameters.Add(p(13))
    cmd.Parameters.Add(p(14))
    cmd.Parameters.Add(p(15))
    cmd.ExecuteScalar() 'This is where the Error is detected.
    MsgBox("Data has been saved!")

    da = New SqlDataAdapter("SELECT * FROM PersonsA", con)
    ds = New DataSet
    da.Fill(ds, "PersonsA")

    LeadersAccessTable.DataGridView1.DataMember = "PersonsA"
    LeadersAccessTable.DataGridView1.DataSource = ds

    con.Close()
End Sub

帮助会很棒!我也是vb中的SQL新手。

1 个答案:

答案 0 :(得分:1)

只需在update语句的SET子句中删除额外的括号()即可。像这样......

UPDATE PersonsA 
SET Members_ID=@Members_ID,
    Gamer_Tag=@Gamer_Tag,
    Screenname=@Screenname,
    First_Name=@First_Name,
    Last_Name=@Last_Name,
    DoB=@DoB,
    .
    .so on....
WHERE Members_ID = @var