Dear Saman,
Try this:-
Private Sub cmdDelete_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdHapus.Click
Dim dgItem As DataGridItem
For Each dgItem In DataGrid1.Items
Dim chkDelete As CheckBox = dgItem.FindControl("chkDelete ")
Dim IDDelete As Integer = CType(dgItem.FindControl("lblNoBorang"), Label).Text
Dim strSQL As String
If chkDelete .Checked = True Then
objConn = New SqlConnection(ConfigurationSettings.AppSettings("c onnMIOS"))
objConn.Open()
strSQL = "DELETE FROM DomestikPengesahanTerima WHERE NoBorang = " & IDDelete & " "
sqlcmd = New SqlCommand(strSQL, objConn)
sqlcmd.ExecuteNonQuery()
objConn.Close()
End If
Next
bindDataSet()
bind()
End Sub
|