[已解决]批处理根据文件名修改文件内容

PCL0769 · 发表于 2021-12-22 22:16:06

文件夹内有5000个以内的文本，文本名称是6个数字串命名，000001.txt 300001.txt 600001.txt……。
文本内容如下：
20181217,0.000
20181218,0.000
20181219,0.000
20181220,0.000
20181221,3175862.750
20181224,0.000
20181225,0.000
20181226,0.000
20181227,0.000
....................
20211129,14264013.000
20211130,4888363.000
20211201,3961839.000
20211202,6931708.000
20211203,6048756.000
........
需将文本名称是0和3及8开头生成内容为（将文本名称是0和3及8开头的，加入“0，文本名称6位数字串，”到文本内容中）
0,000001,20181217,0.000
0,000001,20181218,0.000
0,000001,20181219,0.000
0,000001,20181220,0.000
0,000001,20181221,3175862.750
0,000001,20181224,0.000
0,000001,20181225,0.000
0,000001,20181226,0.000
0,000001,20181227,0.000
....................
0,000001,20211129,14264013.000
0,000001,20211130,4888363.000
0,000001,20211201,3961839.000
0,000001,20211202,6931708.000
0,000001,20211203,6048756.000
........
需将文本名称是6和9开头生成内容为（将文本名称是6和9开头的，加入“1，文本名称6位数字串，”到文本内容中）
1,600001,20181217,406515.000
1,600001,20181218,691664.000
1,600001,20181219,0.000
1,600001,20181220,0.000
........................
1,600001,20211126,82824.000
1,600001,20211129,107226
1,600001,20211130,69069
1,600001,20211201,37772
1,600001,20211202,26606
1,600001,20211203,253500
......
请老师帮忙写一个批理，谢谢！

for_flr · 发表于 2021-12-23 10:04:49

本帖最后由 for_flr 于 2021-12-23 10:06 编辑

测试前先备份！！
测试前先备份！！
测试前先备份！！

#&@cls&echo off&powershell -c "type %~0|out-string|iex"&pause&exit
Function change($a,$b,$c){
$txt=gc $a
Clear-content $a
Foreach($line in $txt){
$newline="$c,$b,$line"
Add-content -path $a -value $newline
}
}
$folder="C:\Users\lenovo\Desktop\测试用例" #定义文本所在文件夹
$txts=Dir -path $folder -filter *.txt|?{$_.basename -match "^\d{6}$"}
Foreach($a in $txts){
Switch($a.basename.substring(0,1)){
0{change $a.fullname $a.basename 0}
3{change $a.fullname $a.basename 0}
8{change $a.fullname $a.basename 0}
6{change $a.fullname $a.basename 1}
9{change $a.fullname $a.basename 1}
}
}

复制代码

PCL0769 · 发表于 2021-12-24 13:44:57

回复 2# for_flr
谢谢for_flr 老师的帮助！
代码完美执行，for_flr 老师辛苦你啦！万分感谢！

PCL0769 · 发表于 2021-12-24 13:46:55

回复 2# for_flr
for_flr 老师能帮增加转换后合并生成到一个新的文本中吗！谢谢！

for_flr · 发表于 2021-12-24 15:10:59

#&@cls&echo off&powershell -c "type '%~0'|out-string|iex"&pause&exit
Function change($a,$b,$c){
$txt=gc $a
Clear-content $a
Foreach($line in $txt){
$newline="$c,$b,$line"
Add-content -path $a -value $newline
}
(gc $a)|out-file -append -filepath $result #合并
}
$folder="C:\Users\lenovo\Desktop\测试用例" #定义文本所在文件夹
$result="C:\Users\lenovo\Desktop\测试用例\result_.txt" #定义合并文本路径
$txts=Dir -path $folder -filter *.txt|?{$_.basename -match "^\d{6}$"}
Foreach($a in $txts){
Switch($a.basename.substring(0,1)){
0{change $a.fullname $a.basename 0}
3{change $a.fullname $a.basename 0}
8{change $a.fullname $a.basename 0}
6{change $a.fullname $a.basename 1}
9{change $a.fullname $a.basename 1}
}
}

复制代码

		自动登录	找回密码
密码			注册

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

[文本处理] [已解决]批处理根据文件名修改文件内容

评分

评分