xczxczxcz

最后一列全为0才会复制，不要牙膏。双击按提示操作。

@echo off & cd/d "%~dp0" & setlocal EnableDelayedExpansion
echo 把【文件夹】拖到此窗口中，会处理子目录，非相关文件先移出再运行。
echo;&set /p var=拖入文件夹，并回车：& CLS
for /r "%var%" %%a in (*.txt) do ( for /f "delims=" %%a in ('type "%%a"') do (
		set "space=%%a" & set "space=!space: =/!"
		for /f "delims=" %%a in ("!space!") do if "%%~nxa" neq "0" set "#=#"
	)
	if not defined # ( xcopy /y "%%a" "0_Folder\">nul&&echo 复制 %%~nxa ) else set "#="
)
pause & exit
复制代码

hlyahs

回复 13# xczxczxcz

大神您好，我又来打扰您了orz
之前请您帮忙处理筛选了txt，现在又遇到了一个小问题

就是我现在有很多个这样的txt，每个txt有固定的16列，但行数不一定相同。请问大神能不能用批处理，去判定每个txt的最后一列是否出现0，如果出现0的话，就将这部分txt复制到另一个文件夹中。

感谢大神无私的帮助Orz！期待您的回复...

hlyahs

回复 13# xczxczxcz


    脚本可以使用，处理数据超级方便啊啊啊，我要哭了，谢谢耐心回答，大神你真的好好QAQ!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

xczxczxcz

回复 12# hlyahs

先把你已分离出来的文件 放到任意一个文件里，再把该文件夹拖到批处理上。

@echo off & setlocal EnableDelayedExpansion

md new>nul 2>nul
for /f "delims=" %%a in ('dir/a-d/b "%~1\*.txt"') do (
  set /a n=0
  for /f "delims=" %%i in ('type "%~1\%%a"') do (
     set /a n+=1
     if !n! leq 1 (
     set "str=%%i"
     set "str=!str: =\!"
     for /f "delims=" %%m in ("!str!\..") do if /i "%%~nxm" == "0" move /y "%~1\%%a" "new\"
     )
   )
 )
pause & exit
复制代码

hlyahs

回复 11# xczxczxcz

感动天地QAQ
我开始是双击的bat，原来是要把txt拖进去..蠢哭了我

然后，拆分以后，能再麻烦大神教我一个操作么
大神，我的txt不是拆分成很多个了么，每个txt里面有16列，请问能不能用批处理对所有文本第一行的倒数第二列进行判定，如果数字=1，保留该txt文本，如果数字=0，就把这个txt移动到其他文件夹中
txt打开是这样的，每个txt行数不同，列数相等

不过能把txt拆分开来我已经很感谢了!,大神不管我也没事QAQ，我也可以自己一个一个打开找………………也就几千个文本................要不大神你再救救我吧
啊啊啊啊啊，感觉自己脸皮好厚一直麻烦别人，但是为了生存Orz。。。

xczxczxcz

直接双击批处理

@echo off & setlocal EnableDelayedExpansion
del /q *.log>nul 2>nul
for %%i in (*.txt) do for /f "delims=" %%a in ('type "%%i"') do echo %%a|findstr /i/c:"TPV">nul 2>&1 && set "str=%%a" || echo %%a>>"!str!.log"
pause & exit
复制代码

xczxczxcz

回复 8# hlyahs


    你是不是直接双击批处理的。要把 txt 拖到 批处理 上再松开 就可以了。

xczxczxcz

回复 8# hlyahs

把你的 txt 发来看下，偶测试没问题的。或者你把批处理中的 乱码部分改成相同的英文字符.


把中文改英文，

@echo off & setlocal EnableDelayedExpansion
for /f "delims=" %%a in ('type %1') do echo %%a|findstr /i/c:"TPV">nul 2>&1 && set "str=%%a" || echo %%a>>"!str!.txt"
pause & exit
复制代码

只要你的 txt 中没有中文字符.把 txt 拖到 批处理上。
那个 iconv.exe 没有毒。win10 defender 已查。偶是在官网下的 900多k的。

hlyahs

回复 7# xczxczxcz

大神好，大神还在么？
我把要提取的txt保存成ansi编码后，再次运行bat还是提示语法有错误。
去下载您说的inconv.exe，电脑提示有病毒直接终止下载了,(ps,请问保存到系统目录下是值c盘widows里么？判断语句我不会写...)
大神，救救我这个渣渣吧QAQ,求不要嫌我烦orz

xczxczxcz

回复 6# hlyahs

批处理 也要保存为 ansi 编码。 你的txt 也要保存 为 ansi 编码。

你如果 想要 对 utf 文本也能自动运行。可到本坛 下载 iconv.exe 放到系统目录下。或与 批处理放到一起。再在批处理中加一个判断。你的txt就可以是 utf8/ansi都可以。

http://batch-cn.qiniudn.com/tool/iconv.exe

hlyahs

回复 4# xczxczxcz


    大神您好，报错提示是这样的，用sublime text打开时，中文显示的是乱码，请问我是还有哪里需要修改么？地址，或名称之类的。之前没有接触过批处理，麻烦您了

hlyahs

回复 4# xczxczxcz


    您好！很感谢您提供帮助，我将您给出的语法copy保存为bat运行，用的是ansi编码，但报错提示命令语法不正确。请问您知道该如何解决么？
    非常感谢您的帮助。

xczxczxcz

用这个更简洁

@echo off & setlocal EnableDelayedExpansion
for /f "delims=" %%a in ('type %1') do echo %%a|findstr /b /i /c:"TPV">nul 2>nul && set "名称=%%a" || echo %%a>>"!名称!.txt"
pause & exit
复制代码

==============================

xczxczxcz

把文本拖到批处理上。文本要 ansi 编码。

@echo off & setlocal EnableDelayedExpansion

for /f "tokens=1-2*" %%a in ('type %1') do echo %%a|findstr /b /i /c:"TPV_">nul 2>nul && set "名称=%%a    %%b" || echo %%a  %%b  %%c>>"!名称!.txt"

pause & exit
复制代码

================================

hlyahs

:'(:'(:'(:'(
请问有人么~~~没有学过批处理，编程又是个渣渣，这数据处理起来太复杂，只能投靠各位了QAQ