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

[文件操作] 批处理建立同名文件夹,并将对应文件移动到同步文件夹中

当前目录下有若干文件,可能.docx   .PPT .xls .PDF 等文件,不限制文件扩展名

求  1、建立和文件同名的文件夹  
     2、移动相关文件到同名文件夹中



如   有文件  abc.pdf    则先建立 文件夹   abc   然后把  abc.pdf 移动到 abc   中   
          移动前  当前目录下 \abc.pdf   移动后  当前目录下  \abc\abc.pdf



谢谢

本帖最后由 hfxiang 于 2022-12-3 09:53 编辑
  1. @for %%a in (*) do @if "%%~fa" NEQ "%~f0" @md "%%~na">nul 2>nul&@move "%%a" ".\%%~na">nul 2>nul
复制代码

TOP

回复 2# hfxiang


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

TOP

辛苦了 二位 非常感谢   

需要排除bat  自身 怎么能排除掉呢

TOP

回复 3# Batcher


    哦,由于俺是直接在命令行窗口测试的,因此欠考虑,俺改一下。谢谢提醒

TOP

2种思路:
1.不把bat文件放在要处理的目录中,cd一下,定位到目录;
2.if排除bat文件。

TOP

回复 4# qd2024


    已修订

TOP

给别人写代码,建议分行写,让大家看的清楚明白,也便于修改。自用随意。

TOP

回复 8# qixiaobin0715


    好的,接受建议,尽可能分行写(主要是本人太懒了

TOP

回复 1# qd2024


test_1.bat
  1. @echo off
  2. cd /d "%~dp0"
  3. for %%a in (*) do (
  4.     if "%%~fa" neq "%~f0" (
  5.         md "%%~na" 2>nul
  6.         move "%%a" ".\%%~na"
  7.     )
  8. )
复制代码
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

回复 1# qd2024


test_2.bat
  1. @echo off
  2. cd /d "%~dp0"
  3. for /f "delims=" %%a in ('dir /b /a-d ^| findstr /v /x "%~nx0"') do (
  4.     md "%%~na" 2>nul
  5.     move "%%a" ".\%%~na"
  6. )
复制代码
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

谢谢大家 辛苦了

TOP

返回列表