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

【20元红包】求写一批处理,具体要求已经写清楚,有的请联系

结算方式:加QQ313666691,我会发送一个符合格式的文件夹,通过QQ远程协助,让我看你执行后的效果。
             效果OK,我发红包,你把批处理交给我。
有意向的请跟帖回复,并注明QQ昵称。

要求如下:

根目录/一层文件夹/若干文件

在一层文件夹内,新建跟“一层文件夹” 同名文件夹, 并把原先所有"一层文件"夹内的所有文件,移动进入新建立的文件夹内。形成以下格式


根目录/123/若干文件
根目录/123/123/若干文件

其中根目录下面    有  若干个一层文件夹,需要识别全部并操作。

本人曾交易成功记录:
http://www.bathome.net/thread-45247-1-1.html

  1. @echo off
  2. for /f "delims=" %%a in ('dir /ad /b "%~dp0"') do (
  3.     md "%~dp0%%a\%%a\" 2>nul
  4.     for /f "delims=" %%b in ('dir /a-d /b "%~dp0%%a\" 2^>nul') do move "%~dp0%%a\%%b" "%~dp0%%a\%%a\%%b"
  5.     for /f "delims=" %%b in ('dir /ad /b "%~dp0%%a\" 2^>nul^|find /v "%%a"') do move "%~dp0%%a\%%b" "%~dp0%%a\%%a\"
  6. )
  7. pause
复制代码
提供bat代写,为你省时省力省事,支付宝扫码头像支付
微信: unique2random

TOP

  1. @echo off
  2. for /f "delims=" %%a in ('dir /b /ad') do (
  3.     move "%%a" @ >nul
  4.     md "%%a"
  5.     move @ "%%a" >nul
  6.     move "%%a\@" "%%a\%%a" >nul
  7.     echo 正在移动==》 %%a
  8. )
  9. pause
复制代码
#&cls&@powershell "Invoke-Expression ([Io.File]::ReadAllText('%~0',[Text.Encoding]::UTF8))" &pause&exit

TOP

回复 3# ivor


    QQ远程看代码后    效果非常满意      20元红包  已经到账  再次感谢。

TOP

回复 4# 孤独浪侠


   红包收到, 已捐助论坛
#&cls&@powershell "Invoke-Expression ([Io.File]::ReadAllText('%~0',[Text.Encoding]::UTF8))" &pause&exit

TOP

回复 5# ivor


收到。
捐助分+20
感谢对论坛的支持!
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

返回列表