Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Запуск прог из сервиса [WinXP]


Goryn ©   (2006-01-28 14:15:00) 

После переделки в сервис, моя панель для запуска программ
перестала работать-

причина проги пускает под другим sexrity :)
описание ненашел ,чтоб добавить права Explorer
чтоб подним запускалось

Кривая идея - открыть папку с прогой ,
найти иконку приложения и программно
кликнуть мышью и прога запускится под Explorerом


в сервисе запускаю проги так
Start := CreateProcess(nil,
Exe,            
nil,  <-sexrity            
nil,


Набережных С.   (2006-01-29 07:38:00) [1]


> kaZaNoVa ©   (28.01.06 18:46) [6]

Перебирать сессии не надо, надо использовать WtsGetActiveConsoleSessionID. И если для этого ID WTSQueryUserToken вернет ошибку, то это значит, что интерактивного пользоавтеля нет.

> WTSEnumerateSessions будет выдавать валидные идентификаторы
> для
> сессий,отличных от Console только если на сервере установлены
> Terminal
> Services

А также, если задействован Fast User Switching

> Goryn   (28.01.06 14:15)  

Вероятно, потребуется отслеживать переключения пользователей. См. WTSRegisterSessionNotification. Также учти, вся эта кухня не будет работать в системах ниже WinXP.


Goryn   (2006-01-29 02:09:00) [2]

>галочку поставить в настройке службы.

такое непробывал,хотелось программно

>исчо можно попробовать:

ага буду разбираться , копать

спасибо


kaZaNoVa   (2006-01-28 18:46:00) [3]

исчо можно попробовать:

1)WTSEnumerateSessionsA
2)перебор хэндлов сессий и подсовывание их в WTSQueryUserToken
3)полученные UserTokens используем в CreateProcessAsUser, которая запускает
энумератор в контексте требуемого юзверь-пространства.

Учти, WTSEnumerateSessions будет выдавать валидные идентификаторы для
сессий,отличных от Console только если на сервере установлены Terminal
Services.


kaZaNoVa   (2006-01-28 18:19:00) [4]

Goryn   (28.01.06 18:08) [3]
галочку поставить в настройке службы. (так и называется "разрешить взаимодействие с рабочим столом)

- такое пробовали?)


kaZaNoVa   (2006-01-28 18:15:00) [5]

Goryn   (28.01.06 18:08) [3]
ПОНИЗИТЬ ПРАВА запускаемого процесса

понизить права?) а это вообще, возможно? скорее всего надо запускать под другой учётной записью, которая и имеет другие права ..


Goryn   (2006-01-28 18:08:00) [6]

>через CreateProcessWithLogonW (надо знать пароль пользователя)

пардон,незнаю пароль,я сервис

>Explorer может быть запущен от имени кого угодно ..

в данном случае текущего пользателя,
тосесть как то надо ПОНИЗИТЬ ПРАВА запускаемого процесса

Start := CreateProcess(nil,
Exe,            
nil,  <-sexrity            

ситуация напоминает мощь NT - сильные права ,но ничего нельзя сделать ))))


kaZaNoVa   (2006-01-28 16:53:00) [7]

Goryn   (28.01.06 14:15)
права Explorer
чтоб подним запускалось

Explorerможет быть запущен от имени кого угодно ..

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

как вариант можно еще попробовать сервис запускать в интерактивном режиме, но нет уверенности что это будет работать так как надо.

если же нужно именно чтобы "под Explorer" запускалось - лучший выход - добавить автозагружаемую (через реестр) DLL  в него ..


kaZaNoVa   (2006-01-28 16:41:00) [8]

запускать или через CreateProcessWithLogonW(надо знать пароль пользователя) или через внедрение DLL  в любой процесс, УЖЕ запущенный от имени пользователя и запуск проиграммы уже из той DLL (не рекомендуется).


Наверх

Титульная страница Поиск, карта сайта Написать письмо