批处理之家 - Powered by Discuz! Board

标题: [文本处理] [已解决]求助批处理根据文件夹所在的盘符修改指定文本中特定的字符 [打印本页]

作者: 大地 时间: 2023-1-12 15:24 标题: [已解决]求助批处理根据文件夹所在的盘符修改指定文本中特定的字符

求助：根据文件夹所在的盘符修改指定文本中特定的字符
有个文件夹命名为：ABCD 但它不确定在哪个盘符中存在，有时在C盘有时在H盘……。如果找到在F盘中存在，则修改123.ini中内容C:\ABCD 替换为 F:\ABCD
如果在K盘中存在，则改为K:\ABCD 并且在文本中不止一处，可能有多处，要全部替换完毕，
哪位大神帮忙写一下，谢谢!

作者: idwma 时间: 2023-1-12 17:06

/*&@cls&echo off
cscript -nologo -e:jscript %0
pause
exit
*/

a='123.ini';
b='ABCD';
c=/f:\\ABCD/;
fs=WSH.CreateObject('Scripting.FileSystemObject');
d=fs.OpenTextFile(a).ReadAll();
for(i=65;i<91;i++){
    if(fs.FolderExists(String.fromCharCode(i)+':\\'+b)){
	e=fs.OpenTextFile(a,2);
	e.Write(d.replace(c,String.fromCharCode(i)+':\\'+b));
    }
}
复制代码

作者: 大地 时间: 2023-1-12 18:45

回复 2# idwma

测试成功谢谢老大

不过我的另一个精简系统中无法使用能不能不用VB语句用纯DOS式的批处理语句写这样局限性小，应用范围广一点。

作者: idwma 时间: 2023-1-12 20:04

回复 3# 大地

@echo off
setlocal enabledelayedexpansion
set a=abcdefghijklmnopqrstuvwxyz
for /l %%i in (0;1;25) do (
    set "b=!a:~%%i,1!:\ABCD"
    if exist "!b!" (
	(for /f "delims=" %%j in (123.ini) do (
	    set "c=%%j"
	    call echo %%c:C:\ABCD=!b!%%
	))>123.txt
    )
)
move /y 123.txt 123.ini
pause
复制代码

作者: 大地 时间: 2023-1-12 21:02

回复 4# idwma

老大厉害成功了语句我虽然还有点看不懂慢慢理解吧谢谢

作者: 大地 时间: 2023-1-13 19:38

回复 4# idwma

老大假设其它条件完全一样，如果同时修改三个文件，123.ini 456.ini 789.ini 该如何添加语句，我瞎试了一下，加个逗号没能成功哈

作者: idwma 时间: 2023-1-14 18:15

@echo off
setlocal enabledelayedexpansion
set a=abcdefghijklmnopqrstuvwxyz
for /l %%i in (0;1;25) do (
    set "b=!a:~%%i,1!:\windows"
    if exist "!b!" (
	for %%k in ("123.ini" "456.ini" "789.ini") do (
	    (for /f "usebackq delims=" %%j in (%%k) do (
		set "c=%%j"
		call echo %%c:C:\ABCD=!b!%%
	    ))>123.txt
	    move /y 123.txt %%k
	)
    )
)
pause
复制代码

欢迎光临批处理之家 (http://bbs.bathome.net/)