为什么我删除不了。。DataGrid里面的CheckBox选中删除问题

jin1120

        Dim i As Integer
        Dim ChBox As CheckBox
        For i = 0 To DataGrid1.Items.Count - 1
            ChBox = CType(DataGrid1.Items(i).Cells(0).FindControl("CheckBox1"), CheckBox)
            If ChBox.Checked = True Then
                Dim conn As New SqlConnection
                conn.ConnectionString = "server=127.0.0.1;uid=sa;pwd=;database=netexam"
                conn.Open()
                Dim sql As String
                sql = "delete from question where id=ChBox"
                Dim cmd As New SqlCommand(sql, conn)
                cmd.ExecuteNonQuery()
                bind()
            End If
        Next

saintfrosty

把 bind() 删除掉。

如果还有问题，你应该调试，然后按照调试给出更明确的说明，说明你到底是怎么判断删除不了的。

xinyu5460

sql = "delete from question where id=ChBox"
这个语句有问题吧, 你都没有给ID正确赋值, 数据库里根本没有id=ChBox这条数据. 你应该定一列藏的模板列,定义一个Label 帮定id字段,
<asp:TemplateColumn>
                                                <ItemTemplate>
                                                        <asp:Label runat="server" Text='<%# DataBinder.Eval(Container, "DataItem.id") %>'>
                                                        </asp:Label>
                                                </ItemTemplate>
                                        </asp:TemplateColumn>

然后

Dim i As Integer
Dim ChBox As CheckBox
Dim label1 As Label

For i = 0 To DataGrid1.Items.Count - 1
            ChBox = CType(DataGrid1.Items(i).Cells(0).FindControl("CheckBox1"), CheckBox)

label1 = CType(DataGrid1.Items(1).FindControl("label1"), Label)            
If ChBox.Checked = True Then
                Dim conn As New SqlConnection
                conn.ConnectionString = "server=127.0.0.1;uid=sa;pwd=;database=netexam"
                conn.Open()
                Dim sql As String
                sql = "delete from question where id='"  + label1.Text + "'";
                Dim cmd As New SqlCommand(sql, conn)
                cmd.ExecuteNonQuery()
                bind()
            End If
        Next

xinyu5460

模板列的定义应是如下, 差点弄错了
<asp:TemplateColumn>
<ItemTemplate>
<asp:Label runat="server" ID="label1"  Text='<%# DataBinder.Eval(Container, "DataItem.id") %>'>
</asp:Label>
</ItemTemplate>
</asp:TemplateColumn>

jin1120

谢xinyu5460的回答。。但还是有错误！我把代码贴出来帮我看看错在哪？我的思想是用DataGrid做考试系统的试卷审核功能。。用外面的CheckBox选取DataGrid里面的CheckBox。。然后用按钮可以把选取的试题提交或删除。
------------------------------------------------------------------
<Columns>
                                                <asp:TemplateColumn>
                                                        <ItemTemplate>
                                                                <asp:CheckBox id="CheckBox1" runat="server" AutoPostBack="True"></asp:CheckBox>
                                                        </ItemTemplate>
                                                </asp:TemplateColumn>
                                                <asp:TemplateColumn>
                                                        <ItemTemplate>
                                                                <asp:Label runat="server" ID="Label1" Text='<%# DataBinder.Eval(Container, "DataItem.id") %>'>
                                                                </asp:Label>
                                                        </ItemTemplate>
                                                </asp:TemplateColumn>
                                                <asp:BoundColumn DataField="question" HeaderText="问题"></asp:BoundColumn>
                                                <asp:BoundColumn DataField="A" HeaderText="选项A"></asp:BoundColumn>
                                                <asp:BoundColumn DataField="B" HeaderText="选项B"></asp:BoundColumn>
                                                <asp:BoundColumn DataField="C" HeaderText="选项C"></asp:BoundColumn>
                                                <asp:BoundColumn DataField="D" HeaderText="选项D"></asp:BoundColumn>
                                                <asp:BoundColumn DataField="answer" HeaderText="答案"></asp:BoundColumn>
                                                <asp:BoundColumn DataField="type" HeaderText="试题类型"></asp:BoundColumn>
                                                <asp:BoundColumn DataField="subjectname" HeaderText="试题科目"></asp:BoundColumn>
                                        </Columns>
-----------------------------------------------------------------------
        Dim i As Integer
        Dim ChBox As CheckBox
        Dim label1 As Label

        For i = 0 To DataGrid1.Items.Count - 1
            ChBox = CType(DataGrid1.Items(i).Cells(0).FindControl("CheckBox1"), CheckBox)

            label1 = CType(DataGrid1.Items(1).FindControl("label1"), Label)
            If ChBox.Checked = True Then
                Dim conn As New SqlConnection
                conn.ConnectionString = "server=127.0.0.1;uid=sa;pwd=;database=netexam"
                conn.Open()
                Dim sql As String
                sql = "delete from question where id='" + label1.Text + "'"
                Dim cmd As New SqlCommand(sql, conn)
                cmd.ExecuteNonQuery()
                bind()
            End If
        Next

xinyu5460

因为你没有在循环结束就调用了Bind()方法， 如果你选择的不是第一行， 下面的CheckBox的选择全都没有效了， 你只需把Bind()的调用放在For循环后就OK了， 如下。
Dim i As Integer
        Dim ChBox As CheckBox
        Dim label1 As Label

        For i = 0 To DataGrid1.Items.Count - 1
            ChBox = CType(DataGrid1.Items(i).Cells(0).FindControl("CheckBox1"), CheckBox)

            label1 = CType(DataGrid1.Items(1).FindControl("label1"), Label)
            If ChBox.Checked = True Then
                Dim conn As New SqlConnection
                conn.ConnectionString = "server=127.0.0.1;uid=sa;pwd=;database=netexam"
                conn.Open()
                Dim sql As String
                sql = "delete from question where id='" + label1.Text + "'"
                Dim cmd As New SqlCommand(sql, conn)
                cmd.ExecuteNonQuery()
            End If
        Next
  bind()

liukai9911

sql = "delete from question where id=ChBox"
这个语句有问题

liukai9911

最好自己学着调试

jin1120

另外有个问题。。怎么提交DataGrid里面的CheckBox所选的题目去数据库的另外一个表啊？

xinyu5460

不是很明白你的问题是什么! 你要把选择的数据去生成另一个表中的数据, 用Insert 语句就行了啊