Эта служба не возвращала ошибки - Не ошибается лишь тот, кто ничего не делает!

← →
novill ©

(2006-06-23 10:48)
[0]

Написал сервис по описанию в хелпе.

При попытке остановить процесс Винда выдает ошибку: «не удалось остановить службу. Эта служба не возвращала код ошибки. Возможно это внутренняя ошибка Windows или службы.»

После этого службу нельзя удалить (uninstall). Windows говорит что пометила ее на удаление, но до перезагрузки служба висит: ни запустить , ни остановить.

unit ServU;


interface
uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, SvcMgr, Dialogs,
  DB, IBCustomDataSet, IBQuery, IBDatabase;
type
  TDS = class(TService)
    procedure ServiceExecute(Sender: TService);
  private
    { Private declarations }
  public
    function GetServiceController: TServiceController; override;
    { Public declarations }
  end;
var
  DS: TDS;
implementation
uses mainU;
{$R *.DFM}



  


                       
  




procedure ServiceController(CtrlCode: DWord); stdcall;
begin
  DS.Controller(CtrlCode);
end;
function TDS.GetServiceController: TServiceController;
begin
  Result := ServiceController;
end;
procedure TDS.ServiceExecute(Sender: TService);
begin
     while not Self.Terminated do
      begin
       {мои процедуры}
      end;
end;
end

← →
Сергей М. ©

(2006-06-23 10:56)
[1]

Обрабатывай событие OnStop.
В этом обработчике обязательна строчка Stopped := True — тем самым ты подтверждаешь исполнение поданного тебе сервис-менеджером запроса на останов сервиса.

← →
novill ©

(2006-06-23 11:03)
[2]

Добавил:

procedure TDownloadService.ServiceStop(Sender: TService;
var Stopped: Boolean);
begin
Stopped:=true;
end;

Та же ошибка…

← →
Сергей М. ©

(2006-06-23 11:18)
[3]

Тогда показывай, что творится у тебя в

{мои процедуры}

Кстати, Self не нужен — Terminated является св-вом самого TService.

← →
novill ©

(2006-06-23 11:36)
[4]

Там творилось много чего. (Почтовый робот).
Но оказалось, что остановить невозможно сервис даже с таким телом.

procedure TDownloadService.ServiceExecute(Sender: TService);
var statfile:Text;
begin
AssignFile(statfile,»event.log»);
while not Self.Terminated do
begin
Append(statfile);
Writeln(statfile,DateTimeToStr(Now));
Flush(statfile);
SleepEx(5000,true);
end;
CloseFile(statfile);
end;

← →
Сергей М. ©

(2006-06-23 11:39)
[5]

> оказалось, что остановить невозможно сервис даже с таким
> телом.
>

Потому что вызов метода TServiceThread.ProcessRequests() у тебя напрочь отсутствует. А он ключевой во всей этой сервисной «кухне».

← →
novill ©

(2006-06-23 11:50)
[6]

спасибо

Добавил. Ошибка все равно иногда валится, но служба останавливается.

← →
novill ©

(2006-06-23 11:52)
[7]

Строчку добавил такую

ServiceThread.ProcessRequests(False);

Может, вы знаете, почему доступа к IB из сервиса может не быть?

← →
Сергей М. ©

(2006-06-23 12:01)
[8]

> почему доступа к IB из сервиса может не быть?

Об этом тебе скажет код ошибки, возвращенный ф-цией, осуществляющей «доступ»

← →
Сергей М. ©

(2006-06-23 12:09)
[9]

И, кстати, причем здесь WinAPI ?

← →
novill ©

(2006-06-23 12:38)
[10]

> Сергей М. © (23.06.06 12:09) [9]
> И, кстати, причем здесь WinAPI ?

Не знаю, я в основную писал, кто-то из админов перекинул

← →
Игорь Шевченко ©

(2006-06-23 12:39)
[11]

> И, кстати, причем здесь WinAPI ?

Если кто скажет, что проблемы с сервисами не относятся к тематике конференции «работа с системой», я перенесу ветку обратно в «основную»

← →
novill ©

(2006-06-23 12:45)
[12]

Тогда уже лучше перименовать «WinApi WinAPI» в «Система(Winapi)»

← →
Сергей М. ©

(2006-06-23 12:48)
[13]

> novill © (23.06.06 12:45) [12]

Ты на [8] отреагировал ?

← →
novill ©

(2006-06-23 13:41)
[14]

ESockError
Connection Failed

← →
novill ©

(2006-06-23 13:48)
[15]

При этом та же функция доступа из оконного приложения работает исправно.

← →
Сергей М. ©

(2006-06-23 14:04)
[16]

Сервис с какими правами запущен ? От имени какого пользователя ?

← →
novill ©

(2006-06-23 14:20)
[17]

Сначала запускал как локальную службу, потом создал запись с админскими правами и запустил от ее имени — та же история

← →
Сергей М. ©

(2006-06-23 14:25)
[18]

Какие компоненты доступа к IB используешь ?

← →
novill ©

(2006-06-23 17:34)
[19]

С доступом оказывается я ошибался — я локально подключался, а сервисы только через сеть работают, надо было через 127.0.0.1

Но не могу понять, почему выскакивает ошибка при останове сервиса
При попытки останова сервиса, процедура ServiceStop не выполняется, несмотря на то что повешена на событие onStop.

unit Unit1; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, SvcMgr, Dialogs; type TService1 = class(TService) procedure ServiceExecute(Sender: TService); procedure ServiceStop(Sender: TService; var Stopped: Boolean); procedure ServiceStart(Sender: TService; var Started: Boolean); procedure ServiceShutdown(Sender: TService); public function GetServiceController: TServiceController; override; end; var Service1: TService1; implementation {$R *.DFM} procedure ServiceController(CtrlCode: DWord); stdcall; begin Service1.Controller(CtrlCode); end;





  


                       
  




