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

Показать сообщение отдельно

Аватара для 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