如何获得局域网中所有SQL服务器的名字（包括2000和2005的）

Question

我用sqldmo可以取到2000的服务器的名字，具体代码如下：
var
demo,save: variant;
i:integer;
begin
  self.ComboBox1.Items.Clear;
  demo := createoleobject('SqlDmo.application');
  save := demo.ListAvailableSQLServers;
  for i := 1 to save.count  do
    self.ComboBox1.Items.Add(save.item(i));
  self.ComboBox1.ItemIndex := 0;
这样就可以得到局域网内的所有2000的服务器
可是2005用的是SMO，我用上面好象取不到2005的服务器的名字，只取到SQL2000的，请问如何取到同一局域网中所有SQL Server2005的服务器的名字

Answer 1

我晕，我都Google好多回了，都没有g到啊！

Answer 2

后来问题解决了没？suiyunonghen(碎羽)