[文本处理] 批处理怎样按文件名奇偶数移动文件到指定文件夹？

yingtianchang

某个文件夹下有几千个文本文件，编号都是数字，没有规律，只能区分奇偶数，能不能根据文件名的奇偶数移动到两个文件夹，比如说名称为奇数的文件移动到1文件夹，偶数的移动到2文件夹。各位大神帮帮忙，谢谢啦

WHY

for %%i in (0 2 4 6 8) do move *%%i.txt 2\

xxpinqz

楼上，move用法错了，会导致灾难。。。

codegay

nim语言版，有点蛋疼。

import os
import strutils
import re

var dir = getAppDir()
var dest1 = dir / "../1/"
var dest2 = dir / "../2/"

proc 单(name: string): bool = (name.parseInt and 1) == 1
proc 双(name: string): bool = not 单 name

for f in walkDirRec(dir):
    var (dir, name, ext) = splitFile(f)
    var txtname = name & ext
    if ext.toLower == ".txt" and match(name, re"\b\d+\b"):
        if 单(name):
            moveFile(f, dest1 / txtname)
            echo f,"    ===>>   ", dest1

        else:
            moveFile(f, dest2 / txtname)
            echo f,"    ===>>   ", dest2
复制代码

WHY

楼上，move用法错了，会导致灾难。。。
xxpinqz 发表于 2018-7-22 02:00

    ？？
可能会出现的问题是，当文件名由 8 位以上数字组成时，文件被移动到错误的文件夹。这个不属于灾难，把文件移回原来的地方就行。
参考 http://www.bathome.net/viewthrea ... mp;page=1#pid175462

好吧，保险的办法：

@echo off
md 1\ 2\ 2>nul
for /f "delims=" %%i in ('dir /b /a-d *.txt ^| findstr /i "^[0-9]*[13579]\.txt$"') do move %%i 1\
for /f "delims=" %%i in ('dir /b /a-d *.txt ^| findstr /i "^[0-9]*[02468]\.txt$"') do move %%i 2\
pause
复制代码

Batcher

回复 5# WHY


    第3行有个笔误，echo需要改成move

WHY

回复 6# Batcher


    感谢指正。

xxpinqz

回复 5# WHY


唉，我记得有个3楼的代码“move %%a 1”，不见了。
不是说你•。。。。