![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Установка сервиса [D5, Win2k]
Донской © (2002-09-14 15:31:00)Помогите, пожалуйста!
Я передрал из Хелпа к Delphi пример для написания сервиса.
Запускаю его командной строкой /install , показывается сообщение что сервис устиановлен успешно. Но когда я пытаюсь его стартануть из менеджера служб
(Панель управления/Администрировани/управление компьютером/службы), появляется предупреждение "Нет доступа".
Уж и не знаю, что думать!
Донской (2002-09-14 18:10:00) [1]Компилятор ругается вот на это
StartService(SChandle,0, nil);
на последний аргумент. Мне же не надо перерписывать функцию ServiceMain?
Донской (2002-09-14 18:06:00) [2]Переустанавливать что?
Винды? Да вроде свежие еще))
ZZ (2002-09-14 18:04:00) [3]А переустанавливать пробовал?
Донской (2002-09-14 17:57:00) [4]Что интересно еще - на другой машине все нормально. Там та же операционка. А вот у меня....
Донской (2002-09-14 17:41:00) [5]А, ясно.
OpenSCManager уже есть..))
ZZ (2002-09-14 17:35:00) [6]Неа!
OpenSCManager -> OpenService -> StartService
А CreateService будет устанавливать сервис... который уже установлен
Донской (2002-09-14 17:33:00) [7]Понял, Ок.
Createservice и startservice
Фуух...
ZZ (2002-09-14 17:29:00) [8]Донской
Напиши другую!!! прогу для запуска этого сервиса. Там 2-3 функции будут. Потом получи код и текст ошибки GetLastError + SysErrorMessage
Донской (2002-09-14 17:23:00) [9]В смысле их другого приложения? Или самого себя? Хм. Сейчас попробую.
ZZ (2002-09-14 17:20:00) [10]А если его запустить с помощью StartService и посмотреть код ошибки (т.к. это не нормальное что-то :) Врядли права доступа при установке меняются.
Донской (2002-09-14 17:16:00) [11]Да, в том то и дело!
ZZ (2002-09-14 16:49:00) [12]А другие запускаются?
Донской (2002-09-14 16:27:00) [13]Я администратор на машине.