function TService1.GetServiceController: TServiceController;
begin
  Result := ServiceController;
end;
procedure TService1.ServiceExecute(Sender: TService);
var statfile:Text;
begin
   AssignFile(statfile,"event.log");
     while not Self.Terminated do
      begin
      ServiceThread.ProcessRequests(False);
      Append(statfile); Writeln(statfile,DateTimeToStr(Now));
      Flush(statfile);
      SleepEx(5000,False);
      end;
   CloseFile(statfile);
end;
procedure TService1.ServiceStop(Sender: TService; var Stopped: Boolean);
var statfile:Text;
begin
  Stopped:=true;
  AssignFile(statfile,"event.log");
  Append(statfile);
  Writeln(statfile,"ServiceStop(");
  Flush(statfile);
  CloseFile(statfile);
end;
procedure TService1.ServiceStart(Sender: TService; var Started: Boolean);
var statfile:Text;
begin
  AssignFile(statfile,"event.log");
  Append(statfile);
  Writeln(statfile,"ServiceStart(");
  Flush(statfile);
  CloseFile(statfile);
  Started:=True;
end;
procedure TService1.ServiceShutdown(Sender: TService);
var statfile:Text;
begin
  AssignFile(statfile,"event.log");
  Append(statfile);
  Writeln(statfile,"ServiceShutdown(");
  Flush(statfile);
  CloseFile(statfile);
end;
end.

← →
isasa ©

(2006-06-24 11:16)
[20]

procedure TDS.ServiceExecute(Sender: TService); while not Self.Terminated do begin ... SleepEx(5000,true); end;

Долго спим. Хотя умные люди пишут, что интервал ожидания ответа ~20сек.
У меня на болванке сервиса проблемы с закрютием начинаются со Sleep(3000).

Попробуй уменьшить время сна.

← →
isasa ©

(2006-06-24 11:31)
[21]

Отвлекли.
Или если надо выдержать именно 5000(по сну ), то что-то, вроде этого
<делаем что-то> if Self.Terminated then break; SleepEx(1000,true); <делаем что-то> if Self.Terminated then break; SleepEx(1000,true); <делаем что-то> if Self.Terminated then break; SleepEx(1000,true); <делаем что-то> if Self.Terminated then break; SleepEx(1000,true); <делаем что-то> if Self.Terminated then break; SleepEx(1000,true);
напоминает маразм, но помогает

← →
Сергей М. ©

(2006-06-25 19:10)
[22]

Давай-ка, друг ситный, бросай свои эксперименты, читай уже справку и учись использовать встр.отладчик для отладкисервисов.

си. «Debugging service applications»

← →
novill ©

(2006-06-27 10:11)
[23]

Может понадобится кому…

Проблема остановки сервиса окончательно решена только заменой
SleepEx(<большое число>,True)
на цикл
for i:=1 to CheckPeriodSec*5 do
begin
ServiceThread.ProcessRequests(False);
if Self.Terminated then break;
SleepEx(200,True);

← →
isasa ©

(2006-06-27 13:10)
[24]

У меня методом «научного тыка» получилось чуть больше — SleepEx(1000,True).
200 — это слишком часто.

← →
han_malign ©

(2006-06-27 13:40)
[25]

> У меня методом «научного тыка» получилось чуть больше

— у меня, в таких случаях, существует Event (hStop: THandle)(:=CreateEvent(…)) который устанавливается в OnStop, и WaitForSingleObject — хоть INFINITE…
И «тело» обрабатывается только если (WaitForSingleObject(hStop, dwLatency) = WAIT_TIMEOUT)…

← →
han_malign ©

(2006-06-27 13:44)
[26]

а-а-а — не поможет, погорячился…
по уму «рабочее тело» надо в отдельный поток выносить, либо действительно «квант» уменьшать…

← →
Сергей М. ©

(2006-06-27 16:01)
[27]

> по уму «рабочее тело» надо в отдельный поток выносить

Оно и так уже в отдельном потоке работает.

> novill © (27.06.06 10:11) [23]

В цикле этом достаточно сделать

ServiceThread.ProcessRequests(False);
..
Sleep(0);

Но это — для «бестолкового» цикла.

«Толковый» же цикл может и должен использовать kernel time гораздо эффективней, нежели в «бестолковом» Sleep[Ex]

← →
isasa ©

(2006-06-27 17:04)
[28]

Я так понял, идея такая. Поток при стопе, все-таки, должен «ответить»(завершиться)(вызвать SetServiceStatus (…) ) в течении ~1-2 сек.
Прибольшем интервале — проблемы.
При простейшем потоке — Sleep(3000) дает устойчивую ошибку завершения
тело ф-ции потока
swprintf_s(locbuf, MAX_LOG_STRLEN, L"%s Still running ...", pThData->srvName); LogMsg(IDS_MSG111); //Main Thread Enter while (pThData->goThread==0) { LogMsg(locbuf); ::Sleep(1000); // По задержке уже проблемы со стопом -> ::Sleep(3000); } LogMsg(IDS_MSG108); //Main Thread Exit

