将xp批处理文件移植到win7

时间:2011-08-16 16:51:29

标签: windows-7 batch-file lnk

这是我原来的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 :(得分:0)

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