Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  | Правила  

Компьютерный форум OSzone.net » Серверные продукты Microsoft » Microsoft Windows NT/2000/2003 » Импортирование веток реестра через VBS

Ответить
Настройки темы
Импортирование веток реестра через VBS

Пользователь


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

Профиль | Отправить PM | Цитировать


Собственно вопрос над которым ломаю голову третий день.
Под правами администратора (локального)все получается, а у пользователей (группа опытнае пользователи) нет прав
Пытаюсь импортировать значения в слудующую ветку HKLM\SYSTEM\CurrentControlSet\Services\
На клиентских машинах установлена ОС Win XP SP2.
Буду рад любой консультации (ссылки, или что-то еще).
Заранее спасибо.

Отправлено: 21:33, 14-07-2008

 

Ветеран


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

Профиль | Сайт | Отправить PM | Цитировать


Ну собственно ответ на поверхности. Надо запускать скрипт с правами администратора. Как вам такое решение?

-------
Tega AutoPatcher. Все обновления для XP в одном пакете. http://tega.ru/dirk/links.html


Отправлено: 23:59, 14-07-2008 | #2



Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети.

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


Googler


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

Профиль | Отправить PM | Цитировать


или дать права опытным пользователям на нужные ветки реестра через REGEDIT или SUBINACL

Отправлено: 04:09, 15-07-2008 | #3


Пользователь


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

Профиль | Отправить PM | Цитировать


Вот пытаюсь этот скрипт запустить с правами админа (в самом скрипте прописывается это). Но пока не получается. Сегодня еще попытаюсь, может получится.

Отправлено: 07:08, 15-07-2008 | #4


Пользователь


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

Профиль | Отправить PM | Цитировать


Ну вот получилось.
Если кому интересно вот код:

Dim Wsh
Dim Env
Dim SysDir

Set Wsh = Wscript.CreateObject("Wscript.Shell")
Set Env = wsh.Environment("Process")
SysDir = Env("WINDIR")

Wsh.Run "runas /user:x14@mydomain ""c:\temp\setup.exe"""
WScript.Sleep 1000
wsh.appActivate SysDir & "\system32\cmd.exe"
Wsh.SendKeys "pwd~"

Взято отсюда http://forum.script-coding.info/viewforum.php?id=1

Только одна неприятность: настройки вступают в действие после перезагрузки.
Нельзя ли это както исправить?

Первый код запускает программу от администратора.
А импортирование веток выглядит так:

Dim WshShell
Set WshShell=WScript.CreateObject("WScript.Shell")
'On Error Resume Next
WshShell.RegWrite "HKLM\SYSTEM\CurrentControlSet\Services\usbstor\Start",CByte(4),"REG_DWORD"
WshShell.RegWrite "HKLM\SYSTEM\CurrentControlSet\Services\Cdrom\Start",CByte(4),"REG_DWORD"
WshShell.RegWrite "HKLM\SYSTEM\CurrentControlSet\Services\Flpydisk\Start",CByte(4),"REG_DWORD"
WshShell.RegWrite "HKLM\SYSTEM\CurrentControlSet\Services\Sfloppy\Start",CByte(4),"REG_DWORD"

Отправлено: 20:17, 17-07-2008 | #5


Ветеран


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

Профиль | Сайт | Отправить PM | Цитировать


Батенька, да что ж вы такое делаете 8-))))
сделайте административный шаблон(вручную или с помощью reg2adm), импортируйте его через групповую политику(в раздел компьютера), и не морочьте голову себе и людям.

-------
Tega AutoPatcher. Все обновления для XP в одном пакете. http://tega.ru/dirk/links.html

Это сообщение посчитали полезным следующие участники:

Отправлено: 22:39, 17-07-2008 | #6



Moderator


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

Профиль | Отправить PM | Цитировать


XXXandr,
Как запретить использование USB портов, дисководов CD-ROM и Floppy с помощью Групповых Политик
[решено] Отключение портов USB
DeviceLock

Отправлено: 23:26, 17-07-2008 | #7


Пользователь


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

Профиль | Отправить PM | Цитировать


Цитата Dirk Diggler:
атенька, да что ж вы такое делаете 8-))))
сделайте административный шаблон(вручную или с помощью reg2adm), импортируйте его через групповую политику(в раздел компьютера), и не морочьте голову себе и людям. »
Этот шаблон применяется к компам (по крайней мере я так понял). А у меня везде используется по учетным записям.

Цитата Petya V4sechkin:
DeviceLock »
Хорошая программа, но она стоит денег. А начальство под это денег не даст. Так что вот и приходится выкучиваться.

Отправлено: 06:55, 18-07-2008 | #8


Googler


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

Профиль | Отправить PM | Цитировать


Цитата XXXandr:
у меня везде используется по учетным записям »
драйвер не служба, без перезагрузки конфигурация не применится, так что все-таки DeviceLock
Это сообщение посчитали полезным следующие участники:

Отправлено: 07:17, 18-07-2008 | #9


Ветеран


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

Профиль | Сайт | Отправить PM | Цитировать


Цитата XXXandr:
HKLM\SYSTEM\CurrentControlSet\Services\ »
относится как раз к компьютеру , а не к пользователям.

-------
Если сообщение оказалось полезным, нажмите, пожалуйста, соответствующую кнопку.


Отправлено: 08:36, 18-07-2008 | #10



Компьютерный форум OSzone.net » Серверные продукты Microsoft » Microsoft Windows NT/2000/2003 » Импортирование веток реестра через VBS

Участник сейчас на форуме Участник сейчас на форуме Участник вне форума Участник вне форума Автор темы Автор темы Шапка темы Сообщение прикреплено

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
Отправка сообщения через VBS скрипт buhanov Microsoft Windows NT/2000/2003 0 19-12-2008 11:26
VBS/WSH/JS - VBS (or Python)| удаленная правка реестра Well7 Программирование и базы данных 2 04-05-2007 11:24
Самопроизвольно запрещаются права на "Полный доступ"/"Чтение" различных веток реестра xoomer Microsoft Windows 2000/XP 2 23-04-2007 10:29
Подключение сетевых дисков через .vbs XPurple Microsoft Windows NT/2000/2003 10 18-09-2006 06:57
VBS/WSH/JS - Изменение параметров почты через VBS Pav Программирование и базы данных 5 18-06-2004 10:01




 
Переход