где
void WINAPI ServiceCtrlHandler (DWORD Opcode) { ... case SERVICE_CONTROL_STOP: case SERVICE_CONTROL_SHUTDOWN: if (thData.goThread==0) { thData.goThread = -1; // Нормальное завершение главного потока if (Opcode==SERVICE_CONTROL_STOP) { LogMsg(IDS_MSG109); //Stoped by system } else { LogMsg(IDS_MSG110); //SHUTDOWN by system } } else { // Ну если добрались до выполнения ветки - проблемы с логикой! srvStat.dwCurrentState = SERVICE_STOPPED; //С принудительным сносом главного потока? srvStat.dwWin32ExitCode = 0; srvStat.dwCheckPoint = 0; srvStat.dwWaitHint = 0; LogMsg(IDS_MSG112); //Stoped by system. Call the ExitThread function for Main Thread(memory may be lost) if (!SetServiceStatus (srvStatHandle, &srvStat)) LogMsg(IDS_MSG102, GetLastError()); } return; ...
и, соответственно, в ф-ции сервиса
void WINAPI ServiceProc(DWORD argc, LPTSTR *argv) { ... //LogMsg(IDS_MSG104); //Create Main Thread mhThread = CreateThread(NULL, 0, srvMainThread, &thData, 0, &mThId); if (mhThread!=NULL) { //LogMsg(IDS_MSG113); //Main Thread Created WaitForSingleObject(mhThread, INFINITE); CloseHandle(mhThread); LogMsg(IDS_MSG105); //Leaving DiSpy srvStat.dwCurrentState = SERVICE_STOPPED; srvStat.dwWin32ExitCode = 0; srvStat.dwCheckPoint = 0; srvStat.dwWaitHint = 0; if (!SetServiceStatus (srvStatHandle, &srvStat)) LogMsg(IDS_MSG102, GetLastError()); } else LogMsg(IDS_MSG107); //Error Create Main Thread return;

← →
novill ©

(2006-07-11 11:52)
[29]

> Сергей М.

> Но это — для «бестолкового» цикла.
>
> «Толковый» же цикл может и должен использовать kernel time
> гораздо эффективней, нежели в «бестолковом» Sleep[Ex]

Как сделать «толковый» цикл?
Если мне тело сервиса надо выполнять раз в минуту или реже

← →
tesseract ©

(2006-07-11 11:58)
[30]

> Как сделать «толковый» цикл?
> Если мне тело сервиса надо выполнять раз в минуту или реже

Делается два потока, один основной который ожидает сообщения — на исполнение или завершение, и второй, который по таймеру эти сообщения посылает основному.

Вроде на пальцах просто :-)

← →
Сергей М. ©

(2006-07-11 12:01)
[31]

> мне тело сервиса надо выполнять раз в минуту или реже

Значит нужно организовать таймер и обрабатывать сообщение WM_TIMER

← →
Nickla

(2006-10-11 15:27)
[32]

У меня другая проблема

procedure TWebShotService.ServiceExecute(Sender: TService); begin while not Terminated do begin CameraEngine.WorkCamera; ServiceThread.ProcessRequests(False); Sleep(10); end; end;

Так вот все равно ошибка вылазиет при останове. Добавил Stoped := true все равно вылазиет.

CameraEngine.WorkCamera; работает максимум 1-10мс. То есть большой задержки нет. Но ошибка периодически вылазиет.

Гдето видел альтернативный способ создания приложения. Просто ощущение что это баг ДНК TServise

← →
Nickla

(2006-10-11 15:36)
[33]

Нашел интереснейшую ссылку

http://www.achatfs.narod.ru/create_services_api.html

← →
Сергей М. ©

(2006-10-11 15:43)
[34]

> Nickla (11.10.06 15:27) [32]

Делфи-отладчик писан борландом не для Пушкина

← →
Nickla

(2006-10-13 10:01)
[35]

Удалено модератором
Примечание: Создание пустых сообщений

Содержание

Не удалось запустить службу на локальный компьютер эта служба не возвращала ошибки
Служба не запущена из-за ошибки входа
Как исправить сервис не запускался из-за ошибки входа в систему
Решение 1. Настройте службу на использование встроенной системной учетной записи.
Решение 2. Измените пароль для указанной учетной записи пользователя, чтобы он совпадал с текущим паролем для того же пользователя.
Решение 3. Восстановите право пользователя на вход в систему в качестве службы
Устранение неполадок: службы Windows не запускаются
Службы Windows не запускаются
Не удалось запустить службу на локальный компьютер эта служба не возвращала ошибки
Как выглядит ошибка 1053 служба не ответила на запрос
Список служб и программ, где вы можете увидеть ошибку 1053
Как исправить ошибку 1053
Дополнительные методы исправления ошибки 1053
Windows Служба поиска, которая не начинается с Windows службы поиска на локальном компьютере, а затем остановлена ошибка
Симптомы
Причина
Решение

Не удалось запустить службу на локальный компьютер эта служба не возвращала ошибки

Сообщения: 10692
Благодарности: 2886

1. Откройте командную строку с Административными правами. Для этого нажмите кнопку Пуск > выберите Все программы > Стандартные >
щелкните правой кнопкой мыши командную строку и выберите команду Запуск от имени администратора.
2. В командной строке введите следующую команду и нажмите клавишу ВВОД:

Если в конце проверки выйдет сообщение, что не все файлы удалось восстановить, выложите C:windowsLogsCBS CBS.log в архиве.
Если файлы будут восстановлены, перезагрузитесь и проверьте наличие проблемы.

Сделайте скриншот раздела реестра HKEY_LOCAL_MACHINESYSTEMCurrentControlSetservices MpsSvc

Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля.

Сообщения: 23
Благодарности: 1

» width=»100%» style=»BORDER-RIGHT: #719bd9 1px solid; BORDER-LEFT: #719bd9 1px solid; BORDER-BOTTOM: #719bd9 1px solid» cellpadding=»6″ cellspacing=»0″ border=»0″> » width=»100%» style=»BORDER-RIGHT: #719bd9 1px solid; BORDER-LEFT: #719bd9 1px solid; BORDER-BOTTOM: #719bd9 1px solid» cellpadding=»6″ cellspacing=»0″ border=»0″>

Сообщения: 3672
Благодарности: 1271

Сообщения: 10692
Благодарности: 2886

Дождитесь завершения восстановления хранилища.

Сообщения: 10692
Благодарности: 2886

Пожалуйста. До-редактировал, как было.
Но если хотите, чтобы sfc /scannow проходил без ошибок, придется проделать пункт с восстановлением из установочного образа или диска.

» width=»100%» style=»BORDER-RIGHT: #719bd9 1px solid; BORDER-LEFT: #719bd9 1px solid; BORDER-BOTTOM: #719bd9 1px solid» cellpadding=»6″ cellspacing=»0″ border=»0″>

Читайте также: представление данных в памяти персонального компьютера графика

Служба не запущена из-за ошибки входа

Когда вы страдаете от того, что служба не запускается из-за ошибки входа в систему, особенно при перезапуске сервера Windows, проблема обычно связана с изменением пароля для профиля, используемого агентом SQL Server.

Однако иногда пароль может оставаться прежним, и вы уверены, что не вносили никаких изменений.

В дополнение к этому вы устали менять используемое имя входа и возвращать его обратно в исходное доменное имя, которое вы не можете делать каждый раз, когда что-то идет не так.

Выше может произойти из-за:

Не нужно беспокоиться об этом, поскольку у нас есть только правильные решения для решения проблем, при которых служба не запускалась из-за ошибки входа в систему, ознакомьтесь с приведенными ниже решениями.

Как исправить сервис не запускался из-за ошибки входа в систему

Решение 1. Настройте службу на использование встроенной системной учетной записи.

Если служба не запустилась из-за ошибки входа в систему, настройте ее на запуск со встроенной системной учетной записью, выполнив следующие действия:

Это может произойти, если служба RPC не запущена из-за сбоя входа в систему со службой или службы зависимостей, поскольку некоторым приходится ждать запуска своих служб зависимостей, прежде чем они сами запустятся.

Решение 2. Измените пароль для указанной учетной записи пользователя, чтобы он совпадал с текущим паролем для того же пользователя.

Вот как настроить пароль для указанной учетной записи пользователя, чтобы он соответствовал текущему паролю для этого пользователя:

ТАКЖЕ ПРОЧИТАЙТЕ: лучшее программное обеспечение для восстановления паролей в Windows 7, которое сэкономит вам время

Решение 3. Восстановите право пользователя на вход в систему в качестве службы

Если право на вход в систему в качестве службы аннулировано для учетной записи пользователя, восстановите его на контроллере домена или рядовом сервере (автономно) в зависимости от вашей ситуации.

Как восстановить права пользователя на контроллере домена

Вот как это сделать, если пользователь находится в домене Active Directory:

Как восстановить права пользователя на рядовом сервере (автономно)

Вот как это сделать, если пользователь является участником автономного рядового сервера:

Помогло ли какое-либо из приведенных выше решений исправить службу, не запущенную из-за ошибки входа в систему? Дайте нам знать ваш опыт в разделе комментариев ниже.

Источник

Службы Windows – это приложения, которые обычно запускаются при загрузке компьютера и работают в фоновом режиме, пока он не выключится. Строго говоря, сервис – это любое приложение Windows, реализованное с помощью API сервисов. Однако службы обычно обрабатывают задачи низкого уровня, которые практически не требуют взаимодействия с пользователем.

Службы Windows не запускаются

Перед началом работы создайте точку восстановления системы вручную.

2] Загрузитесь в безопасном режиме и посмотрите, запускается ли служба. Часто службы или драйверы сторонних производителей могут мешать нормальному функционированию системных служб. В качестве альтернативы вы также можете выполнить Чистую загрузку и проверить.

3] Запустите проверку системных файлов, т.е. Запустите sfc/scannow из командной строки с повышенными привилегиями. Перезагрузитесь после завершения и проверьте. Пользователи Windows 10/8.1 могут восстановить свой образ системы Windows и посмотреть, поможет ли это.

