with ADOConnection1 do begin
      Connected := False;
      KeepConnection := False;
      try
        ConnectionString := 'Provider=MSDASQL.1;Persist Security     
                             Info=False;Data Source=DQ120';
        KeepConnection := true;
        Connected := true;
        Result := true;
      except
        Result := false;
      end;
    end;
connected := true 以后程序占用的资源占用马上就增加五兆,我把connected := false
可是资源没有完全释放啊,ADOConnection1.free 也没用,大家帮看看阿

解决方案 »

  1.   

    ado.Destroy ,^_^
    应该可以底
      

  2.   

    connected := false时查看sqlserver中还是有这个进程,杀死之:
    select  spid  from  MASTER..sysprocesses where dbid=db_id('YDSQ')
    如果结果大于0则有进程连到YDSQ
    kill 这个spid(smallint类型的)
      

  3.   

    谢谢各位,可是我这个程序要不停的连接数据源,我断开以后,都不行啊。
    每扫描一次,做一次连接,占用的系统资源就一点点加上去,是不是ado内部的bug a ?
    请高手们多多指点阿!!!