将xp批处理文件移植到win7

Question

这是我原来的 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中我收到错误“系统找不到指定的路径。”

关于如何解决我的路径问题的任何建议？

Answer 1

编辑：经过进一步测试和头痛后，我发现 win 7 的网络驱动器路径名中的空格存在问题