[文本处理] 可以用批处理将一个200M的TXT文件切割成5个TXT文件吗？

yaboo

在网上下载了一个200M的字典文件

由于文件太大，使用困难

求高人写一个批处理代码，将TXT文件切割成5个小的TXT文件

andyrave

@echo off & setlocal enableDelayedExpansion
set a=
set/p a=请将文件拖入:
cls
echo 正在计算文本行数，请稍等......
for /f "delims=" %%i in (%a%) do set/a b+=1
cls
set c=
set/p c=请输入要得到的文件个数:
set/a d=%b%/%c%+3
cls
echo 正在分割，请稍等......
set e=1
set f=0
for %%k in (%a%) do set wjm=%%~nk
for /f "delims=" %%j in (%a%) do (
echo %%j>>%wjm%!e!.txt
set/a f+=1
if !f! GEQ %d% set/a e+=1 & set f=0
)
cls
echo 分割完成
if not exist %wjm% md %wjm%
move %wjm%*.txt %wjm%>nul 2>nul
pause>nul
复制代码

loquat

不知道我这样行不行，发一个软件给你

冷玉公子

@Echo Off&SetLocal EnableDelayedExpansion
Set "File=Netstat.bat"
For /F "tokens=1 delims=:" %%A In ('Findstr /n "." %File%') Do Set "Value=%%A"
Set /A "Value=%Value%/5"&Set "V=1"&Set "FileV=1"
For /F "tokens=*" %%A In (%File% Do (
	If !V! Leq 4 If !V! Equ %Value% Set "V=0"&Set "FileV+=1"
	Echo %%A > File_!FileV!.txt
	Set /A "V+=1"
)
Pause
复制代码

forfiles

split.exe