[文件操作] 【已解决】批处理怎样更简单的删除文件名的前缀和后缀？

@echo off
for /f "tokens=1* delims=_" %%a in ('dir /b /a-d ^|find "_" ^|find /v "%~nx0"') do (
	for %%e in ("%%b") do (
		set str1=%%~ne
		set str2=%%~xe
		set str3=%%a_%%b
		setlocal enabledelayedexpansion
		ren "!str3!" "!str1:~0,-4!!str2!"
		endlocal
	)
)
pause
复制代码

@echo off&chcp 65001
setlocal enabledelayedexpansion
for %%a in (*.) do (
set a=%%a
ren !a! !a:~4,-4!
)
pause
复制代码

@echo off&setlocal enabledelayedexpansion
for /f "tokens=1,*delims=_" %%1 in (1.txt)do (
	set col=0
	set old_name=%%1_%%2
	set str=%%2#
	for /l %%3 in (1,1,20)do (
		call set mid=%%str:~%%3,1%%
		set /a col+=1
		if !mid!==_ (
			set /a b=!col!			
		)
	)
	call set new_name=%%str:~,!b!%%
	ren !old_name! !new_name!
)
复制代码

@echo off&powershell -nologo -executionpolicy bypass "gc 1.txt|%%{ren $_ ([regex]::Matches($_,'(?<=.+_).+(?=_.+)').value) -ErrorAction Ignore}"
复制代码