以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  动态日志数据写入报错  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=191042)

--  作者：yifan3429 --  发布时间：2024/3/23 1:28:00 --  动态日志数据写入报错 Dim cmd As New SQLComm and Dim dt As DataTable cmd.ConnectionN ame = "2022" cmd.CommandTex t = "SEL ECT * Fr om {系统_数据操作日志}" wdt = cmd.Execut eReader(True) If e.DataTable.Name <> "系统_数据操作日志" Then                   If e.DataRow.RowState = 2 Then                 Return             Else                 Dim dr As DataRow = DataTables("系统_数据操作日志").AddNew                 dr("ID") = e.DataRow("_Identify")                 dr("用户") = _UserName                  dr("涉及表") = e.DataTable.Name                 dr("涉及列") = e.DataCol.Name                 dr("涉及行") = e.DataRow("_Identify")                 dr("日期") = Date.Now                 dr("操作") = """" & e.OldValue & """ 改成了 """ & e.NewValue & """"                 Dim str As String = ""                 For Each c As DataCol In e.DataTable.DataCols                     str += c.Name & "=" & e.DataRow(c.Name) & "|"                 Next                 dr("原行数据") = str             End If      End If

--  作者：有点蓝 --  发布时间：2024/3/23 9:38:00 --   报什么错？http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=150626