[megaloman]

joskiyy, Если имеем аккаунты в формате в текстовом файле, то пропишите свои пути, и: вуаля!

Код:

@Echo Off
	Set "Account=Z:\Soft_In\account.txt"
	Set "BoxOut=Z:\Box_Out"
	Set "FileOut=1.txt"

	Set /A N=1000
	FOR /F "usebackq tokens=1,2,3 delims=:" %%i IN ("%Account%") DO (
		Set /A N+=1
		Call Md "%BoxOut%\%%N:~1%%"
		Call Pushd "%BoxOut%\%%N:~1%%" &&(
			>"%FileOut%" (
			  (Echo ])
			  (Echo Логин "%%i")
			  (Echo Пароль "%%j")
			  (Echo Имя "%%k")
			  (Echo ])
			)
			Popd
		)
	)
Exit /B

Если экаунтов >999 поставить Set /A N=10000 или больше

Было до доработки

Код:

@Echo Off
	Set "Account=Z:\Soft_In\account.txt"
	Set "BoxOut=Z:\Box_Out"
	Set "FileOut=1.txt"

	Set /A N=1000
	FOR /F "usebackq tokens=1,2,3 delims=:" %%i IN ("%Account%") DO (
		Set /A N+=1
		Call Md "%BoxOut%\%%N:~1%%"
		Call Pushd "%BoxOut%\%%N:~1%%" &&(
			Call >"%FileOut%"  Echo ]
			Call >>"%FileOut%" Echo Логин "%%i"
			Call >>"%FileOut%" Echo Пароль "%%j"
			Call >>"%FileOut%" Echo Имя "%%k"
			Call >>"%FileOut%" Echo ]
			Popd
		)
	)
Exit /B