在Delphi三层MIS中如何从服务器端获取实际执行的SQL

Question

比如SQL Server有SQL Server Profiler工具。

Answer 1

数据库提供的工具到时可以，但是太繁琐，而且对不同的数据库不够通用，目前是想实现在服务器端加入SQL跟踪功能。

Answer 2

在 Server端的 adoconnectionWillExecute 时间里捕捉也的不到完整的SQL
如图：
这个SQL是根据客户端Clientdataset的Delta异动字段拼成的SQL，只是少了列值。

Answer 3

还有其他解决办法么？
这个是客户端样图我的想法是不管客户是通过ClientDataset直传CommandText还是在感知控件更改字段值通过Delta异动传递给服务器
都能在服务器捕捉到底层执行的完整SQL
以此形成SQL跟踪的功能

Answer 4

额 这个问题深入研究下去需要读读李维的《Delphi5.X ADO/MTS/COM+高级程序设计》第4章

Answer 5

如果不用ADO，改用dbExpress就简单了。
SQLConnection -> SQLMonitor