헉..안부장님..! 고맙습니다. 역시..안부장님 쵝오에욤!!

이제 숙제는 델파이 소스를 c++로..ㅋㅋ

-locke

civilian 님이 쓰신 글 :
:

: uses 
:   WinSvc
: 
: procedure StopService(Nombre: String);
: var
:   ServiceControlManager: SC_HANDLE;
:   Service: SC_HANDLE;
:   ServiceStatus: SERVICE_STATUS;
: begin
:   ServiceControlManager:= OpenSCManager(nil, nil, SC_MANAGER_CONNECT);
:   if ServiceControlManager <> 0 then
:   begin
:     Service:= OpenService(ServiceControlManager,PChar(Nombre),SERVICE_ALL_ACCESS);
:     if Service <> 0 then
:     begin
:       if QueryServiceStatus(Service, ServiceStatus) then
:       begin
:         if ServiceStatus.dwCurrentState <> SERVICE_STOPPED then
:           ControlService(Service, SERVICE_CONTROL_STOP, ServiceStatus);
:       end;
:       CloseServiceHandle(Service);
:     end;
:     CloseServiceHandle(ServiceControlManager);
:   end;
: end;
: 
: procedure StartSrv(Nombre: String);
: var
:   ServiceControlManager: SC_HANDLE;
:   Service: SC_HANDLE;
:   ServiceStatus: SERVICE_STATUS;
:   Argv: PChar;
: begin
:   ServiceControlManager:= OpenSCManager(nil, nil, SC_MANAGER_CONNECT);
:   if ServiceControlManager <> 0 then
:   begin
:     Service:= OpenService(ServiceControlManager,PChar(Nombre),SERVICE_ALL_ACCESS); 
:     if Service <> 0 then
:     begin
:       if QueryServiceStatus(Service, ServiceStatus) then
:       begin
:         if ServiceStatus.dwCurrentState <> SERVICE_RUNNING then
:         begin
:           Argv:= nil;
:           StartService(Service,0,Argv);
:         end;
:       end;
:       CloseServiceHandle(Service);
:     end;
:     CloseServiceHandle(ServiceControlManager);
:   end;
: end;
: 
: // 사용방법
: 
: StartSrv('Mysql');
: StopService('Mysql');
: 

:
:
: locke 님이 쓰신 글 :
: : 질문드려요.
: :
: : 간단한 프로그램을 하나 만들어야 합니다.
: :
: : 특정 서비스 프로그램이 다운되었을때 프로세스를 죽이고 재실행시키는 프로그램입니다.
: :
: : 근데 서비스 프로그램(exe)의 경우 그냥 실행만 시켜갖고는 메모리에 로드는 되어도 동작은 안하는거 같더라구요.
: :
: : 서비스로 등록된 프로그램을 실행시킨 뒤 해당 서비스 기능을 중지하거나 실행되도록 하는 방법을 알고싶습니다.
: :
: : 이걸 어떻게 구동을 시켜야 할까요?
: :
: : -locke