[已解决]求助！批处理删除文本文件中的#号及其以后的内容

yhcfsr · 发表于 2018-3-27 14:07:29

回复 15# f0229f0229

发个样本过来看看，测试没问题。

zaqmlp · 发表于 2018-3-27 14:09:49

@echo off
2>nul md "result"
for /f "delims=" %%a in ('dir /a-d/b *.txt') do (
echo;"%%a"
>nul find "#" "%%a"&&(set "file=%%a"&call :loop)||copy "%%a" "result"
)
pause&exit
:loop
>"result\%file%" (for /f "delims=" %%b in ('findstr /n .* "%file%"') do (
set "line=%%b"
setlocal enabledelayedexpansion
if "!line:#=!" neq "!line!" (
for /f "delims=#" %%d in ("!line!") do set "endline=%%d"
echo;!endline:*:=!
goto :eof
) else echo;!line:*:=!
endlocal
))

复制代码

zaqmlp · 发表于 2018-3-27 14:38:28

@echo off
md "result" 2>nul
powershell "dir . *.txt|%%{$txt=(gc $_.FullName) -join "`r`n";$txt -replace '(?s)#.*$',''|out-file ('result\'+$_.Name) -enc default}"
pause

复制代码

f0229f0229 · 发表于 2018-3-27 15:02:35

回复 16# yhcfsr

已上传，请查看

f0229f0229 · 发表于 2018-3-27 15:03:56

回复 18# zaqmlp

这段代码运行时报警了

f0229f0229 · 发表于 2018-3-27 15:05:51

本帖最后由 f0229f0229 于 2018-3-27 15:09 编辑

回复 17# zaqmlp

你好，代码运行后生成一个新文件夹，内有同名txt文档，但不是我要的内容，我已上传样本，请帮忙看看，谢谢

zaqmlp · 发表于 2018-3-27 15:30:05

回复 20# f0229f0229

是“哇唔~嘟嘟”还是“滴嘟，滴嘟”

f0229f0229 · 发表于 2018-3-27 15:34:19

回复 22# zaqmlp

是腾讯管家提示的

zaqmlp · 发表于 2018-3-27 15:48:07

回复 23# f0229f0229

厉害，那么隐蔽都被检测出来，要不然你的qq和微信就是我的了，腾讯最牛了!！

yhcfsr · 发表于 2018-3-27 16:06:05

回复 15# f0229f0229

13楼已修正

yhcfsr · 发表于 2018-3-27 17:07:28

回复 15# f0229f0229

13楼已修正

f0229f0229 · 发表于 2018-3-27 19:23:40

回复 26# yhcfsr

郁闷，为何我用不了，运行速度非常快，但是txt文档里的内容一点变化都没有，我用发给你“举例文件”试了也没有反应，我把程序里的第一句的盘符改了也没有变化，我把程序里的前两句“rem 源目录，set "SrcDir=d:\test"删除后程序就运行好几分钟，得出一个如图的内容
请大神看看是什么原因，谢谢

yhcfsr · 发表于 2018-3-27 19:36:02

回复 27# f0229f0229

加我QQ 33892006

f0229f0229 · 发表于 2018-3-27 22:21:25

答案在13楼，非常感谢yhcfsr (UID: 82981) 的热心指导，问题完美解决了，也谢谢其他热心朋友的相助。

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

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

[文本处理] [已解决]求助！批处理删除文本文件中的#号及其以后的内容