Advertisement
Guest User

Untitled

a guest
Jan 16th, 2018
102
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.41 KB | None | 0 0
  1. @Echo Off
  2. SetLocal enabledelayedexpansion
  3. Set list=file.txt
  4. :: число строк в файле на выходе
  5. Set str=100000
  6.  
  7. Set Num=%str%& Set File=0
  8. For /F "tokens=* usebackq delims=" %%i In ("%list%") Do (
  9. Set /a Num+=1
  10. If !Num! GEQ %str% (
  11. Set Num=0
  12. Set /a File+=1
  13. Set nFile=0!File!
  14. Set nFile=!nFile:~-2!
  15. Echo %%i>list!nFile!.txt
  16. ) Else Echo %%i>>list!nFile!.txt
  17. )
  18. Pause
  19. Exit
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement