2021-09-23bat批处理：给当前目录下所有文件的每一行开头加一个字符（已解决）

问题：

别的专业关系比较好的学长机缘巧合要用批处理给每个文件的每一行加个字符，他刚好从网上找了一个能用的。

用法就是把下面这个文本复制粘贴到写字本保存后，把后缀名txt改成bat，再把这个保存好的文件放到要处理的文件所在的文件夹下，双击打开就自动运行了。

但是这个方法，只能处理一个文件。文件里说有任何问题可以加他qq，学长发了申请没被通过所以就把文件给我看看了。反正我也没学过，大概看了看应该是少了一个循环，所以就自己试着解一下。
我觉得直接看太乱了我就复制粘贴到csdn的文章中用shell代码框起来，有颜色看着顺眼多了，反正都粘进来了，捎带着写个文章好了哈哈哈哈。

原代码：只能处理一个文件

<# :
cls&echo off
rem 对当前目录下所有txt文本文件内每一行的行首/开头插入/添加指定字符串内容
set #=Any question&set @=WX&set $=Q&set/az=0x53b7e0b4
title %#% +%$%%$%/%@% %z%
cd /d "%~dp0"
set "newfolder=#result"
if not exist "%newfolder%" md "%newfolder%"
powershell -NoProfile -ExecutionPolicy bypass "Invoke-Command -ScriptBlock ([ScriptBlock]::Create([IO.File]::ReadAllText('%~f0',[Text.Encoding]::GetEncoding('GB2312')))) -Args '%~f0'"
echo;%#% +%$%%$%/%@% %z%
pause
exit
#> 
$insertword="J";
$newfolder=get-item -liter $env:newfolder;
$self=get-item -liter $args[0];
$path=$self.Directory.FullName;
$files=@(dir -liter $path|?{('.txt' -eq $_.Extension) -and ($_ -is [System.IO.FileInfo])});
if($files.length -ge 1){
$enc=[Text.Encoding]::GetEncoding('GB2312');
write-host $files[0].Name;
$arr=New-Object -TypeName System.Collections.ArrayList;
$text=[IO.File]::ReadAllLines($files[0].FullName,$enc);
for($j=0;$j -lt $text.length;$j++){
$line=$insertword+$text[$j];
[void]$arr.add($line);
}
$newfile=$newfolder.FullName+'\'+$files[0].Name;
[IO.File]::WriteAllLines($newfile,$arr,$enc);
}

我的分析：

那么问题来了，循环能抄下面的，但是文件个数怎么办。直接files.length吧,那原来那里写的-ge又是干嘛的?
问了一下师父，师父百度到了关键词，所以ge是greater and equal，lt'是less than’以此类推各种数值判断。于是需要看清除的，和只需要理解的部分就都明白了。然后就改好啦_{希望学长以后都能常用的到，哈哈哈}

成品：

就是在if下插入了一个for循环，注意变量i前要加$符号。

<# :
cls&echo off
rem 对当前目录下所有txt文本文件内每一行的行首/开头插入/添加指定字符串内容
set #=Any question&set @=WX&set $=Q&set/az=0x53b7e0b4
title %#% +%$%%$%/%@% %z%
cd /d "%~dp0"
set "newfolder=#result"
if not exist "%newfolder%" md "%newfolder%"
powershell -NoProfile -ExecutionPolicy bypass "Invoke-Command -ScriptBlock ([ScriptBlock]::Create([IO.File]::ReadAllText('%~f0',[Text.Encoding]::GetEncoding('GB2312')))) -Args '%~f0'"
echo;%#% +%$%%$%/%@% %z%
pause
exit
#>
$insertword="J";
$newfolder=get-item -liter $env:newfolder;
$self=get-item -liter $args[0];
$path=$self.Directory.FullName;
$files=@(dir -liter $path|?{('.txt' -eq $_.Extension) -and ($_ -is [System.IO.FileInfo])});
if($files.length -ge 1){
for($i=0;$i -lt $files.length;$i++){
$enc=[Text.Encoding]::GetEncoding('GB2312');
write-host $files[$i].Name;
$arr=New-Object -TypeName System.Collections.ArrayList;
$text=[IO.File]::ReadAllLines($files[$i].FullName,$enc);
for($j=0;$j -lt $text.length;$j++){
$line=$insertword+$text[$j];
[void]$arr.add($line);
}
$newfile=$newfolder.FullName+'\'+$files[$i].Name;
[IO.File]::WriteAllLines($newfile,$arr,$enc);
}
}