Private Sub cmdCancel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdCancel.Click
    Dim crm As CurrencyManager 
    Dim row As DataRowView
    crm = Me.BindingContext(Me.grdAlertLog.DataSource, Me.grdAlertLog.DataMember)
    row = CType(crm.Current, System.Data.DataRowView)
    Try
      row("AlertState") = "C"
      crm.EndCurrentEdit()
      OleDbDataAdapter1.Update(Me.grdAlertLog.DataSource, Me.grdAlertLog.DataMember)
    Catch ex As Exception
      Me.grdAlertLog.DataSource.RejectChanges()
      MessageBox.Show(ex.Message)
    End Try

  End Sub

UPDATE AlertLog SET AlertDate = ?, AlertID = ?, AlertState = ?, AlertType = ?, MAC = ?, Value = ? 
WHERE (ID = ?) AND (AlertDate = ? OR ? IS NULL AND AlertDate IS NULL) AND
 (AlertID = ? OR ? IS NULL AND AlertID IS NULL) AND (AlertState = ? OR ? IS NULL AND AlertState IS NULL)
 AND (AlertType = ? OR ? IS NULL AND AlertType IS NULL) AND
 (MAC = ? OR ? IS NULL AND MAC IS NULL) AND (Value = ? OR ? IS NULL AND Value IS NULL)