Multiple удалить работу обыкновение (asp.net VB)

Question

пример кода ASPX В.Б за кодом:

Protected Sub btnDelete_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnDelete.Click 

    For Each row As GridViewRow In GridView1.Rows 

     Dim checkbox As CheckBox = CType(row.FindControl("chkdelete"), CheckBox) 

     If checkbox.Checked Then 

      Dim ID As Integer = Convert.ToInt32(GridView1.DataKeys(row.RowIndex).Value) 

      SqlDataSource1.DeleteParameters("ID").DefaultValue = ID.ToString() 

      SqlDataSource1.Delete() 

     End If 

    Next row  

передний код:
`

  <Columns> 
      <asp:TemplateField> 
       <ItemTemplate> 
        <asp:CheckBox ID="chkdelete" runat="server" /> 
       </ItemTemplate> 
      </asp:TemplateField> 
      <asp:BoundField DataField="ID" HeaderText="No" 
       SortExpression="ID"/> 
      <asp:BoundField DataField="Name" HeaderText="Name" 
       SortExpression="Name"/> 
      <asp:CommandField Headertext="Edit" ShowEditButton="True" /> 
      <asp:CommandField Headertext="Delete" ShowDeleteButton="True" /> 
     </Columns>  
    </asp:GridView> 
    <asp:Button ID="btnDelete" runat="server" Text="Delete" onclick="btnDelete_Click"/>` 

мой вопрос, почему мой множественным удалить все еще обыкновение Работа? Что не так с моим кодом? любой PLS помочь ..

Answer 1

Protected Sub btnDelete_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnDelete.Click 
    For Each row As GridViewRow In GridView1.Rows 
    Dim checkbox As CheckBox = CType(row.FindControl("chkdelete"), CheckBox) 
     If checkbox.Checked Then 
      Dim ID As Integer = Convert.ToInt32(GridView1.DataKeys(row.RowIndex).Value) 
      Delete(ID) 
     End If 

    Next row 

End Sub 

Public Function Delete(ByRef ID as Integer) 
' Your Connection Coding comes here 

    SqlDataSource1.DeleteParameters("ID").DefaultValue = ID.ToString() 
    SqlDataSource1.Delete() 
End Function 

Try This Way .. !!