[Iska]

Опять Вы не о том, что я хотел бы услышать.

Ну, пробуйте:

Скрытый текст

Код:

@echo off
setlocal enableextensions enabledelayedexpansion

for /f "tokens=2 delims=:" %%i in ('chcp') do (
	set sPrevCP=%%i
	>nul chcp 1251
)

for /f "usebackq delims=" %%i in (
	`@"%systemroot%\system32\mshta.exe" "javascript:var s=clipboardData.getData('text'); {try {new ActiveXObject('Scripting.FileSystemObject').GetStandardStream(1).WriteLine(s)} catch (e){}} close();" ^
	1^|more`
) do set sShare=%%i

>nul chcp %sPrevCP%

if defined sShare (
	echo %sShare%| >nul 2>&1 findstr.exe /i /r /c:"[0-9][0-9][0-9][0-9]:[0-9][0-9]:[0-9][0-9]" && (
		set sShare=%sShare::=.%
		echo [!sShare!]
	)
)

endlocal
exit /b 0

[DJ Mogarych]

Powershell:

Код:

$var = Get-Clipboard
if ($var -match ':') {
$var = $var -replace ':','.'
}

[Sisin]

Ну, пробуйте: »

Если в буфере 0000:00:00, то работает,
если 000000:00:00 - тоже работает, а не должно.

Проверка по маске нужна, чтобы в буфере не было комбинации отличной от маски. И чтобы выводилось echo "ERROR" в случае несоответствия, а затем exit /b 0.

т.е.
Если буфер соответствует маске 0000:00:00, то заменить ":" на "." и вывести echo [!sShare!] и exit /b 0,
а если нет, то echo "ERROR" и exit /b 0.

[DJ Mogarych]

Если в буфере 0000:00:00, то работает, если 000000:00:00 - тоже работает, а не должно. »

Код:

$var = Get-Clipboard
if ($var -match "^\d{4}:") {
$var = $var -replace ':','.'
}
else {
write-host -fore red "ERROR!!!1"
}

[Sisin]

DJ Mogarych, спасибо, но мне надо исключительно в bat.

[Iska]

Sisin, моя недоработка, приношу Вам свои извинения.

Добавьте в единственной строке то, что помечено выделенным:

Код:

echo %sShare%| >nul 2>&1 findstr.exe /i /r /c:"^[0-9][0-9][0-9][0-9]:[0-9][0-9]:[0-9][0-9]$" && (

или:

Код:

echo %sShare%| >nul 2>&1 findstr.exe /i /r /b /e /c:"[0-9][0-9][0-9][0-9]:[0-9][0-9]:[0-9][0-9]" && (

[Sisin]

Добавьте в единственной строке то, что помечено выделенным: »

а echo "ERROR" и exit /b 0?

[Iska]

Sisin, если error — тогда не 0.

Попробуйте так:

Скрытый текст

Код:

@echo off
setlocal enableextensions enabledelayedexpansion

for /f "tokens=2 delims=:" %%i in ('chcp') do (
	set sPrevCP=%%i
	>nul chcp 1251
)

for /f "usebackq delims=" %%i in (
	`@"%systemroot%\system32\mshta.exe" "javascript:var s=clipboardData.getData('text'); {try {new ActiveXObject('Scripting.FileSystemObject').GetStandardStream(1).WriteLine(s)} catch (e){}} close();" ^
	1^|more`
) do set sShare=%%i

>nul chcp %sPrevCP%

if defined sShare (
	echo %sShare%| >nul 2>&1 findstr.exe /i /r /c:"^[0-9][0-9][0-9][0-9]:[0-9][0-9]:[0-9][0-9]$" && (
		set sShare=%sShare::=.%
		echo [!sShare!]
	) || (
		echo Error
		exit /b 2
	)
) else (
	echo Error
	exit /b 1
)

endlocal
exit /b 0

[Sisin]

Попробуйте так: »

Огромное спасибо. Все как надо!

[Sisin]

Iska, подскажите, пожалуйста, почему эта строка:

echo %sShare%| >nul 2>&1 findstr.exe /i /r /c:"^[0-9][0-9][0-9][0-9]:[0-9][0-9]:[0-9][0-9]$" && (

имеет ограничение на количество цифр??
например, я хочу увеличить маску до 12345678:12345678:12345678, изменил на:
"^[0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9]:[0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9]:[0-9][0-9][0-9][0-9][0-9][0-9][0-9][0-9]$"

а строка не срабатывает. Вроде ограничений быть не должно.

Если попробовать добавить цифры в маску здесь: http://forum.oszone.net/post-2890775.html#post2890775

то findstr.exe выдает ошибку.