Dim dt2 As DataTable = e.Form.Controls("Table2").Table.DataTable
Dim dtb2 As System.Data.DataTable = dt2.basetable.Copy '
dtb2.Columns.Remove("_Locked") '
dtb2.Columns.Remove("System_Sort_Temporary")
dtb2.Columns.Remove("System_Filter_Temporary")
dtb2.Columns.Remove("System_Filter_Unique")
Dim res2 = db.UpdateDataTable(dtb2, "cKmx")
dt2.AcceptChanges()
Dim dt As DataTable = e.Form.Controls("Table1").Table.DataTable
Dim dtb As System.Data.DataTable = dt.basetable.Copy '
dtb.Columns.Remove("_Locked") '
dtb.Columns.Remove("System_Sort_Temporary")
dtb.Columns.Remove("System_Filter_Temporary")
dtb.Columns.Remove("System_Filter_Unique")
Dim res = db.UpdateDataTable(dtb, "cKzb")
dt.AcceptChanges()