4] Если у вас возникли проблемы с запуском определенных служб, проверьте, может ли какая-либо из этих публикаций помочь вам:

5] Если вы столкнулись с проблемой в системе Windows 7 или Windows Server 2008 R2 с пакетом обновления 1 (SP1), когда после установки приложения возникает большая задержка, прежде чем все службы будут готовы, посетите KB2839217 и запросите исправление. Обычно это происходит, когда приложение создает файл, имя файла которого длиннее 127 символов.

6] Если вы получили сообщение об ошибке «Windows не удалось запустить брандмауэр Windows, DHCP-клиент или политику диагностики на локальном компьютере в Windows 7 или Windows Vista», примените это исправление из KB943996.

7] Посмотрите, поможет ли вам восстановление Windows, если ранее использовалась хорошая точка восстановления системы.

8] Если ничего не помогает, вам, возможно, придется подумать о восстановлении Windows 7 или об использовании Refresh или Reset PC в Windows 10/8.

Связанное чтение:

SMART, Windows Tweaker, является нашей бесплатной утилитой, которая помогает настроить Windows Services на основе предложенных конфигураций BlackVipers, а также позволяет сбросить значения Services до значений по умолчанию. Вы можете проверить это!

Источник

Не удалось запустить службу на локальный компьютер эта служба не возвращала ошибки

Добрый день! Уважаемые читатели и гости, крупного IT ресурса Pyatilistnik.org. В прошлый раз мы с вами разобрали проблему с кодом 43 и сбоем запроса дескриптора, сегодня хочу вам показать еще один неприятный момент, который я встретил на Windows Server 2012 R2, но он встречается и на других платформах. Смысл глюка в том, что у вас появляется ошибка запуска службы код 1053, или еще может быть формулировка, что служба не ответила на запрос. Это не позволяет вашему приложению запуститься и работать, мы рассмотрим основные причины подобного поведения и устраним их.

Как выглядит ошибка 1053 служба не ответила на запрос

Небольшая предыстория. Я продолжаю процесс виртуализации старого парка физических серверов, для этого я использую утилиту P2V VMware vCenter Converter Standalone 6.2. Все шло как обычно, я накатил утилиту и попытался ее запустить, у меня долго не появлялось окно программы. Через некоторое время у меня возникла на экране ошибка:

В сообщении сообщается, что служба конвертера не запущена, хотите ли вы ее запустить, я выбираю конечно да. Через секунд 30 появляется второе окно вот с таким текстом:

Нам говорят, что служба конвертера не может быть запущена. В оснастке «Службы», вы можете наблюдать три службы VMware vCenter Converter.

Пробую запустить службу приложения в ручном режиме, через правый клик, но выскакивает предупреждение:

В русском варианте, это выглядит вот так:

Ошибка 1053: служба не ответила на запрос запуска или управления своевременно.

Список служб и программ, где вы можете увидеть ошибку 1053

Давайте я вам приведу список с примерами, где вы можете увидеть ответ службы. что она не ответила

Как видите разброс проблем очень большой и разнообразный, то же самое касается и операционных систем, вы это легко увидите и на клиентских Windows 7 или Windows 10, так и на серверных Windows Server 2012 R2 и выше.

Как исправить ошибку 1053

Давайте я вам покажу, как я исправлял код ошибки 1053, в случае с утилитой Vmware vCenter Converter Standalone, но описанная методика подойдет и для других служб и программ.

У вас откроется оснастка со всеми службами, которые есть в операционной системе. Вы находите нужную, которая в вашем случае выдавала сообщение «не запускается служба ошибка 1053», и пробуете ее стартануть в ручном режиме. Для этого вы щелкаете по ней правой кнопкой мыши и из контекстного меню выбираете пункт «Запустить». В некоторых случаях, это может помочь, как ни странно, но это был не мой случай.

Закрываем данное окно и в списке сервисов, ищем нужную нам зависимую, напоминаю у меня, это сервис «Рабочая станция». У меня как видите она оказалась запущенной, если у вас зависимая служба выключена, то пробуйте ее запустить и когда она заработает, пробуйте стартануть основную.

У себя я заметил, что первый из DNS серверов, какой-то странный не знакомый мне, видимо кто-то ранее его прописал. Пробую проверить его сетевую доступность, через команду ping и заодно узнать его имя.

У меня он не отвечал, я так же попробовал разрезолвить имя данного сервера, где я получал ошибку, его ip-адрес в моем примере заканчивается на 157, имя определилось, значит второй DNS сервер, все обрабатывал корректно, первый я поправил. Если у вас доменный компьютер, то убедитесь, чтобы имена разрешались, через IP. Идем искать решение дальше.

Тут необходимо создать параметр DWORD32 с именем ServicesPipeTimeout и дать ему числовое значение в секундах,

например пять минут, это 3000.

В 90% случаев у вас ошибка 1053 служба не ответила своевременно, пройдет. Еще видел ситуацию, что после перезагрузки, те службы что идут с отложенным запуском, могут запускаться немного дольше обычного, иногда их даже приходится стартовать вручную, но зато они работают. Мне лично, этот метод помог с Vmware vCenter Converter Standalone.

Дополнительные методы исправления ошибки 1053

К сожалению трюк с ключом реестра срабатывает не всегда и не со всем софтом, в 10% случаев вы все будите видеть предупреждение «сервис не ответил своевременно на запрос», тут я приведу некий чек-лист который позволит вам устранить причину.

Источник

Windows Служба поиска, которая не начинается с Windows службы поиска на локальном компьютере, а затем остановлена ошибка

В этой статье содержится решение для решения ошибки, которая возникает при попытке запустить службу Windows поиска.

Применяется к: Windows 10 — все выпуски
Исходный номер КБ: 2484025

Симптомы

Windows Служба поиска не начинается, и при попытке запуска службы вручную вы получаете сообщение об ошибке:

========
Службы
========
«Служба Windows поиска на локальном компьютере запущена, а затем остановлена. Некоторые службы автоматически останавливаются, если они не используются другими службами или программами»
===
OK
===

Причина

Вы можете увидеть эту проблему, если отсутствуют подкайки или записи реестра в следующем расположении реестра:

Или если есть поврежденные файлы журнала в следующем расположении:

Вышеуказанный ключ regisrty является уникальным для каждой машины, поэтому не следует заменять вручную.

Решение

Файлы в вышеупомянутом расположении папки скрыты и, таким образом, не будут видны, если не установить систему, чтобы не скрывать защищенные файлы операционной системы в параметрах папки > Tools.

После удаления этих файлов перезагружаем машину. После перезагрузки наблюдайте, что Windows служба поиска уже запущена и находится в процессе восстановления индекса.

При восстановлении индекса поиска можно наблюдать высокий ЦП.

Источник

Adblock
detector

Источник

Доброго времени суток есть сервер со специализированным ПО, которое опрашивает оборудование по определенным сетевым портам. Сервер работает на windows server 2008r2. Нужно переустановить одну службу, разработчик ПО рекомендует именно удалить службу затем установить заново. Только проблема в том что служба в каком то непонятном состоянии. остановить ее не получается, запустить тоже. При попытке запуска появляется сообщение с ошибкой:

Не удалось запустить службу teleofis на Локальный компьютер. Эта служба не возвращала ошибки. Возможно это внутренняя ошибка Windows или внутренняя ошибка службы. Если проблема не исчезает обратитесь к системному администратору

Подскажите из-за чего такие глюки могут происходить? Что делать техподдержка разработчика внятного ничего не дает… :unsure:

Хм, попробуйте проверить от имени какого пользователя запускается служба

Хм, попробуйте проверить от имени какого пользователя запускается служба

пробовал — менял, запускал от имени админа — бестолку. Сервер перезагрузал — все тщетно

Может ли это быть кривой код разработчиков или баг ?? :mad:

Может ли это быть кривой код разработчиков или баг ??

Легко🤷‍♂️

после удаления службы и установки заново служба в статусе Приостановка. И это после удаления и установки службы заново. Где-то остаются следы этой службы или параметры. Где в windows хранятся данные службы (подозреваю что в реестре)
Попробую еще посмотреть статус службы через powershell
get-service wuauserv | select Displayname,Status,Can*

