Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- @Echo Off
- SetLocal enabledelayedexpansion
- Set list=file.txt
- :: число строк в файле на выходе
- Set str=100000
- Set Num=%str%& Set File=0
- For /F "tokens=* usebackq delims=" %%i In ("%list%") Do (
- Set /a Num+=1
- If !Num! GEQ %str% (
- Set Num=0
- Set /a File+=1
- Set nFile=0!File!
- Set nFile=!nFile:~-2!
- Echo %%i>list!nFile!.txt
- ) Else Echo %%i>>list!nFile!.txt
- )
- Pause
- Exit
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement