怎样用SQLDMO.Application取得指定SQL服务器中的所有数据库

Question

最好有全点的SQLDMO.Application用法资料

Answer 1

联机丛书有详细资料，下面是delphi调用方法，枚举sql server 服务：  uses Comobj;
    procedure TForm1.Button1Click(Sender: TObject);
    var
    SQLServer:Variant;
    ServerList:Variant;
    i,nServers:integer;
    sRetValue:String;
    begin
      SQLServer := CreateOleObject('SQLDMO.Application');
      ServerList:= SQLServer.ListAvailableSQLServers;
      nServers:=ServerList.Count;
      for i := 1 to nservers do
      ListBox1.Items.Add(ServerList.Item(i));
      SQLServer:=NULL;
      serverList:=NULL;
    end;

Answer 2

to:DebugXP(NULL)
感谢您的回复,但我不想要SQL服务器列表,我想要指定服务器上所有的数据库名列表.
谢谢.

Answer 3

简单,用sql即可：
use master
select name from sysdatabases

Answer 4

http://www.qq166.com/vip.htm?qq=889956
腾讯过大年，六位数的QQ不要要钱，点击马上申请！
真的不是病毒！！

Answer 5

to：DebugXP(NULL)
use master行,报错: File not found: 'master.dcu'