после удаления службы и установки заново служба в статусе Приостановка. И это после удаления и установки службы заново. Где-то остаются следы этой службы или параметры. Где в windows хранятся данные службы (подозреваю что в реестре)
Попробую еще посмотреть статус службы через powershell
get-service wuauserv | select Displayname,Status,Can*

Попробуйте
get-service | where-object {$_.Status -eq "Paused"} | resume-service

не а.. :cautious: Ошибка при возобновлении службы

Попробуйте грохнуть службу — вы говорили что можете. Затем в ветке реестра поищите — осталось ли там что то или нет
HKEY_LOCAL_MACHINESYSTEMCurrentControlSetServices

Источник

← →
novill ©

(2006-06-23 10:48)
[0]

Написал сервис по описанию в хелпе.

unit ServU;


interface
uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, SvcMgr, Dialogs,
  DB, IBCustomDataSet, IBQuery, IBDatabase;
type
  TDS = class(TService)
    procedure ServiceExecute(Sender: TService);
  private
    { Private declarations }
  public
    function GetServiceController: TServiceController; override;
    { Public declarations }
  end;
var
  DS: TDS;
implementation
uses mainU;
{$R *.DFM}
procedure ServiceController(CtrlCode: DWord); stdcall;
begin
  DS.Controller(CtrlCode);
end;
function TDS.GetServiceController: TServiceController;
begin
  Result := ServiceController;
end;
procedure TDS.ServiceExecute(Sender: TService);
begin
     while not Self.Terminated do
      begin
       {мои процедуры}
      end;
end;
end

← →
Сергей М. ©

(2006-06-23 10:56)
[1]

← →
novill ©

(2006-06-23 11:03)
[2]

Добавил:

procedure TDownloadService.ServiceStop(Sender: TService;
var Stopped: Boolean);
begin
Stopped:=true;
end;

Та же ошибка…

← →
Сергей М. ©

(2006-06-23 11:18)
[3]

Тогда показывай, что творится у тебя в

{мои процедуры}

Кстати, Self не нужен — Terminated является св-вом самого TService.

← →
novill ©

(2006-06-23 11:36)
[4]

Там творилось много чего. (Почтовый робот).
Но оказалось, что остановить невозможно сервис даже с таким телом.

← →
Сергей М. ©

(2006-06-23 11:39)
[5]

> оказалось, что остановить невозможно сервис даже с таким
> телом.
>

← →
novill ©

(2006-06-23 11:50)
[6]

спасибо

Добавил. Ошибка все равно иногда валится, но служба останавливается.

← →
novill ©

(2006-06-23 11:52)
[7]

Строчку добавил такую

ServiceThread.ProcessRequests(False);

Может, вы знаете, почему доступа к IB из сервиса может не быть?

← →
Сергей М. ©

(2006-06-23 12:01)
[8]

> почему доступа к IB из сервиса может не быть?

Об этом тебе скажет код ошибки, возвращенный ф-цией, осуществляющей «доступ»

← →
Сергей М. ©

(2006-06-23 12:09)
[9]

И, кстати, причем здесь WinAPI ?

← →
novill ©

(2006-06-23 12:38)
[10]

> Сергей М. © (23.06.06 12:09) [9]
> И, кстати, причем здесь WinAPI ?

Не знаю, я в основную писал, кто-то из админов перекинул

← →
Игорь Шевченко ©

(2006-06-23 12:39)
[11]

> И, кстати, причем здесь WinAPI ?

← →
novill ©

(2006-06-23 12:45)
[12]

Тогда уже лучше перименовать «WinApi WinAPI» в «Система(Winapi)»

← →
Сергей М. ©

(2006-06-23 12:48)
[13]

> novill © (23.06.06 12:45) [12]

Ты на [8] отреагировал ?

← →
novill ©

(2006-06-23 13:41)
[14]

ESockError
Connection Failed

← →
novill ©

(2006-06-23 13:48)
[15]

При этом та же функция доступа из оконного приложения работает исправно.

← →
Сергей М. ©

(2006-06-23 14:04)
[16]

Сервис с какими правами запущен ? От имени какого пользователя ?

← →
novill ©

(2006-06-23 14:20)
[17]

← →
Сергей М. ©

(2006-06-23 14:25)
[18]

Какие компоненты доступа к IB используешь ?

← →
novill ©

(2006-06-23 17:34)
[19]


function TService1.GetServiceController: TServiceController;
begin
  Result := ServiceController;
end;
procedure TService1.ServiceExecute(Sender: TService);
var statfile:Text;
begin
   AssignFile(statfile,"event.log");
     while not Self.Terminated do
      begin
      ServiceThread.ProcessRequests(False);
      Append(statfile); Writeln(statfile,DateTimeToStr(Now));
      Flush(statfile);
      SleepEx(5000,False);
      end;
   CloseFile(statfile);
end;
procedure TService1.ServiceStop(Sender: TService; var Stopped: Boolean);
var statfile:Text;
begin
  Stopped:=true;
  AssignFile(statfile,"event.log");
  Append(statfile);
  Writeln(statfile,"ServiceStop(");
  Flush(statfile);
  CloseFile(statfile);
end;
procedure TService1.ServiceStart(Sender: TService; var Started: Boolean);
var statfile:Text;
begin
  AssignFile(statfile,"event.log");
  Append(statfile);
  Writeln(statfile,"ServiceStart(");
  Flush(statfile);
  CloseFile(statfile);
  Started:=True;
end;
procedure TService1.ServiceShutdown(Sender: TService);
var statfile:Text;
begin
  AssignFile(statfile,"event.log");
  Append(statfile);
  Writeln(statfile,"ServiceShutdown(");
  Flush(statfile);
  CloseFile(statfile);
end;
end.

