如何判断一个机器的MSSQL是否启动

//判断一个机器的MSSQL是否启动,通过SQL DMO是可以的,但对于没有装MSSQL的客户端来说就没办法,此处用的是连接MSSQL的1433端口,如果端口号不同,可以通过传递端口.
unit Judge_U;

interface
uses
  SysUtils, Classes, IdBaseComponent, IdComponent, IdTCPConnection, IdIcmpClient,
  IdTCPClient, IdRawBase, IdRawClient;


  function JudgePort(AServerName: PChar; APort: Integer): Boolean;
  function JudgePing(AServerName: PChar): Boolean;
implementation

function JudgePing(AServerName: PChar): Boolean;//这个是用来PIN计算机的.
var
  ICMP: TIdIcmpClient;
begin
  ICMP := TIdIcmpClient.Create(nil);
  ICMP.ReceiveTimeout := 1000;
  ICMP.Host := AServerName;
  try
    ICMP.Ping;
    Result := True;
  except
    Result := False;
  end;
  ICMP.Free;   
end;

function JudgePort(AServerName: PChar; APort: Integer): Boolean;
var
  IdTCPClient1: TIdTCPClient;
begin
  IdTCPClient1 := TIdTCPClient.Create(nil);
  IdTCPClient1.Host := AServerName;
  IdTCPClient1.Port := APort;
  try
    IdTCPClient1.Connect;
    Result := True;
    IdTCPClient1.Disconnect;
  except
    Result := False;
  end;
  IdTCPClient1.Free;
end;

end.
//有以下已知的BUG.
  //1  如果一台计算机上安装了多个实例.
  //2  如果不用TCP/IP协议,而用其它的连接方式,比如典型的命名管道,就无法判断.

评论 2
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值