[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

[文件操作] 求补充完整一个整理桌面文件的批处理程序

单位的电脑每天都有人放很多文件夹和文件,桌面很乱,我想写一个批处理程序,把这些文件和文件夹都放到别的地方,现在我能移动桌面上文件到d:\桌面临时文件\"%a%"。
问题来了
1.如果人家在桌面放的是一个文件夹,我就搞不定了。 求助
2.我想创建一个d:\桌面临时文件的快捷方式到桌面,方便人家去查找。 求助!~!~
搞了几天,都没整出来,只能发帖求助了。谢谢,求补充!~!~!~
  1. @echo off
  2. cd C:\Documents and Settings\Administrator\桌面
  3. if not exist d:\桌面临时文件 md d:\桌面临时文件
  4. set a=%date:~0,10%
  5. if not exist d:\桌面临时文件\"%a%" md d:\桌面临时文件\"%a%"
  6. move /y "C:\Documents and Settings\Administrator\桌面\*.doc" d:\桌面临时文件\"%a%"
  7. move /y "C:\Documents and Settings\Administrator\桌面\*.xls" d:\桌面临时文件\"%a%"
  8. move /y "C:\Documents and Settings\Administrator\桌面\*.txt" d:\桌面临时文件\"%a%"
  9. move /y "C:\Documents and Settings\Administrator\桌面\*.ppt" d:\桌面临时文件\"%a%"
  10. move /y "C:\Documents and Settings\Administrator\桌面\*.zip" d:\桌面临时文件\"%a%"
  11. move /y "C:\Documents and Settings\Administrator\桌面\*.pdf" d:\桌面临时文件\"%a%"
复制代码

TOP

move命令不支持跨分区移动文件夹
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

本帖最后由 pcl_test 于 2015-1-24 00:20 编辑
  1. @echo off & color 0d
  2. for /f "tokens=2,*" %%i in ('reg query "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders" /v "Desktop"') do (
  3. set "desktop_dir=%%j"
  4. )
  5. set "back_dir=D:\桌面备份"
  6. set "filesdate=%date:~0,4%%date:~5,2%%date:~8,2%"
  7. if not exist "%back_dir%\DesktopBack%filesdate%\" (md "%back_dir%\DesktopBack%filesdate%\")
  8. xcopy "%desktop_dir%" "%back_dir%\DesktopBack%filesdate%\" /s /f
  9. del "%back_dir%\DesktopBack%filesdate%\*.lnk" /s /f /q
  10. for /f "delims=" %%a in ('dir /a-d /b /s "%desktop_dir%\*.*"') do (
  11. if "%%~xa" neq ".lnk" (del "%%a" /f /s /q)
  12. )
  13. for /f "delims=" %%b in ('dir /ad /b /s "%desktop_dir%\"^|sort /r') do (rd "%%b" /s /q)
  14. echo [InternetShortcut] >>"%desktop_dir%\桌面备份.url"
  15. echo URL="%back_dir%\" >>"%desktop_dir%\桌面备份.url"
  16. echo IconIndex=4 >>"%desktop_dir%\桌面备份.url"
  17. echo IconFile="%SystemRoot%\system32\SHELL32.dll" >>"%desktop_dir%\桌面备份.url"
  18. pause
复制代码
回复 1# pangqijun

TOP

本帖最后由 ygqiang 于 2015-1-24 02:56 编辑
回复  pangqijun
pcl_test 发表于 2015-1-24 00:18



    多谢,xp系统、win7 64系统下测试都好用
  1. @echo off & color 0d
  2. for /f "tokens=2,*" %%i in ('reg query "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders" /v "Desktop"') do (
  3. set "desktop_dir=%%j"
  4. )
  5. set "back_dir=D:\桌面备份"
  6. 1set "filesdate=%date:~0,4%%date:~5,2%%date:~8,2%"
  7. if not exist "d:\桌面备份\" (md "d:\桌面备份\")
  8. xcopy "%desktop_dir%" "d:\桌面备份\" /s /f /y
  9. del "d:\桌面备份\*.lnk" /s /f /q
  10. del "d:\桌面备份\桌面备份.url" /q
  11. for /f "delims=" %%a in ('dir /a-d /b /s "%desktop_dir%\*.*"') do (
  12. if "%%~xa" neq ".lnk" (del "%%a" /f /s /q)
  13. )
  14. for /f "delims=" %%b in ('dir /ad /b /s "%desktop_dir%\"^|sort /r') do (rd "%%b" /s /q)
  15. echo [InternetShortcut] >>"%desktop_dir%\桌面备份.url"
  16. echo URL="%back_dir%\" >>"%desktop_dir%\桌面备份.url"
  17. echo IconIndex=4 >>"%desktop_dir%\桌面备份.url"
  18. echo IconFile="%SystemRoot%\system32\SHELL32.dll" >>"%desktop_dir%\桌面备份.url"
  19. exit
复制代码

TOP

返回列表