文章
· 六月 30 阅读大约需 1 分钟

使用代码读取审计日志

你可以使用List query 对 %SYS.Audit 查询审计日志,代码如下:

 Set statement=##class(%SQL.Statement).%New()  
 Set status=statement.%PrepareClassQuery("%SYS.Audit","List")
 Set rs=statement.%Execute()  
 Set tab = $char(9)
 While rs.%Next() {    
   Write rs.%Get("TimeStamp")_tab_rs.%Get("Event")_tab_rs.%Get("Username"),!      
 }
讨论 (0)1
登录或注册以继续