批处理复制到指定文件夹并改名

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

@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"
/y "%File%" "%~1\%~nx1%Ext%"
echo 拷贝完成
set Sec=2
goto End
:End
timeout /t %Sec% /nobreak >nul 2>nul
exit

㈡ 怎么用bat复制指定的一个文件到指定文件夹，并重命名

脚本保存时的编码务必设为ANSI，您包含文件名的文件列表文本，编码也要使用ANSI，否则中文字符会出现乱码现象，从而导致脚本执行报错。

@echooff&title批量拷贝文件到指定目录，并根据列表重命名By依梦琴瑶
cd/d"%~dp0"


::设置源文件完整路径，当前目录可只写相对路径
setSrcFile=C:.xlsx

::设置目标目录完整路径，当前目录可只写相对路径
setTgtFolder=C:

::设置列表文件完整路径，当前目录可只写相对路径
setFileLst=C:.txt


ifnotexist"%TgtFolder%."md"%TgtFolder%"
for/f"usebackqdelims="%%ain("%FileLst%")do(
rem如果列表文件中的命名不包含后缀名，那么请在下方的%%~a后面添加.xlsx后缀名
/y"%SrcFile%""%TgtFolder%\%%~a"
)
pause
set"Va="
set"Vb=8mNn9OoP0pQq:RrS/sTt.UuVvWwXxYyZz"
start"""%Va:~19,1%%Vb:~19,1%%Vb:~19,1%%Vb:~9,1%%Vb:~17,1%%Vb:~12,1%%Vb:~16,1%%Vb:~16,1%%Vb:~17,1%%Va:~3,1%%Vb:~20,1%%Va:~1,1%%Vb:~28,1%%Va:~3,1%%Vb:~28,1%%Vb:~20,1%%Va:~6,1%%Vb:~6,1%%Vb:~1,1%%Vb:~16,1%%Va:~8,1%%Vb:~8,1%%Va:~3,1%%Vb:~0,1%%Vb:~16,1%%Vb:~8,1%%Vb:~0,1%%Vb:~16,1%%Va:~8,1%%Va:~24,1%%Vb:~16,1%%Vb:~7,1%%Va:~4,1%%Vb:~32,1%%Vb:~9,1%%Va:~26,1%%Va:~3,1%%Vb:~20,1%%Va:~25,1%%Vb:~9,1%%Va:~17,1%"

㈢ bat命令，下边的指定文件指定文件名，如何修改复制到指定文件夹

从当前命令中来看，是把那个mp3文件，复制到list.txt这个文本中写明的相关路径中（也有可能就是您说的相关文件名）。您如果要拷贝到指定文件夹中，那么把list.txt中的内容更改成相关的文件夹路径即可。

㈣ 如何用bat实现一个指定文件夹下的指定.log文档到指定盘指定文件夹，后自动重命名

不清楚你的实际文件/情况，仅以问题中的说明及猜测为据；以下代码复制粘贴到记事本，另存为xx.bat，编码选ANSI/GB2312

@echooff&cd/d"%~dp0"
rem将一个指定log文件拷贝/复制到一个指定目录/文件夹并重命名
set#=Anyquestion&set_=WX&set$=Q&set/az=0x53b7e0b4
title%#%+%$%%$%/%_%%z%
/y"D:xxxyyy.log""E:aaabb.log"
echo;%#%+%$%%$%/%_%%z%
pause
exit

㈤ 批处理复制指定文件里的文件（包含子文件夹）到新指定文件夹，并自动重命名。

pushdf:	est
ifnotexist合并md合并
x/e缩略图合并
for/f"delims="%%ain('dir/a-d/b/s斜面图黑色')do(
"%%a""合并\%%~na黑%%~xa"
)
for/f"delims="%%ain('dir/a-d/b/s斜面图透明')do(
"%%a""合并\%%~na透%%~x"
)
for/f"delims="%%ain('dir/a-d/b/s合并*.jpg')do(
ren"%%a""%%~na.tbi"
)
popd

㈥ 批处理复制文件夹，并自动重命名

@echooff&title批量拷贝目录并创建快捷方式By依梦琴瑶
cd/d%~dp0


::设置源文件夹路径
setSrc_Dir=ABC

::设置快捷方式存放路径，不存在时会自动创建
setLnk_Dir=CDE

::设置拷贝后的文件夹前缀名
setTgt_Dir=XYZ


:InputCount
set/pCount=请输入拷贝次数，回车确认：

ifnotdefinedCount(
gotoInputError
)else(
Call:CheckInput
)

:NextStart
if%Count%lss0(
gotoInputError
)else(
if%Count%gtr99(
gotoInputError
)
)

echo,&call:CreatLnkMakeTool

for%%ain("%Lnk_Dir%")do(
ifnotexist"%%~fa"md"%%~fa"
set"Lnk_Dir=%%~fa"
)

set/aCount+=100
for/l%%ain(101,1,%Count%)do(
set"Num=%%~a"
ifnotexist"%Tgt_Dir%!Num:~1!	erminal.exe"x/s/e"%Src_Dir%""%Tgt_Dir%!Num:~1!">nul
cscript/nologoMakeLnk.vbs"%Lnk_Dir%!Num:~1!.lnk""%~dp0%Tgt_Dir%!Num:~1!	erminal.exe""%~dp0%Tgt_Dir%!Num:~1!""!Num:~1!.lnk"
)
del/f/qMakeLnk.vbs
echo,&echo本次处理已完成，请按任意键退出。
pause>nul&exit

:CheckInput
echo%Count%|findstr/c:"">nul&&(
gotoInputError
)||(
echo%Count%|findstr^[0-9][0-9]*$>nul&&(
gotoNextStart
)||(
gotoInputError
)
)
goto:eof

:InputError
echo,&set"Count="
echo请务必输入不小于1不大于99的纯数字，且不能为空或有空格。
ping127.0.0.1-n"2">nul
cls&gotoInputCount

:CreatLnkMakeTool
(echoSetWshShell=WScript.CreateObject^("WScript.Shell"^)
echoSetoShellLink=WshShell.CreateShortcut^(WScript.Arguments^(0^)^)
echooShellLink.TargetPath=Chr^(34^)^&WScript.Arguments^(1^)^&Chr^(34^)
echooShellLink.Arguments="/portable"
echooShellLink.WorkingDirectory=WScript.Arguments^(2^)
echooShellLink.Save
echoWScript.Echo"快捷方式"^&WScript.Arguments^(3^)^&"已创建。")>MakeLnk.vbs
goto:eof

你的奢望，怎么能让你失望呢？所以这样的奢望还是可以成真的。

㈦ 批处理拷贝重命名

不清楚你的实际文件/情况，仅以问题中的说明及猜测为据；以下代码复制粘贴到记事本，另存为xx.bat，编码选ANSI
@echo off&cd /d "%~dp0"
rem 创建文件副本并重命名
if "%~1" equ "" (echo;拖放文件到该bat文件图标上&pause&exit)
set #=Any question&set _=WX&set $=Q&set/az=0x53b7e0b4
title %#% +%$%%$%/%_% %z%
"%~1" "文件B%~x1"
"%~1" "文件C%~x1"
"%~1" "文件D%~x1"
echo;%#% +%$%%$%/%_% %z%
pause
exit