@echo off
for /d %%a in (*) do (
    for %%b in ("%%a"\*) do (
        setlocal enabledelayedexpansion
        set var=%%~nb
        (echo !var:~0,1!|findstr "[0-9]"&&move "%%b" "%%a\A"||move "%%b" "%%a\B")>nul
    )
)
pause
复制代码

@echo off
set "DstFolder1=权利人户籍信息"
set "DstFolder2=不动产来源证明"
set "DstFolder3=不动产权籍调查表"
cd /d "%~dp0"
for /d %%i in (*) do (
    pushd "%%i"
    for %%j in ("%DstFolder1%","%DstFolder2%","%DstFolder3%") do (
        if not exist "%%j" (
            md "%%j"
        )
    )
    for /f "delims=" %%j in ('dir /b /a-d *身份证* *户口簿*') do (
        move "%%j" "%DstFolder1%\"
    )
    for /f "delims=" %%j in ('dir /b /a-d *建设用地批准书*') do (
        move "%%j" "%DstFolder2%\"
    )
    move "*.*" "%DstFolder3%\"
    popd
)
复制代码

@echo off
set str=a身份证 a户口簿 b宗地基本信息表 b界址标示表 b界址签章表 b宗地草图 b调查审核表 b界址说明表 b界址点坐标表 b房屋基本信息调查表 b宗地图 b房分层分户图 c建设用地批准书
setlocal enabledelayedexpansion
for %%a in (%str%) do (
    set n=%%a
    set #!n:~1!=!n:~0,1!
)
for /d %%b in (*) do (
    pushd "%%b"
    for /f "delims=" %%c in ('dir /b /a-d') do (
        if !#%%~na!==a move "%%c" "%%b\权利人户籍信息"
        if !#%%~na!==b move "%%c" "%%b\不动产权籍调查表"
        if !#%%~na!==c move "%%c" "%%b\不动产来源证明"
    )
    popd
)
pause
复制代码

@echo off
set str=a身份证 a户口簿 b建设用地批准书
setlocal enabledelayedexpansion
for %%a in (%str%) do (
    set n=%%a
    set #!n:~1!=!n:~0,1!
)
for /d %%b in (*) do (
    pushd "%%b"
    for /f "delims=" %%c in ('dir /b /a-d') do (
        if !#%%~na!==a move "%%c" "%%b\权利人户籍信息"
        if !#%%~na!==b move "%%c" "%%b\不动产来源证明"
        if "!#%%~na!"=="" move "%%c" "%%b\不动产权籍调查表"
    )
    popd
)
pause
复制代码