Just for fun, post one:
Add a more efficient code:
[ Last edited by namejm on 2007-1-19 at 03:04 PM ]
@echo off
:: Purpose:
:: Discard the string of the specified level at the end of the path
:: Idea:
:: First read the path string in reverse order, then cut off the specified level from the beginning
:: Finally read the remaining string in reverse order
set num=0
set times=2
set "route=c:\a&bc\!dx\test dos\123.txt"
call :antitone "%route%"
call :intercept "%str%"
call :antitone "%route%"
echo "%str%"
pause
goto :eof
:antitone
set str=
set "var=%~1"
:loop1
if not "%var:~0,1%"=="" set "str=%str%%var:~-1%"
set "var=%var:~0,-1%"
if not "%var%"=="" goto loop1
goto :eof
:intercept
set "route=%~1"
:loop2
set "route=%route:*\=%"
set /a num+=1
if %num% lss %times% goto loop2
goto :eof
Add a more efficient code:
@echo off
:: Idea:
:: Through for statement extension, intercept the directory path where the file is located
:: When the number of layers to be discarded exceeds the actual number of layers, keep the root directory level
set "route=c:\a&bc\!dx\test dos\123.txt\"
set layers_discard=3
if "%route:~-1%"=="\" set "route=%route:~0,-1%"
for /l %%i in (1,1,%layers_discard%) do call :intercept "%%route%%"
:end
echo "%route%"
pause
goto :eof
:intercept
for /f "delims=" %%i in (%1) do set "route=%%~dpi"
if "%route:~-2,1%"==":" (goto end) else set "route=%route:~0,-1%"
goto :eof
[ Last edited by namejm on 2007-1-19 at 03:04 PM ]
尺有所短，寸有所长，学好CMD没商量。
考虑问题复杂化，解决问题简洁化。
考虑问题复杂化，解决问题简洁化。
