ansaurus

Question

Using Checkbox to Delete row in Gridview with Visual Basic.net code behind and Stored Procedures

Answer 1

A:

Use this code for your delete method to scan your checkboxes and delete rows.

Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
    For Each gvr As GridViewRow In GridView1.Rows
        If gvr.Visible AndAlso DirectCast(gvr.FindControl("CheckBox1"), CheckBox).Checked Then
            Response.Write(String.Format("DELETING ROW {0}<br>", gvr.DataItemIndex))
            gvr.Visible = False 'Hide the row without the need for a re-bind'

            'Use the "DataItemIndex" to get the database row key information for your delete'
            'run your delete procedure'
        End If
    Next
End Sub

Carter 2010-08-19 17:22:39

Thank you very much for your help

Patrick 2010-08-23 13:48:38

May I at least get an upvote? :)

Carter 2010-08-23 16:02:58

I can't upvote yet, says I need at least 15 rep. Otherwise I definitely would.

Patrick 2010-10-13 14:26:37

Answer 2

A:

Here is my information for finding the checked checkboxes.

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


    'Create String Collection to store 
    'IDs of records to be deleted 

    Dim idCollection As New StringCollection()
    Dim strID As String = String.Empty


    'Loop through GridView rows to find checked rows 
    For d = 0 To GridView1.Rows.Count - 1


        If GridView1.Rows(d).Cells.FromKey("DeleteRecord").Value = True Then
            strID = GridView1.Rows(d).Cells.FromKey("EmpID").Value
            idCollection.Add(strID)
        End If
    Next

    'Call the method to Delete records 
    DeleteMultipleRecords(idCollection)


    QueryEmployees("")




End Sub

Here is the code for the sub that calls my stored procedure.

Private Sub DeleteMultipleRecords(ByVal idCollection As StringCollection)

        Dim SqlConn4 As SqlConnection = New SqlConnection("Password=;Persist Security Info=True;User ID=;Initial Catalog=;Data Source=.\SQLEXPRESS")
        Dim cmd4 As New SqlCommand("Password=;Persist Security Info=True;User ID=;Initial Catalog=;Data Source=.\SQLEXPRESS")
        Dim IDs As String = ""

        For Each id As String In idCollection
            IDs += id.ToString() & ","
        Next


        Try
            'Dim strIDs As String = IDs.Substring(0, IDs.LastIndexOf(","))
            'Dim strSql As String = "Delete from Details  WHERE ID in (" & strIDs & ")"
            For i = 0 To idCollection.Count - 1

                cmd4.CommandType = CommandType.StoredProcedure
                cmd4.Parameters.AddWithValue("@IDs", CInt(idCollection(i)))
                cmd4.CommandText = "dbo.SPDeleteEmp"
                cmd4.Connection = SqlConn4
                SqlConn4.Open()
                cmd4.ExecuteNonQuery()
            Next
        Catch ex As SqlException

            Dim errorMsg As String = "Error in Deletion"
            errorMsg += ex.Message
            Throw New Exception(errorMsg)

        Finally
            SqlConn4.Close()
        End Try

    End Sub

While this works, at the moment this only deletes one checked box at a time, but does the bulk of what I needed to know. Also, thank you Carter for helping answer this question.

Patrick 2010-08-23 13:46:57

The only reason I clicked my accepted answer as the one i posted is because I have tested it. It works well except for being able to delete more than one row at a time. I suggest looking at the answer posted by Carter for more information.

Patrick 2010-08-23 13:50:04

ansaurus

tags:

views:

answers:

Using Checkbox to Delete row in Gridview with Visual Basic.net code behind and Stored Procedures

related questions