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

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

Ветеран


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

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


Цитата root221:
удалить всё до первого проблела »
Может быть, после первого пробела, включительно?

читать дальше »
Код: Выделить весь код
@echo off
setlocal enableextensions enabledelayedexpansion

set sFile=%~1

if defined sFile (
	if exist "%sFile%" (
		call :GetTemporaryName
		
		>"!TemporaryName!" (
			for /f "usebackq delims= " %%i in ("%sFile%") do (
				echo.%%i
			)
		)
		
		>nul copy /y "%sFile%" "%~dpn1.bak"
		>nul copy /y "!TemporaryName!" "%sFile%"
		del /f /q "!TemporaryName!"
	) else (
		echo Can't find source file [%sFile%].
	)
) else (
	echo Usage: %~nx0 ^<Source file^>
)

endlocal
exit /b 0
rem ==========================================================================

rem ==========================================================================
rem Функция GetTemporaryName()
rem
rem Серый форум / CMD/BAT: генерация пути для временного файла или папки
rem (http://forum.script-coding.com/viewtopic.php?id=6259)
rem ==========================================================================
:GetTemporaryName
	setlocal enableextensions enabledelayedexpansion

:NextName
	set sTempName=%temp%\temp%random%.tmp

	if exist "%sTempName%" goto :NextName

	set sProcName=%~0

	endlocal & set %sProcName:~4%=%sTempName%
	exit /b 0
rem ==========================================================================
Это сообщение посчитали полезным следующие участники:

Отправлено: 15:48, 12-08-2013 | #2