vb.net SQL查询在SQL服务器中工作，但在复选框中调用时不起作用

Question

我有一个带有复选框的数据网格，它调用一个名为checkbox_CheckedChanged的例程。到现在为止还挺好。我设法弄清楚了dataview中另一列的值，这使我能够确定我正在处理的行的id。

我试图让它改变定义复选框的初始值的列的值，但是我写的SQL在vb.net调用时不起作用 - 它在输入时工作然而，手动到SQL服务器。

这里是我的背后代码：

Public Sub checkbox_CheckedChanged(ByVal sender As Object, ByVal e As EventArgs) 'Handles checkbox.CheckedChanged 
    Dim connectionString As String = WebConfigurationManager.ConnectionStrings("edinsec").ConnectionString 


    Dim box As CheckBox = DirectCast(sender, CheckBox) 
    Dim tblcell As TableCell = CType(box.Parent, TableCell) 
    Dim dgRow As GridViewRow = CType(tblcell.Parent, GridViewRow) 

    Dim msgId As Integer = unreadMessages.Rows(dgRow.DataItemIndex).Cells(0).Text 

    Dim insertSQL As String 

    If box.Checked = True Then 
    insertSQL = "UPDATE messages" 
    insertSQL &= "SET readit = 0" 
    insertSQL &= "WHERE msgid = @msgId" 
    Else 
    insertSQL = "UPDATE messages" 
    insertSQL &= "SET readit = 1" 
    insertSQL &= "WHERE msgid = @msgId" 
    End If 

    Using con As New SqlConnection(connectionString) 
    Dim cmd As New SqlCommand(insertSQL, con) 
    cmd.Parameters.AddWithValue("@msgId", msgId) 
    Try 
     con.Open() 
     cmd.ExecuteNonQuery() 
    Catch Err As SqlException 
     MsgBox("Error", 65584, "Insertion Error") 
    End Try 
    con.Close() 
    End Using 

End Sub 

的想法是，点击后，该复选框将在数据库中，以它的反面翻转“readit的价值。它不断跳转到SqlException，所以我看到了错误消息。

的复选框的ASPX代码是这样的：

  <asp:TemplateField HeaderText="readit" SortExpression="readit"> 
    <ItemTemplate> 
     <asp:CheckBox ID="CheckBox1" runat="server" AutoPostBack="true" OnCheckedChanged="checkbox_CheckedChanged" Checked='<%# Bind("readit") %>' 
      Enabled="true" /> 
    </ItemTemplate> 
    <EditItemTemplate> 
     <asp:CheckBox ID="CheckBox1" runat="server" AutoPostBack="true" OnCheckedChanged="checkbox_CheckedChanged" Checked='<%# Bind("readit") %>' /> 
    </EditItemTemplate> 
     </asp:TemplateField> 

任何帮助将非常感激。 Visual Studio（2008）给出了零在这种情况下对SQL错误的反馈，这非常令人生气。

Answer 1

您需要在您的更新语句添加一些空格：messages后readit = 0/1后，我已经添加空间

If box.Checked = True Then 
     insertSQL = "UPDATE messages " 
     insertSQL &= "SET readit = 0 " 
     insertSQL &= "WHERE msgid = @msgId" 
    Else 
     insertSQL = "UPDATE messages " 
     insertSQL &= "SET readit = 1 " 
     insertSQL &= "WHERE msgid = @msgId" 
    End If 

通知。否则您的陈述将为UPDATE messagesSET ...，这在SSMS中也不起作用。