delphi中如何取得同一局域网中所有(包括2000和2005的)
我用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的服务器的名字

------解决方案--------------------
参考：


用SMO列出局域网内所有的实例名

http://community.csdn.net/Expert/topic/5503/5503411.xml?temp=.6134455