摘要:来源:http://www.itpub.net/thread-193247-1-1.html 先保存,以后研究一下 1 *--获取连接SQL服务器的信息 2 3 所有连接本机的:操作的数据库名,计算机名,用户名,网卡物理地址,IP地址,程序名 4 -*/ 5 6 /*--调用示例 7 --显示所有本
阅读全文
04 2022 档案
摘要:此处代码只是测试代码,仅仅是测试 //环境:D7+SQL Server 2008 1 unit Unit1; 2 3 interface 4 5 uses 6 Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Fo
阅读全文
摘要:1 --这样是不行的 2 select sys.dm_exec_sql_text(most_recent_sql_handle) from sys.dm_exec_connections 3 4 --这个可以 5 select text from sys.dm_exec_connections a
阅读全文
摘要:D7 1 unit Unit1; 2 3 interface 4 5 uses 6 Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, 7 Dialogs, StdCtrls; 8 9 type 10
阅读全文
摘要:1. 不可思议的函数调用--开始- 开发环境D7 1 function TForm1.GetssA: string; 2 begin 3 Result:=Result+'AA'; 4 end; 5 6 procedure TForm1.Button1Click(Sender: TObject); 7
阅读全文