- @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
复制代码
|