Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Аватара для gora

Ушёл из жизни


Сообщения: 6021
Благодарности: 3491

Профиль | Отправить PM | Цитировать


Структура папок как в Respath-e, скрипт создается прямо в нужной папке
Код: Выделить весь код
@Echo off
setlocal enabledelayedexpansion
For /F "UseBackQ Delims=" %%a In (`Dir Resources /B /O:N 2^>nul`) Do (
	Set "scrpt=Resources\%%a\rcscript.txt"
	Echo [FILENAMES]>!scrpt!
	Echo Exe = "Backup\%%a">>!scrpt!
	Echo SaveAs = "NewFiles\%%a">>!scrpt!
	Echo Log = "Logs\%%a.log">>!scrpt!
	Echo.>>!scrpt!
	Echo [COMMANDS]>>!scrpt!
	For /F "UseBackQ Delims=" %%I In (`Dir Resources\%%a /B /O:EN 2^>nul`) Do (
		If Not %%~xI==.txt (
			If %%~xI==.res Set Resrs=DIALOG
			If %%~xI==.ico Set Resrs=ICONGROUP
			If %%~xI==.bmp Set Resrs=BITMAP
			If %%~xI==.avi Set Resrs=AVI
						
			Echo -addoverwrite "Resources\%%a\%%I", !Resrs!, %%~nI,>>!scrpt!
		)
	)
)
pause
Exit
Это сообщение посчитали полезным следующие участники:

Отправлено: 14:54, 10-10-2009 | #2