← →
isasa ©

(2006-06-24 11:16)
[20]

procedure TDS.ServiceExecute(Sender: TService); while not Self.Terminated do begin ... SleepEx(5000,true); end;

Попробуй уменьшить время сна.

← →
isasa ©

(2006-06-24 11:31)
[21]

← →
Сергей М. ©

(2006-06-25 19:10)
[22]

си. «Debugging service applications»

← →
novill ©

(2006-06-27 10:11)
[23]

Может понадобится кому…

← →
isasa ©

(2006-06-27 13:10)
[24]

У меня методом «научного тыка» получилось чуть больше — SleepEx(1000,True).
200 — это слишком часто.

← →
han_malign ©

(2006-06-27 13:40)
[25]

> по уму «рабочее тело» надо в отдельный поток выносить

Оно и так уже в отдельном потоке работает.

В цикле этом достаточно сделать

ServiceThread.ProcessRequests(False);
..
Sleep(0);

Но это — для «бестолкового» цикла.

«Толковый» же цикл может и должен использовать kernel time гораздо эффективней, нежели в «бестолковом» Sleep[Ex]

Вроде на пальцах просто

> мне тело сервиса надо выполнять раз в минуту или реже

Значит нужно организовать таймер и обрабатывать сообщение WM_TIMER

← →
Nickla

(2006-10-11 15:27)
[32]

У меня другая проблема

procedure TWebShotService.ServiceExecute(Sender: TService); begin while not Terminated do begin CameraEngine.WorkCamera; ServiceThread.ProcessRequests(False); Sleep(10); end; end;

Так вот все равно ошибка вылазиет при останове. Добавил Stoped := true все равно вылазиет.

CameraEngine.WorkCamera; работает максимум 1-10мс. То есть большой задержки нет. Но ошибка периодически вылазиет.

Гдето видел альтернативный способ создания приложения. Просто ощущение что это баг ДНК TServise

← →
Nickla

(2006-10-11 15:36)
[33]

Нашел интереснейшую ссылку

http://www.achatfs.narod.ru/create_services_api.html

> Nickla (11.10.06 15:27) [32]

Делфи-отладчик писан борландом не для Пушкина

← →
Nickla

(2006-10-13 10:01)
[35]

Удалено модератором
Примечание: Создание пустых сообщений

Источник

Содержание

Не удалось запустить службу на локальный компьютер эта служба не возвращала ошибки
Служба не запущена из-за ошибки входа
Как исправить сервис не запускался из-за ошибки входа в систему
Решение 1. Настройте службу на использование встроенной системной учетной записи.
Решение 2. Измените пароль для указанной учетной записи пользователя, чтобы он совпадал с текущим паролем для того же пользователя.
Решение 3. Восстановите право пользователя на вход в систему в качестве службы
Устранение неполадок: службы Windows не запускаются
Службы Windows не запускаются
Не удалось запустить службу на локальный компьютер эта служба не возвращала ошибки
Как выглядит ошибка 1053 служба не ответила на запрос
Список служб и программ, где вы можете увидеть ошибку 1053
Как исправить ошибку 1053
Дополнительные методы исправления ошибки 1053
Windows Служба поиска, которая не начинается с Windows службы поиска на локальном компьютере, а затем остановлена ошибка
Симптомы
Причина
Решение

Не удалось запустить службу на локальный компьютер эта служба не возвращала ошибки

Сообщения: 10692
Благодарности: 2886

Сделайте скриншот раздела реестра HKEY_LOCAL_MACHINESYSTEMCurrentControlSetservices MpsSvc

Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля.

Сообщения: 23
Благодарности: 1

» width=»100%» style=»BORDER-RIGHT: #719bd9 1px solid; BORDER-LEFT: #719bd9 1px solid; BORDER-BOTTOM: #719bd9 1px solid» cellpadding=»6″ cellspacing=»0″ border=»0″>

Сообщения: 3672
Благодарности: 1271

Сообщения: 10692
Благодарности: 2886

Дождитесь завершения восстановления хранилища.

Сообщения: 10692
Благодарности: 2886

» width=»100%» style=»BORDER-RIGHT: #719bd9 1px solid; BORDER-LEFT: #719bd9 1px solid; BORDER-BOTTOM: #719bd9 1px solid» cellpadding=»6″ cellspacing=»0″ border=»0″>

Сообщения: 23
Благодарности: 1

Служба не запущена из-за ошибки входа

Однако иногда пароль может оставаться прежним, и вы уверены, что не вносили никаких изменений.

Выше может произойти из-за:

Как исправить сервис не запускался из-за ошибки входа в систему

Решение 1. Настройте службу на использование встроенной системной учетной записи.

Решение 2. Измените пароль для указанной учетной записи пользователя, чтобы он совпадал с текущим паролем для того же пользователя.

Решение 3. Восстановите право пользователя на вход в систему в качестве службы

Как восстановить права пользователя на контроллере домена

Вот как это сделать, если пользователь находится в домене Active Directory:

Как восстановить права пользователя на рядовом сервере (автономно)

Вот как это сделать, если пользователь является участником автономного рядового сервера:

Источник

Устранение неполадок: службы Windows не запускаются

Службы Windows не запускаются

Перед началом работы создайте точку восстановления системы вручную.

Связанное чтение:

Источник

Не удалось запустить службу на локальный компьютер эта служба не возвращала ошибки

Как выглядит ошибка 1053 служба не ответила на запрос

Пробую запустить службу приложения в ручном режиме, через правый клик, но выскакивает предупреждение:

В русском варианте, это выглядит вот так:

Ошибка 1053: служба не ответила на запрос запуска или управления своевременно.

Список служб и программ, где вы можете увидеть ошибку 1053

Давайте я вам приведу список с примерами, где вы можете увидеть ответ службы. что она не ответила

Как исправить ошибку 1053

