中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！

游客: 注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »

中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » 修改文件名前缀的问题

‹ « [1] [2] »

jmz573515
银牌会员

积分 1212
发帖 464
注册 2006-12-13
状态离线

『第 16 楼』:

'楼主的第一个问题，（VBS写的，只处理当前文件夹）
Set WshShell = WScript.CreateObject("WScript.Shell")
set fso=createobject("scripting.filesystemobject")
on error resume next
set folder=fso.getfolder(WshShell.CurrentDirectory)
set files=folder.files
for each file in files
if lcase(fso.GetExtensionName(file)) ="txt" then
b=b+1
file.name=FSO.GetBaseName(File) & b & ".txt"
end if
next
msgbox "已经将所有txt文件以“基本文件名+序号”的形式命名。",48+4096,"操作完成"

2006-12-24 09:11

handan
初级用户

积分 30
发帖 12
注册 2007-10-19
状态离线

『第 17 楼』:

@echo off
set num=0
for /f "tokens=*" %%i in ('dir /s/b .') do (
set /a num+=1
ren "%%i" "%%~n!num!.txt"
)
pause

2007-11-24 17:25

wooglle
初级用户

积分 23
发帖 14
注册 2010-5-4
状态离线

『第 18 楼』:

综合楼上各种代码，组合了可以处理带空格文件名的代码

@echo off&setlocal EnableDelayedExpansion 

dir /a-d/b|findstr /i ".jpg" >name.txt 

set a=1 

for /f "delims=" %%i in (name.txt) do (

         if not "%%~ni"=="%~n0" ( 

         ren "%%i" "%%~ni!a!%%~xi" 

         set/a a+=1 

         ) 

) 

del name.txt>nul 2>nul

2010-12-2 12:00

Hanyeguxing
银牌会员

正在学习中的菜鸟...

积分 1039
发帖 897
注册 2009-3-1
来自在地狱中仰望天堂
状态离线

『第 19 楼』:

[code]@echo off&setlocal EnableDelayedExpansion
for /f "delims=" %%i in ('dir /a-d/b *.jpg') do (
set/a a+=1
ren "%%i" "%%~ni!a!%%~xi"
)
这样写就可以。
findstr /i ".jpg"在findstr中，点有特殊意义，所以不能这样写
dir本身就不区分文件名的大小写，可以用dir直接*匹配
既然已经确定匹配.jpg，就不需要if not "%%~ni"=="%~n0" 了。

批处理之家 http://bbs.bathome.net/forum-5-1.html

2010-12-2 12:17

‹ « [1] [2] »

请注意：您目前尚未注册或登录，请您注册或登录以使用论坛的各项功能，例如发表和回复帖子等。

可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题

论坛跳转: