批处理脚本从字符串/文件名中删除动态文本后的所有内容

Question

我有一个包含文件名的字符串，如下所示的批处理脚本行：

set "file1=name.php_2017_23_08_12_22_07"
set "file2=name.vbs_2016_16_12_12_13_03"
....

现在，正如您在上面看到的，文件名及其扩展名的列表多种多样，我需要分别获得具有实际扩展名(.php，.vbs(的真实文件名。因此，当我传入带有扩展名的文件名的函数时，我应该得到如下所示的实际文件名：

call :restoreFile %file2% ".vbs"

应该给我输出，删除变量%file2%.vbs后的所有内容：

name.vbs

其他变量也是如此。

如何设置这样的函数，从文件名字符串中删除动态子字符串？

我尝试了下面的代码，但这不适用于动态子字符串或文本，可以从变量中替换：

set targetfile=%file2:.vbs=&rem.%

Answer 1

无需指定扩展名 - 它仍在名称中。

使用for /f在第一个下划线处拆分。

:restoreFile
Set "FileName="
For /f "tokens=1* delims=_" %%N in ("%~1") Do Set "FileName=%%N"
If defined FileName Echo Ren %1 %FileName%
Goto :Eof

您甚至可以将date_time放在扩展程序的前面，从而避免可能的欺骗：

:restoreFile
Set "FileName="
For /f "tokens=1* delims=_" %%N in ("%~1") Do Set "FileName=%%~nN_%%M%%~xN"
If defined FileName Echo Ren %1 %FileName%
Goto :Eof

ren 命令前面带有回显，如果输出看起来正常，请删除回显。