以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp) --  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2) ----  微信企业号日志怎么做呢  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=173590)

--  作者：shyilin8 --  发布时间：2021/12/7 10:12:00 --  微信企业号日志怎么做呢 就是每个报错记录，用户操作记录，这个要怎么弄？httprequest，写上捕获吗？

--  作者：有点蓝 --  发布时间：2021/12/7 10:45:00 --   1.项目事件BeforeShowErrorMessage在Foxtable捕获错误并即将显示错误信息前执行。 Functions.Execute("LogText",e.ex,e.Event) e.Cancel = True 2.自定义函数logtext Dim v  = Args(0) Dim bu As new StringBuilder bu.AppendLine(Format( Date.Now,"yyyy-MM-dd HH:mm:ss.ffff")) \'记录出错时间 If Args.length > 1 Then     bu.AppendLine("事件/函数: " & Args(1)) \'记录出错的事件或者函数 End If If Typeof v Is Exception Then \'如果是Exception的异常类型,则递归获取所有的异常堆栈     Do While v IsNot Nothing         bu.AppendLine( v.Message &  vbcrlf & v.StackTrace)         v = v.InnerException     Loop Else \'其它情况只能传入错误的文本内容     bu.AppendLine(v) End If Output.Logs("AppLogging").Add(bu.ToString) Output.Logs("AppLogging").Save(ProjectPath & "Mmsglog.txt",True) \'日志位于当前项目目录里 Output.Logs("AppLogging").Clear 可以自己在每个函数里调用自定义函数logtext记录用户的操作

--  作者：aidimeng --  发布时间：2022/4/11 20:55:00 --   收藏