تشخیص stop بودن sqlserver

[سیروس مقصودی]

با سلام

از طریق کد نویسی چگونه میتوان تشخیص داد که sqlserver متوقف شده یا نه ؟

با تشکر

[Touska]

می تونی از لیست سرویس های ویندوز سرویس SQL رو پیدا کنی - و چک کنی Start هست یا نه.

[سیروس مقصودی]

می تونی از لیست سرویس های ویندوز سرویس SQL رو پیدا کنی - و چک کنی Start هست یا نه

نحوه انجام همین کار را نمیدانم . چگونه بایستی این کار را انجام دهم ؟ من میخوام از طریق کد نویسی اینکار را انجام دهم

با تشکر

[Touska]

من از این یونیت استفاده کردم - کار می کنه مشکلی نداره.

Detect windows service state

[ابوالفضل عباسی]

uses  Winapi.WinSvc, Vcl.SvcMgr;





function IsMSSQLServerRunning: Boolean;

var

  ServiceManager: TServiceManager;

  SQLService: TService;

begin

  Result := False;

  ServiceManager := TServiceManager.Create(nil);

  SQLService := TService.Create(nil);





  try

    ServiceManager.Access := SERVICE_QUERY_STATUS;

    SQLService.ServiceName := 'MSSQLSERVER'; // نام سرویس MSSQLServer





    if ServiceManager.Connect then

    begin

      try

        if SQLService.Open then

        begin

          try

            Result := (SQLService.Status = SERVICE_RUNNING);

          finally

            SQLService.Close;

          end;

        end;

      finally

        ServiceManager.Disconnect;

      end;

    end;

  finally

    ServiceManager.Free;

    SQLService.Free;

  end;

end;