中国DOS联盟

@echo off
set url=http://wwww.szdddd.com/7893.html
set urltmp=%url:/=.%
for /f "tokens=5 delims=." %%a in ("%urltmp%") do echo %%a

@Echo off
set url=http://wx.kanunu.cn/files/article/html/5/53721/3764203.html
:loop
if not "%url%"=="%url:/=%" (call :xyz) else (goto end)
goto loop
:xyz
for /f "tokens=1* delims=/" %%a in ("%url%") do (set "url=%%b")
goto :eof
:end
set "url=%url:.html=%"
set "url=%url:.htm=%"
echo %url%
pause
exit

@echo off&setlocal enabledelayedexpansion
set url=http://wx.kanunu.cn/files/article/html/5/53721/37642034.html
set url2=%url:/=\%
for %%a in ("%url2%") do (
	set url2=%%~na
	echo !url2!
)

@echo off
set /p url=url?
for /f "tokens=2 delims=html" %%i in ("%url%") do set str=%%i&call :lp
pause>nul&goto :eof
:lp
set a=%str:~-1%
set var=%a%%var%
if "%a%" neq "/" set str=%str:~,-1%&goto lp
cls&echo %var:~1,-1%.html

@echo off
set "var=http://wx.kanunu.cn/files/article/html/5/53721/3764203.html"
:again
for /f "tokens=1* delims=/." %%a in ("%var%") do (
   if not "%%b"=="html" (
      set var=%%b&goto :again
      ) else (
      echo %%a
   )
)
pause

echo http://wx.kanunu.cn/files/article/html/5/53721/3764203.html | sed "s/.*\///" | gawk -F "." "{print $1}"

for %a in (http://wx.kanunu.cn/files/article/html/5/53721/37642034.html) do @echo %~na