| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Запуск службы
F@T@L_Err0r © (2008-03-17 11:12:00)Здравствуйте.Подскажите пожалуйста какиим образом програмно можно запустить виндовсскую службу и как перед этим получить ее имя?Понятно что под администратором.Зараннее спасибо!
clickmaker (2008-03-17 14:42:00) [21]
> [32] F@T@L_Err0r (17.03.08 14:38)
сам как думаешь, если меняешь конфигурацию, какие права доступа нужно запросить?
F@T@L_Err0r (2008-03-17 14:38:00) [22]Service:=OpenService(SCManager,'Messenger',SERVICE_QUERY_STATUS or SERVICE_START or SERVICE_STOP);
ChangeServiceConfig(Service,SERVICE_WIN32_OWN_PROCESS,SERVICE_AUTO_START,SERVICE _NO_CHANGE,nil,nil,nil,nil,nil,nil,nil);
Делаю вот так...Но ничего не меняется...
Сергей М. (2008-03-17 14:28:00) [23]
> F@T@L_Err0r (17.03.08 14:25) [29]
см. ChangeServiceConfig
F@T@L_Err0r (2008-03-17 14:27:00) [24]А если точнее то как установить тип запуска - авто???
F@T@L_Err0r (2008-03-17 14:25:00) [25]Врпрос. Аесли служба отключена то как ее сначала включить???Потому что если состояние службы - отключена ...то возникает ошибка...
F@T@L_Err0r (2008-03-17 14:05:00) [26]>[13] бери и пользуй
Спасибо большое ...работает...
Slym (2008-03-17 13:59:00) [27]Удалено модератором
Slym (2008-03-17 13:57:00) [28][13] бери и пользуй
Skyle (2008-03-17 13:49:00) [29]
> F@T@L_Err0r (17.03.08 13:44) [23]
> >А разве в справке не написано ?
>
> Написанно что ето service control manager - а что ето я
> не знаю...
Ну тогда и не заморачивайся.
Пиши просто
{get-service Messenger}.Start()
Сергей М. (2008-03-17 13:46:00) [30]
> Написанно что ето service control manager - а что ето я
> не знаю
Угу.
А дальше черным по белому написано, откуда эта беда берется
The OpenSCManagerfunction returns this handle.
Эт что, для пушкина писано ?)
F@T@L_Err0r (2008-03-17 13:44:00) [31]>А разве в справке не написано ?
Написанно что ето service control manager - а что ето я не знаю...вот и спрашиваю у вас...более просвященных в етом вопросе...Что мне нада там поставить что бы ето работало???
clickmaker (2008-03-17 13:41:00) [32]
> [20] F@T@L_Err0r (17.03.08 13:40)
может, все-таки поразбираешься в предмете интереса?
что такое service control manager, дескриптор сервиса, чем имя отличается от отображаемого имени...
а то напоминает попытки порулить джипом, умея ездить только на самокате
Сергей М. (2008-03-17 13:41:00) [33]
> Да
Молодец ! Что еще сказать ?)
Ты так всегда и лепишь свой код - "от балды" ?)
> а что там нада?
А разве в справке не написано ?
F@T@L_Err0r (2008-03-17 13:40:00) [34]>0 указан от балды ?
Да, а что там нада???
Сергей М. (2008-03-17 13:38:00) [35]
> s:= OpenService( 0,'Messenger',0);
0указан от балды ?
F@T@L_Err0r (2008-03-17 13:35:00) [36]var s:cardinal;
p:PChar;
begin
p:=nil;
s:= OpenService(0,'Messenger',0);
StartService(s,0,p);
Сделал вот так но служба не запускается...Может я что то упустил???Имя службы правильное...
Skyle (2008-03-17 13:34:00) [37]
> F@T@L_Err0r (17.03.08 13:30) [15]
> Хорошо...А имя сервиса ето что тогда???чето я ваще уже запутался.
> ..Ето имя которое русское???если нет то где его можно посмотреть?
> ??
Пуск->Выполнить->services.msc->На нужном сервисе правой кнопкой, Свойства, смотреть "имя службы".
Slym (2008-03-17 13:32:00) [38]F@T@L_Err0r (17.03.08 13:30) [15]
...Ето имя которое русское???если нет то где его можно посмотреть???
нет нерусское...
в оснастке Службы
например служба "Удаленный вызов процедур (RPC)" имеет имя RpcSs
F@T@L_Err0r (2008-03-17 13:30:00) [39]Хорошо...А имя сервиса ето что тогда???чето я ваще уже запутался...Ето имя которое русское???если нет то где его можно посмотреть???
clickmaker (2008-03-17 13:29:00) [40]
> Если количество аргументов то насколько я понимаю ето цифры?
нет. Буквы. Сумма прописью, как в квитанции, знаешь
| |
Страницы: 