Тут необходимо создать параметр DWORD32 с именем ServicesPipeTimeout и дать ему числовое значение в секундах,

например пять минут, это 3000.

Дополнительные методы исправления ошибки 1053

Источник

Windows Служба поиска, которая не начинается с Windows службы поиска на локальном компьютере, а затем остановлена ошибка

Применяется к: Windows 10 — все выпуски
Исходный номер КБ: 2484025

Симптомы

Windows Служба поиска не начинается, и при попытке запуска службы вручную вы получаете сообщение об ошибке:

========
Службы
========
«Служба Windows поиска на локальном компьютере запущена, а затем остановлена. Некоторые службы автоматически останавливаются, если они не используются другими службами или программами»
===
OK
===

Причина

Или если есть поврежденные файлы журнала в следующем расположении:

Вышеуказанный ключ regisrty является уникальным для каждой машины, поэтому не следует заменять вручную.

Решение

При восстановлении индекса поиска можно наблюдать высокий ЦП.

Источник

07.12.2015 20:04

Откройте диспетчер задач (Ctrl + Alt + Del) — Службы. В открывшемся списке щелкните правой кнопкой мыши по любой службе и выберите пункт «Запустить службы«.

Появится окно со всеми службами. Вам необходимо найти:

— Problem Reports and Solution Control Panel Support (Поддержка элемента панели управления «Отчеты о проблемах и их решение»)

— Windows Error Report Service (Служба регистрации ошибок Windows)

Как только найдете — отключайте, так как именно из-за их работы мигает рабочий стол.

15.02.2016 13:02

Спасибо большое!!!!

Помогло на 10-ке. А я уже было хотел откат системы делать и биос перепрошивать…

22.04.2016 14:11

К сожалению, мне не помогло Not so (

07.06.2016 14:31

Мне тоже не помогло. Остановил службы, но после перезагрузки — все по новой. Удалил ESET — тоже не помогает. Задолбало это мигание.

09.06.2016 10:31

У меня тоже было,я просто выключил комп, поменял видеокарту на другую и все прекратилось.

08.08.2016 14:10

К сожалению, мне не помогло (

У меня тоже все отключено, а все равно моргает!!!

В ответ на сообщение от Гость
#153954

30.08.2016 13:46

Возможно виноват параметр «Имитация вспышки» и нужно его отключить.

10.10.2016 11:17

По службам — у меня они были отключены. Включил, отключил обратно — помогло.
Шаманство аданко Well

07.12.2016 14:04

Midnight Rain

Откройте диспетчер задач (Ctrl + Alt + Del) — Службы. В открывшемся списке щелкните правой кнопкой мыши по любой службе и выберите пункт «Запустить службы«.

Появится окно со всеми службами. Вам необходимо найти:

— Problem Reports and Solution Control Panel Support (Поддержка элемента панели управления «Отчеты о проблемах и их решение»)

— Windows Error Report Service (Служба регистрации ошибок Windows)

Как только найдете — отключайте, так как именно из-за их работы мигает рабочий стол.

После всех манипуляций нужно перезагрузить ПК.
Помогло спасибо!

В ответ на сообщение от Midnight Rain
#143887

26.12.2016 09:31

Добрый день!
Попробовал вариант со службами
Поддержка элемента панели управления «Отчеты о проблемах и их решение — эта служба была отключена
Служба регистрации ошибок Windows — пытаюсь отключить, выдает ошибку — Не удалось остановить службу Служба регистрации ошибок Windows на Локальный компьютер. Эта служба не возвращала ошибки. Возможно это внутренняя ошибка Windows или внутренняя ошибка службы. Если проблема не исчезнет, обратитесь к системному администратору.

Что делать дальше?

10.05.2017 11:28

У меня помогло удаление «Яндекс строка». И браузер тоже в помойку выкинул!

22.05.2017 08:52

Здравствуйте!
Поддержка элемента панели управления «Отчеты о проблемах и их решение — эта служба была отключена.
Служба регистрации ошибок Windows отключаю, через несколько секунд опять включается. А раб. стол как мигал так и мигает.

05.06.2017 06:54

мне помогло удаление последних обновлений

27.10.2017 20:27

Даниил

Добрый день!
Попробовал вариант со службами
Поддержка элемента панели управления «Отчеты о проблемах и их решение — эта служба была отключена
Служба регистрации ошибок Windows — пытаюсь отключить, выдает ошибку — Не удалось остановить службу Служба регистрации ошибок Windows на Локальный компьютер. Эта служба не возвращала ошибки. Возможно это внутренняя ошибка Windows или внутренняя ошибка службы. Если проблема не исчезнет, обратитесь к системному администратору.

Что делать дальше?

я сначала сделал ПРИОСТАНОВИТЬ. а уже потом остановил.

В ответ на сообщение от Даниил
#167429

31.10.2017 16:37

После автообновления виндовс 10,рабочий стол обновляется каждую секунду,в связи с этим,не могу ничего сделать,даже «пуск» не успеваю нажать,точки восстановления тоже нет,т.к.были отключены(((как быть?переустанавливать???

26.02.2019 09:44

У меня моргал экран потому что установлет StarIsBack. Windows обновился, и та версия StarIsBack которая была вызывает сбой. Нужно запустить диспетчер задач (он не моргает у меня) и в нем запустить новую задачу — установить свежий StarIsBack или с помощью установщика удалить его.

10.06.2021 07:43

Гость

У меня моргал экран потому что установлет StarIsBack. Windows обновился, и та версия StarIsBack которая была вызывает сбой. Нужно запустить диспетчер задач (он не моргает у меня) и в нем запустить новую задачу — установить свежий StarIsBack или с помощью установщика удалить его.

У меня также было, вместо обновления можно просто надо в настройках убрать галку «Переключение—Использовать фирменную панель переходов для панели задач»

В ответ на сообщение от Гость
#202908

Источник