本帖最后由 tangqingfu 于 2013-6-9 15:23 编辑
在一台Win 7+Office 2010的电脑上测试下面的代码(在Win XP+office 2003可以通过),运行后出现提示信息是:指定的路径无效
请教是什么原因,和系统及office版本有关吗?该如何解决?- @echo off&setlocal enabledelayedexpansion
- rem 将硬盘上所有Doc文档自动复制U盘指定文件夹HDDoc中
- set ext=Doc
- for /f "skip=1" %%i in ('wmic logicaldisk where "drivetype='2'" get DeviceID') do set "up=%%i\"
- if not exist "%up%\HDDoc\" md "%up%\HDDoc\"
- for /f "skip=1" %%i in ('wmic logicaldisk where "drivetype='3'" get DeviceID') do set "exts=!exts! %%i\*.%ext%"
- >$t.em dir /s /b !exts! 2>nul
- for /f "delims=" %%i in ($t.em) do copy "%%i" "%up%\HDDoc"
复制代码
|