主题：在保存成功后记录被修改的记录信息

我在BeforeSaveDataRow这样写合适吗？

Dim dra As DataRow = DataTables("审计事件").AddNew

dra("GUID") = Vars("_Guid")

dra("用户") = Vars("_Username")

dra("用户名") = Vars("_Chname")

dra.Save

Dim name As New List (Of String) From {"姓名", "用户名", "密码", "用户类型", "创建日期", "禁用", "禁用日期"}

For i = 0 To 6

    Dim dr As DataRow = DataTables("审计_变更明细").AddNew

        dr("GUID") = Vars("_Guid")

        dr("属性名称") = e.DataTable.DataCols(name(i)).Name

        If e.DataRow(name(i)) = e.DataRow.OriginalValue(name(i)) Then

            Else

        dr("变更前") = e.DataRow.OriginalValue(name(i)) 

        dr("变更后") = e.DataRow(name(i)) 

        End If

         dr.Save

Next

DataColChanged 是一只要一修改了就会记录 不知道怎么处理保存后才记录。