Имя пользователя:
Пароль:
 | Правила  

Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Скриптовые языки администрирования Windows » VBS/WSH/JS - Нужна помощь в удалении ярлыка с раб.стола

Ответить
Настройки темы
VBS/WSH/JS - Нужна помощь в удалении ярлыка с раб.стола

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


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

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


Добрый день. Прошу вас помочь в написании обратного действия на удаление 1)одного и 2) ряда каких либо ярлыков с рабочего стола пользователя.
Вот пример создания ярлыка, что в нем надо добавить или поменять в первом и во втором случае.
Спасибо вам.
------------------------------------------------------------------------------------------------------------
Set WshShell = WScript.CreateObject("WScript.Shell")

strDesktop = WshShell.SpecialFolders("Desktop")

Set oMyShortCut= WshShell.CreateShortcut(strDesktop & "\GARANT.lnk")

oMyShortCut.TargetPath = "\\server\Garant-Client\garant.exe"

oMyShortCut.WorkingDirectory = "\\server\Garant-Client"

oMyShortCut.Description = "GARANT"

oMyShortCut.Save
------------------------------------------------------------------------------------------------------------

Отправлено: 15:49, 20-12-2011

 

Ветеран


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

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


Удаление ярлыков ничем не отличается от удаления прочих файлов: Working with Files. Приведённый Вами код излишен для этого.

Отправлено: 16:59, 20-12-2011 | #2



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

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


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


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

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


Цитата Iska:
Удаление ярлыков ничем не отличается от удаления прочих файлов: Working with Files. Приведённый Вами код излишен для этого. »
Прошу помочь разобраться.
сможете написать пример ?

Отправлено: 16:18, 21-12-2011 | #3


Ветеран


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

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


Цитата morozov_s_v:
сможете написать пример ? »
для начала нужно понять, для каких пользователей создан ярлык.
C:\Documents and Settings\Пользователь\Рабочий стол\STDU Viewer.lnk
C:\Documents and Settings\All Users\Рабочий стол\STDU Viewer.lnk

для всех пользователей:
Код: Выделить весь код
;Удалить ярлык с рабочего стола
Del /q "%ALLUSERSPROFILE%\Рабочий стол\STDU Viewer.lnk"
Сохранять в 866 кодировке.

Отправлено: 16:43, 21-12-2011 | #4


Ветеран


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

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


Цитата morozov_s_v:
Прошу помочь разобраться.
сможете написать пример ? »
Пример удаления есть в вышеприведённой ссылке Working with Files. Что именно Вам не понятно?

Отправлено: 19:44, 21-12-2011 | #5


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


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

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


sov44, это не будет работать на Win7.

Попробуйте это:
Код: Выделить весь код
@echo off
chcp 1251
setlocal
set files=Русс.lnk 1111*.lnk *z.lnk
%homedrive%
if exist "%homedrive%%homepath%\desktop" (set homedesk=desktop) else (set homedesk=Рабочий стол)
if exist "%public%" (set comdesk=%public%\%homedesk%) else (set comdesk=%allusersprofile%\%homedesk%)
chdir "%homedrive%%homepath%\%homedesk%"
for %%a in (%files%) do (del /q "%%a"&del /q "%comdesk%\%%a" >nul)
endlocal
chcp 866
1) Можно сохранить в блокноте, не обязательна кодировка 866.
2) Работает и на ХР, и на Win7.
3) Удаляет указанные файлы на рабочем столе пользователя и общем.
Файлы для удаления размещайте в секции "set files=" через пробел (все ярлыки имеют расширение .lnk)

-------
Alex Dragokas

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

Отправлено: 19:57, 21-12-2011 | #6


Ветеран


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

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


Подскажите, как удалить ярлыки по умолчанию ( IE, Windows media, Проводник) в Windows 7 из панели быстрого запуска?
Ярлыки находились в папке User Pinned (%AppData%\Microsoft\Internet Explorer\Quick Launch\User Pinned\). Папка удалена, но ярлыки с панели не пропали.

Отправлено: 20:43, 05-01-2012 | #7


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


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

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


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

Отправлено: 18:18, 13-09-2013 | #8


Ветеран


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

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


Lucretius, а если там десять ярлыков — и какой из них Ваш?!

Что-нибудь ещё об ярлыке известно? На что указывает, например?

Отправлено: 20:57, 13-09-2013 | #9


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


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

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


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

Отправлено: 18:24, 14-09-2013 | #10



Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Скриптовые языки администрирования Windows » VBS/WSH/JS - Нужна помощь в удалении ярлыка с раб.стола

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

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
Интернет - не запускается интернет-страница с ярлыка с раб.стола prettywoman Microsoft Windows 7 13 06-12-2012 15:14
Постоянное обновление раб.стола strateg1970 Видеокарты 8 25-05-2011 20:48
проблема со всеми ярлыками раб. стола heess Лечение систем от вредоносных программ 1 03-12-2010 17:47
[решено] Нужна помощь в удалении RealTek (ВАЖНО И СЛОЖНО)) BROTHERHOOD Хочу все знать 10 14-05-2010 15:51
Службы - [решено] Настройка Удаленного раб стола wolf200769 Microsoft Windows Vista 2 05-10-2009 15:15




 
Переход