for %%a in (*.cgp) do (
set pathu=ie_url\%%~na
md !pathu!
set /a n=0
for /f "skip=1 tokens=1* delims==" %%i in (%%a) do (
if "%%i"=="[Properties]" (set /a n=1) else (
if !n!==0 (
echo [InternetShortcut]>>"!pathu!\%%i".url
echo URL=%%j>>"!pathu!\%%i".url)
)
)
)
endlocal
母亲节免费赠送收藏夹２快捷组代码，赫赫，enjoy it!
@echo off
echo [CaptorGroup]>>url.cgp
for /f %%i in ('dir /b/ad') do (
echo [CaptorGroup]>>%%i.cgp
)
setlocal ENABLEDELAYEDEXPANSION
for /f "usebackq tokens=1,2* delims=\=" %%i in (`findstr /s /r "^URL=" *.url^|findstr "\\"`) do (
set n=%%j
echo !n:~0,-8!=%%k>>%%i.cgp
)
for /f "usebackq tokens=1* delims=\=" %%i in (`findstr /s /r "^URL=" *.url^|findstr /v "\\"`) do (
set n=%%i
echo !n:~0,-8!=%%j>>url.cgp
)