如何才能知道局域网中的某台计算机是否运行SQL server2000??(在线）

Question

比如：A机：名字Aname；地址：192.168.0.80；正在运行SQL server2000；操作系统win98
　　　B机：名字Bname；地址：192.168.0.05；没有运行SQL server2000；操作系统win98
　　　
我想在C机通过程序判断Aname正在运行SQL　server，Bname没有运行SQL server服务；
该怎么办？？

Answer 1

{=================================================================
功 能: 返回网络中SQLServer列表
参 数:
List: 需要填充的List
返回值: 成功: True,并填充List 失败 False
=================================================================}
Function GetSQLServerList(var List: Tstringlist): boolean;
var
 i: integer;
 SQLServer: Variant;
 ServerList: Variant;
begin
  Result := False;
  List.Clear;
  try
   SQLServer := CreateOleObject('SQLDMO.Application');
   ServerList := SQLServer.ListAvailableSQLServers;
   for i := 1 to Serverlist.Count do
     list.Add (Serverlist.item(i));
   Result := True;
  Finally
   SQLServer :=null;
   ServerList :=null;
  end;
end;
试试这个函数，我在网上找得。我在win98+delphi6下运行通过....

Answer 2

上面必须安装msde组件:)
如果你知道机器了，可以直接调用odbcping....

Answer 3

to  oolong(oolong) ,sql服务的协议和端口号是可以自己设置的！此法恐怕不妥吧。