Компьютерный форум OSzone.net  

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)
-   Microsoft Windows NT/2000/2003 (http://forum.oszone.net/forumdisplay.php?f=5)
-   -   Раздача ярлыка программы в сети (http://forum.oszone.net/showthread.php?t=134182)

Diesel315 09-03-2009 09:09 1058533

Раздача ярлыка программы в сети
 
Есть компьютер (WinXP) на нем установленна прога (Консультант плюс) допустим сменилось имя компьютера, а у юзеров на рабочих столах ярлык этой программы, естественно перестает запускаться. Как можно заново раздать ярлык этой проги с минимальными усилиями. Как вариант заходить на рабочий стол всех компов C:\Documents and Settings\All Users\Рабочий стол но это муторно. Моно как нибудь упростить эту задачу. Сеть доменная (2003sp1).
Заранее спасибо.

Delirium 09-03-2009 09:25 1058537

Через групповую политику кинуть всем на рабочий стол новый ярлык(можно через bat файлы). старый пусть удалят сами.

Diesel315 09-03-2009 09:31 1058538

уважаемый Delirium не подскажешь более подробно где именно в ГП призвести сиё действие, а то я сними пока на вы?

Michael 09-03-2009 23:51 1059266

Diesel315, конфигурация компьютера -> Конфигурация Windows -> Сценарии (запуск/завершение) - выполняется с правами System в момент включения/выключения компа.
Конфигурация пользователя -> Конфигурация Windows -> Сценарии (вход/выход из системы) - выполняется с правами пользователя в момент входа/выхода из системы.
P.S. Небольшой совет - создавай новую политику для этого действия, а не используй существующую. Это упростит дальнейшее возможное разбирательство с косяками групповых политик.

Diesel315 10-03-2009 08:44 1059414

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

Michael 10-03-2009 08:58 1059425

Diesel315, если чесно, то очень хороших книг по групповым политикам не встречал - в основном это были только главы в книгах, посвященных системному администрированию серверных ОС. Тебя что именно интересует? Возможности групповых политик? Тогда, на мой взгляд, проще самому их полистать - получишь общее представление о их возможностях. А потом если что-то понадобится - либо сам вспомнишь/найдешь, либо спросишь на форуме.

Diesel315 10-03-2009 09:54 1059458

Еще раз спасибо.
Видимо прийдется самому искать инфу.Что меня интересовало - ВСЕ. Хотя бы взять твой совет создать новую политику , получается у мня их 2 ,а кто из них главнее кто переопределяет приоритет. Много ньюансов, особенно хотелось бы знать значение каздого параметра (у мня на английском- интутитивно я понимаю да и сравниваю с параметрами на XP, но ХР не сервер). Вообщем думал может есть грамотная книга по ГП (нашел правда на сервер 2000 - admin911:групповые политики Windows 2000).

Safety1st 12-03-2009 20:41 1062064

Начните с http://ru.wikipedia.org/wiki/Групповая политика, потом в английском варианте, потом на Microsoft TechNet:
TechNet Group Policy Web site
TechNet Script Center
и т.д.

Dimas_83 12-03-2009 21:39 1062109

Цитата:

Цитата Diesel315
Есть компьютер (WinXP) на нем установленна прога (Консультант плюс) допустим сменилось имя компьютера, а у юзеров на рабочих столах ярлык этой программы, естественно перестает запускаться. Как можно заново раздать ярлык этой проги с минимальными усилиями. Как вариант заходить на рабочий стол всех компов C:\Documents and Settings\All Users\Рабочий стол но это муторно. Моно как нибудь упростить эту задачу. Сеть доменная (2003sp1). »

Лучше всего приучить пользователей работать с подключенными сетевыми дисками.

Вот таким образом я в свое время реализовал копирование ярлыков на рабочие столы пользователей.

1. Создаешь групповую политику. Сразу должен понять, что эти ярлыки нужны пользователям, а не компьютерам... т.е. идем в Конфигурация пользователя -> Конфигурация Windows -> Сценарии (вход/выход из системы)

2. Создаем файл, например, COPYLINKS.VBS:


читать дальше »
Код:

Const OverwriteExisting = TRUE

set fso=createobject("scripting.filesystemobject")
set wshShell = WScript.CreateObject("WScript.Shell")

fso.copyfile "\\*****\shared\scripts\shared\links\ConsultantPlus.lnk", "d:\desktops\"+wshShell.ExpandEnvironmentStrings("%USERNAME%")+"\Рабочий стол\ConsultantPlus.lnk", OverwriteExisting

fso.copyfile "\\*****\shared\scripts\shared\links\Документы на сервере.lnk", "d:\desktops\"+wshShell.ExpandEnvironmentStrings("%USERNAME%")+"\Рабочий стол\Документы на сервере.lnk", OverwriteExisting

fso.copyfile "\\*****\shared\scripts\shared\links\Программы на сервере.lnk", "d:\desktops\"+wshShell.ExpandEnvironmentStrings("%USERNAME%")+"\Рабочий стол\Программы на сервере.lnk", OverwriteExisting



3. Добавляешь этот файл в Сценарии (вход/выход из системы)
4. Линуешь (LINK) групповую политику к необходимым группам.

Не забываем про разрешения файлов и папок на сетевом ресурсе.

На всякий случай, пример кода маппинга (подключения) сетевых дисков:
читать дальше »
Код:

net use S: /delete
net use S: \\*****\shared\documents /PERSISTENT:NO
net use T: /delete
net use T: \\*****\shared\consultant /PERSISTENT:NO
net use U: /delete
net use U: \\*****\shared\programms /PERSISTENT:NO


dvassilyev 18-03-2009 12:47 1067146

Код:

Dim WSHShell Set WSHShell = WScript.CreateObject ("WScript.Shell") Dim MyShortcut, MyDesktop, DesktopPath DesktopPath = WSHShell.SpecialFolders("Desktop") Set MyShortcut = WSHShell.CreateShortcut(DesktopPath & "\Programm.lnk") MyShortcut.TargetPath = WSHShell.ExpandEnvironmentStrings ("\\server\shared\programm.exe") MyShortcut.Arguments="-a -b -c" MyShortcut.WorkingDirectory = WSHShell.ExpandEnvironmentStrings ("\\server\shared") MyShortcut.WindowStyle = 3 MyShortcut.IconLocation = WSHShell.ExpandEnvironmentStrings ("\\server\shared\programm.exe, 0") MyShortcut.Save
пример создания ярлыка на VBS
MyShortcut.WindowStyle = 3 параметры открываемого окна
MyShortcut.TargetPath = WSHShell.ExpandEnvironmentStrings ("\\server\shared\programm.exe") MyShortcut.Arguments="-a -b -c" путь к файлу, -а параметры запуска

правишь как надо, сохраняешь, вставляешь в сценарии и все


Время: 11:06.

Время: 11:06.
© OSzone.net 2001-