batで時間変更

現在下記コードで
時刻の何時の部分を2桁の数字を打ち込んで出来るbatを使用しています。
これを4桁の数字にして、何時何分までを変更できるようにするには
どのようにすれば良いでしょうか。
@echo off

cd /d %~dp0

for /f "tokens=3 delims=\ " %%i in ('whoami /groups^|find "Mandatory"') do set LEVEL=%%i

if NOT "%LEVEL%"=="High" (

@powershell -NoProfile -ExecutionPolicy unrestricted -Command "Start-Process %~f0 -Verb runas"

exit

)

rem

REM 時刻の分解
set Ima=%Time%
set HH=%Ima:~0,2%
set MM=%Ima:~3,2%
set SS=%Ima:~6,2%
set MS=%Ima:~9,2%

time /T
REM 入力要求
set /P chg_HH="変更した時間を2桁で入力してください。 "
REM 時刻変更
time %chg_HH%:%MM%:%SS%.%MS%
time /T

No.1 ベストアンサー 回答者： kon77 回答日時： 2019/10/10 10:29

以下のような感じでいかがでしょうか。

――――――――――――――――――――

@echo off

cd /d %~dp0

for /f "tokens=3 delims=\ " %%i in ('whoami /groups^|find "Mandatory"') do set LEVEL=%%i

if NOT "%LEVEL%"=="High" (

@powershell -NoProfile -ExecutionPolicy unrestricted -Command "Start-Process %~f0 -Verb runas"

exit

)

rem

REM 時刻の分解
set Ima=%Time%
set HH=%Ima:~0,2%
set MM=%Ima:~3,2%
set SS=%Ima:~6,2%
set MS=%Ima:~9,2%

time /T

REM 入力要求
set /P chg="変更した時間を4桁で入力してください。 "

REM 入力にコロンがあれば消す
set chg2=%chg::=%

REM 時刻変更
time %chg2:~0,2%:%chg2:~2,4%:%SS%.%MS%

time /T

――――――――――――――――――――

この回答へのお礼

ありがとうございます。
頂いたコードで目的が達成できました。
ありがとうございました。

お礼日時：2019/10/10 18:49