портирование командного файла xp на win7 - PullRequest
Новая
       34

портирование командного файла xp на win7

0 голосов
/ 16 августа 2011

вот мой оригинальный пакетный файл win xp: 

@echo off
%~d1
cd "%~p1"
set swf=%~f1

set media=%~p1..\media.lnk
echo set WshShell = WScript.CreateObject("WScript.Shell")>DecodeShortCut.vbs
echo set Lnk = WshShell.CreateShortcut(WScript.Arguments.Unnamed(0))>>DecodeShortCut.vbs
echo wscript.Echo Lnk.TargetPath>>DecodeShortCut.vbs
set vbscript=cscript //nologo DecodeShortCut.vbs
For /f "delims=" %%T in ( ' %vbscript% "%media%" ' ) do set Mtarget=%%T
del DecodeShortCut.vbs

set pictlib=%~p1..\pictlib.lnk
echo set WshShell =  WScript.CreateObject("WScript.Shell")>DecodeShortCut.vbs
echo set Lnk =  WshShell.CreateShortcut(WScript.Arguments.Unnamed(0))>>DecodeShortCut.vbs
echo wscript.Echo Lnk.TargetPath>>DecodeShortCut.vbs
set vbscript=cscript //nologo DecodeShortCut.vbs
For /f "delims=" %%T in ( ' %vbscript% "%pictlib%" ' ) do  set Ptarget=%%T
del DecodeShortCut.vbs

echo media %media% 
echo Media_Target   %Mtarget%
echo.
echo pictlib %pictlib%
echo pictlib_target %Ptarget%

copy /Y "%swf%" "%Mtarget%"
copy /Y "%swf%" "%Ptarget%

pause >nul

этот пакетный файл просто считывает один уровень в каталоге, чтобы найти цель ярлыка с именем «Media» и другого ярлыка с именем «pictlib»и копирует файл туда.

в win 7 я получаю сообщение об ошибке «Системе не удается найти указанный путь.»

есть предложения о том, как решить проблемы с моим путем?

1 Ответ

0 голосов
/ 16 августа 2011

РЕДАКТИРОВАТЬ: после дальнейшего тестирования и головной боли я обнаружил, что win 7 имеет проблемы с пробелами в имени пути от сетевых дисков

...