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

[文本处理] [已解决]批处理文本字符截取重命名文件问题

[已解决]我有一系列文件,需要将文件名的冗余部分去除掉,冗余部分字符长度不一致,没法以固定长度字符截取。现想求教,如何按照某个字符所在位置截取掉冗余部分!文件名格式大致如下:
XXXXXXX_文件名1_XXXXXXXXXX;  改成 文件名1
XXXXXX_文件名2_XXXXXXXXXX;改成 文件名2
XXXXXXXXX_文件名3_XXXXXXXXXX;改成文件名3
现在想读取第一个下划线位置,然后去除掉前半部分,最后一个下划线位置,去除后半部分!
求问!!!

回复 6# Batcher


    完美!谢谢

TOP

回复 1# 其实很简单
  1. @echo off
  2. for /f "delims=" %%i in ('dir /b /a-d *_*_*') do (
  3.     for /f "tokens=1,2,* delims=_" %%a in ("%%i") do (
  4.         ren "%%a_%%b_%%c" "%%b%%~xi"
  5.     )
  6. )
复制代码
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

回复 4# went


    太对了哥!目的达到了 就是我看不太懂  谢谢大佬!!

TOP

本帖最后由 went 于 2020-7-7 15:40 编辑

不包括后缀里的_
  1. //&cls&@ dir /s /b /a-d "*_*_*" | cscript -E:javascript -Nologo "%~0" &pause&exit
  2. var fso=new ActiveXObject("Scripting.FileSystemObject");
  3. var line=null;
  4. var newName=null;
  5. while(!WSH.StdIn.AtEndOfStream){
  6. try{
  7. line=WSH.StdIn.ReadLine();
  8. newName=fso.GetBaseName(line).replace(/^.*?_(.*)_[^_]*$/,"$1");
  9. newName+=fso.GetExtensionName(line) == "" ? "" : "."+fso.GetExtensionName(line);
  10. WSH.Echo(line);
  11. WSH.Echo(newName);
  12. fso.MoveFile(line,newName);
  13. WSH.Echo("------------------------------------");
  14. }catch(e){
  15. WSH.Echo(e.message);
  16. }
  17. }
复制代码

TOP

回复 2# 不知道是谁


    可能是我表述 有问题 ,我表达的是对文件名的重命名问题

TOP

回复 1# 其实很简单

感觉你的语言表达很有问题,是一个文件夹下的很多个文件需要重命名,还是一个文本文件中的内容需要修改,没看懂我就当是后者了。
  1. @echo off
  2. for /f "tokens=2 delims=_" %%i in ('type old.txt') do (
  3. echo %%i>>new.txt
  4. )
  5. pause
复制代码

TOP

返回列表