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

Компьютерный форум OSzone.net » Компьютеры + Интернет » Хочу все знать » [решено] Пакетное переименование ярлыков

Ответить
Настройки темы
[решено] Пакетное переименование ярлыков

Аватара для SimSim

Soft-Эксплуататор


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


Конфигурация

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


Друзья, прошу помощи в решении следующего вопроса.
На рабочем столе есть папка, в которой собраны ярлыки на более чем две сотни игрушек. Игрушки не требуют установки. Возникла потребность перенести папку с этими игрушками на другой диск. Есть-ли возможность пакетного переименования этих ярлыков, в свойствах которых можнои зменить букву диска?

-------
MULTI MULTA; NEMO OMNIA NOVIT


Отправлено: 22:48, 29-04-2010

 

Аватара для Erekle

Ветеран


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

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


Точнее, пакетное изменение свойств?
Ммм... Что-то про VB и cmd в гугле говорят, но слишком сложно для моего понимания.
Можно перенести, поискать экзешники в этой папке и всех разом сбросить на стол, или создать новые ярлыки где-нибудь ещё? В конце .exe... но с этим просто.
(или изменить букву диска у диска )

-------
Здесь вся мудрость [14.6]


Отправлено: 03:37, 30-04-2010 | #2



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

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


Аватара для Drongo

Будем жить, Маэстро...


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

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


Цитата Erekle:
или изменить букву диска у диска »
Да, нужно каким-то образом пакетно изменить букву диска в свойствах ярлыка. К примеру ярлыки указывают
Цитата:
C:\Games\games1.exe
C:\Games A\games2.exe
...
C:\Games ABC\games200.exe
И вместо диска C: у всех нужно выставить ту букву диска, на котором будут установлены игры, например, на диск D:
Цитата:
D:\Games\games1.exe
D:\Games A\games2.exe
...
D:\Games ABC\games200.exe

-------
Правильная постановка вопроса свидетельствует о некотором знакомстве с делом.
3нание бывает двух видов. Мы сами знаем предмет — или же знаем, где найти о нём сведения.
[Quick Killer 3.0 Final [OSZone.net]] | [Quick Killer 3.0 Final [SafeZone.cc]] | [Парсер логов Gmer] | [Парсер логов AVZ]

http://tools.oszone.net/Drongo/Userbar/SafeZone_cc.gif


Отправлено: 10:33, 30-04-2010 | #3


Аватара для SimSim

Soft-Эксплуататор


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

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


Drongo, Всё верно. В свойствай каждого ярлыка указано G:\Games\Игра\Игра.ехе, а надо D:\Games\Игра\Игра.ехе
Вручную переименовывать, сами понимаете, это убить кучу времени. Сменить букву диска тоже не выход, ибо там куча установленного ПО.

-------
MULTI MULTA; NEMO OMNIA NOVIT


Отправлено: 10:53, 30-04-2010 | #4


Аватара для Drongo

Будем жить, Маэстро...


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

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


SimSim, А ты пробовал как я говорил, перенести эту папку на тот диск, где теперь установлены игры и запускать ярлыки, ведь Windows должна сама понаходить пусковые файлы и тогда путь в ярлыках изменятся на правильный. Пробовал?

-------
Правильная постановка вопроса свидетельствует о некотором знакомстве с делом.
3нание бывает двух видов. Мы сами знаем предмет — или же знаем, где найти о нём сведения.
[Quick Killer 3.0 Final [OSZone.net]] | [Quick Killer 3.0 Final [SafeZone.cc]] | [Парсер логов Gmer] | [Парсер логов AVZ]

http://tools.oszone.net/Drongo/Userbar/SafeZone_cc.gif


Отправлено: 12:00, 30-04-2010 | #5


Аватара для SimSim

Soft-Эксплуататор


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

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


Цитата Drongo:
Windows должна сама понаходить пусковые файлы и тогда путь в ярлыках изменятся на правильный. »
Должна. И делает. Но к сожалению, по времени это намного дольше чем переименовывать вручную.
Но выход найден. Программа @Text Replacer решила все проблемы в один момент. Выбрал папку с ярлыками и задал условие заменить G:\ на D:\
Всем спасибо.

