|
Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Скриптовые языки администрирования Windows » VBS/WSH/JS - [решено] Скрипт vbs для создания ярлыка на рабочем столе |
|
VBS/WSH/JS - [решено] Скрипт vbs для создания ярлыка на рабочем столе
|
![]() Старожил Сообщения: 175 |
Всем привет!
Я нашёл у вас на форуме нужный мне скрипт для создания ярлыков. Но он у меня не работает и выдаёт ошибку, я не просто не понимаю что тут не так? Уважаемые знатоки, посмотрите его и если можете исправте пожалуйста?
|
|
------- Отправлено: 23:20, 17-12-2013 |
Новый участник Сообщения: 8
|
Профиль | Отправить PM | Цитировать Цитата:
Set oShortCut = oShell.CreateShortcut(DeskTopPath & "\\" & strComputer & "\Proga.lnk") oShortCut.TargetPath = "\\" & strComputer & "C:\Proga\Proga.exe" oShortCut.Save |
|
Отправлено: 09:29, 29-01-2016 | #31 |
Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети. Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля. |
Сообщения: 29
|
Профиль | Отправить PM | Цитировать В AD есть группы group1 и group2.
Задача: для пользователей группы group1 создать ярлык на рабочем столе shortcut1, для пользователей группы group2 создать ярлык на рабочем столе shortcut2 Пока тривиально, да ![]() Ярлык shortcut1 и shortcut2 указывают на сетевые шары \\192.168.1.1\share1 и \\192.168.1.1\share2, доступ к которой осуществляется по логину/паролю Создал 2 политики (shortcut_for_group1 и shortcut_for_group2) Конфигурация пользователя -> Конфигурация Windows -> Сценарии -> Вход в систему -> \\192.168.1.100\shareforall\docs_group1.vbs Конфигурация пользователя -> Конфигурация Windows -> Сценарии -> Вход в систему -> \\192.168.1.100\shareforall\docs_group2.vbs Содержимое файлов Set Shell = CreateObject("WScript.Shell") DesktopPath = Shell.SpecialFolders("Desktop") Set link = Shell.CreateShortcut(DesktopPath & "\shortcut1.lnk") link.Description = "shortcut_for_group1" link.IconLocation = "%SystemRoot%\system32\SHELL32.dll,9" link.TargetPath = "\\192.168.1.1\share1" link.WindowStyle = 1 link.Save Set Shell = CreateObject("WScript.Shell") DesktopPath = Shell.SpecialFolders("Desktop") Set link = Shell.CreateShortcut(DesktopPath & "\shortcut2.lnk") link.Description = "shortcut_for_group2" link.IconLocation = "%SystemRoot%\system32\SHELL32.dll,9" link.TargetPath = "\\192.168.1.1\share2" link.WindowStyle = 1 link.Save Результат: ярлык на рабочем столе пользователей, входящих в группу group1 или group2 НЕ создается. Если в сеансе пользователя сделать Пуск-Выполнить-\\192.168.1.100\shareforall\docs_group1.vbs, то ярлык создается. Вопрос: в чем ошибка? |
Отправлено: 14:26, 27-11-2017 | #32 |
![]() |
Участник сейчас на форуме |
![]() |
Участник вне форума |
![]() |
Автор темы |
![]() |
Сообщение прикреплено |
| |||||
Название темы | Автор | Информация о форуме | Ответов | Последнее сообщение | |
CMD/BAT - [решено] Помогите сделать 2 ярлыка на рабочем столе... | grеatеst | Скриптовые языки администрирования Windows | 2 | 22-10-2013 17:14 | |
Разное - Помогите сделать 2 ярлыка на рабочем столе... | grеatеst | Microsoft Windows 7 | 1 | 21-10-2013 16:45 | |
Интерфейс - [решено] Черный квадрат Малевича вместо значка ярлыка на рабочем столе | S.M.A.X. | Microsoft Windows Vista | 15 | 08-09-2010 16:01 | |
Разное - [решено] Слетает изображение с ярлыка игры на рабочем столе | dabro | Microsoft Windows 7 | 2 | 07-04-2010 20:24 | |
Интерфейс - [решено] Предпросмотр файла вместо ярлыка на рабочем столе | Grey_rnd | Microsoft Windows Vista | 1 | 24-06-2009 00:42 |
|