-------
MULTI MULTA; NEMO OMNIA NOVIT

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

Отправлено: 13:37, 30-04-2010 | #6


Аватара для Erekle

Ветеран


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

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


Цитата SimSim:
по времени это намного дольше чем переименовывать вручную »
Ну я говорил создать новые, но все вместе. Всего-то 4 операции (перенос, поиск всех .exe в папке Games, выделить всё, создать ярлыки).
Однако оказалось, что с окна поиска ярлыки создаются только на рабочем столе. 200 явно не уместятся.
А @Text Replacer хорош.

-------
Здесь вся мудрость [14.6]


Отправлено: 14:15, 30-04-2010 | #7


Аватара для SimSim

Soft-Эксплуататор


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

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


Цитата Erekle:
перенос, поиск всех .exe в папке Games, выделить всё »
Erekle, Будут созданы ярлыки типа "Ярлык для run.exe" и смотреться это будет припаршиво, если учесть, что сейчас под каждым ярлыком "красуется" полное название игры на русском языке.

-------
MULTI MULTA; NEMO OMNIA NOVIT


Отправлено: 16:48, 30-04-2010 | #8


Аватара для NikolayHAOS

Старожил


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

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


Всем доброго времени суток!
Сам столкнулся с такой проблемой.
@Text Replacer не помог.
Помог пользователь с ру-боарда Alex_Piggy
Есть отличный способ.
Изменения пути ярлыков.
создаем бантик
следующего содержания:
___________________________________________________________________
Код: Выделить весь код
@set @script=0 /*
set "From=C:\Program Files"
set "To=D:\Games"

call :choose_folder indir
pushd "%indir%"
for %%i in (*.lnk) do cscript /e:jscript "%~f0" "%%~fi" "%From%" "%To%"
exit
:choose_folder
for /f "usebackq delims=" %%a in (`@"%systemroot%\system32\mshta.exe" "javascript:var objShellApp = new ActiveXObject('Shell.Application');var Folder = objShellApp.BrowseForFolder(0, 'SELECT FOLDER',1, '::{20D04FE0-3AEA-1069-A2D8-08002B30309D}');try {new ActiveXObject('Scripting.FileSystemObject').GetStandardStream(1).Write(Folder.Self.Path)};catch (e){};close();" 1^|more`) do set "%1=%%a"
exit /b
*/
var LinkName=WScript.Arguments.Item(0);
var RplsFrom=WScript.Arguments.Item(1);
var RplaceTo=WScript.Arguments.Item(2);
var WshShell = WScript.CreateObject("WScript.Shell");
var oShellLink = WshShell.CreateShortcut(LinkName);
oShellLink.TargetPath=oShellLink.TargetPath.replace(RplsFrom,RplaceTo);
oShellLink.Save();
______________________________________________________________________

set "From=C:\Program Files" - строка, которую нужно заменить.
set "To=D:\Games" - строка, на которую нужно заменить.
("C:\Program Files" заменит на "D:\Games" для всех ярлыков в папке, выбранной при запуске.)

файл bat должен находиться в папке с ярлыками.

Последний раз редактировалось NikolayHAOS, 24-10-2012 в 10:46.


Отправлено: 10:33, 24-10-2012 | #9


Аватара для topotun32

Ветеран


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

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


Способ интересный. Жаль только, что Ваш пост немного не ко времени.

Отправлено: 10:44, 24-10-2012 | #10



Компьютерный форум OSzone.net » Компьютеры + Интернет » Хочу все знать » [решено] Пакетное переименование ярлыков

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

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
Интерфейс - [решено] Переименование файла mishkinstvo Microsoft Windows 2000/XP 5 10-12-2021 22:08
[тестируем] EasySaver: пакетное сохранение/восстановление настроек Su4nost_ Автоматическая установка приложений 7 07-02-2016 02:48
Переименование доменов АД ALFik_ Microsoft Windows NT/2000/2003 0 28-03-2007 17:09
Переименование CD kop4enyi Хочу все знать 1 25-03-2007 22:31
Переименование I386 li55t Автоматическая установка Windows 2000/XP/2003 10 09-01-2007 15:12




 
Переход