快速安装VHD系统的批处理 - 无忧启动论坛

@echo off
title (快速安装VHD系统 By baby1277 2025.3.5)
:: 拖拽操作支持
set wim=%~1
if defined wim goto wimok
:vhdset
cls&echo.
if defined cuo echo.&echo 安装遇到了问题，不支持的系统映像。&echo.
echo 请将Wim或者Esd映像文件拖拽进来后按回车键
echo.
set /p wim=
:wimok
:: 检查映像文件路径正确性
for /f "delims=" %%i in ('echo %wim%') do (
if /i not "%%~xi"==".wim" if /i not "%%~xi"==".esd" goto vhdset
if not exist "%%~fi" goto vhdset
set wim2=%%~fi
set wimN=%%~ni
)
:: 判断映像文件的系统版本来设置VHD磁盘格式
for /f "tokens=2-4" %%i in ('dism /get-wiminfo /wimfile:"%wim2%"^|find "名称"') do (
if %%j equ 7 set nx=.vhd&goto nxok
if %%j equ 8 set nx=.vhdx&goto nxok
if %%j equ 8.1 set nx=.vhdx&goto nxok
if %%j equ 10 set nx=.vhdx&goto nxok
if %%j equ 11 set nx=.vhdx&goto nxok
echo %%i%%j%%k|find /i "win7">nul&&set nx=.vhd&goto nxok
echo %%i%%j%%k|find /i "windows7">nul&&set nx=.vhd&goto nxok
for %%a in (8 8.1 10 11) do echo "%%i%%j%%k"|find /i "win%%a">nul&&set nx=.vhdx&goto nxok
for %%b in (8 8.1 10 11) do echo "%%i%%j%%k"|find /i "windows%%b">nul&&set nx=.vhdx&goto nxok
)
echo "%wimN%"|find /i "win7">nul&&set nx=.vhd&goto nxok
echo "%wimN%"|find /i "windows7">nul&&set nx=.vhd&goto nxok
for %%i in (8 8.1 10 11) do echo "%wimN%"|find /i "win%%i">nul&&set nx=.vhdx&goto nxok
for %%i in (8 8.1 10 11) do echo "%wimN%"|find /i "windows%%i">nul&&set nx=.vhdx
:nxok
if not defined nx set cuo=0&goto vhdset
:: 设置VHD文件位置
set "vhdPath=%~d0\WinVHD_%random:~-2%%nx%"
:: 获取Wim/Esd映像文件索引
for /f "tokens=1-4" %%i in ('dism /get-wiminfo /wimfile:"%wim2%"') do (
if "%%i"=="索引:" set mod=%%j
if /i "%%l"=="Ultimate" set ver2=旗舰版&goto ver1
if /i "%%l"=="Enterprise" set ver2=企业版&goto ver1
if "%%l"=="企业版" set ver2=企业版&goto ver1
if /i "%%l"=="lot" set ver2=lot企业版&goto ver1
if "%nx%"==".vhdx" if /i "%%l"=="Pro" set ver2=专业版&goto ver1
if "%nx%"==".vhdx" if /i "%%l"=="Professional" set ver2=专业版&goto ver1
if "%nx%"==".vhdx" if "%%l"=="专业版" set ver2=专业版&goto ver1
)
:ver1
if not defined mod set cuo=0&goto vhdset
:: 设置VHD磁盘卷标
set vhdname=WindowsVHD
:: 设置VHD文件大小
set vhdSize=60
set /a vhdSize2=vhdSize*1024
:: 显示Wim/Esd文件系统版本和索引
echo.&echo 映像：%wim2% 支持安装VHD系统的版本&echo.
setlocal enabledelayedexpansion
for /f "skip=4 delims=" %%i in ('dism /get-wiminfo /wimfile:"%wim2%"^|find /i /v "home"^|find /v "家庭"') do (
for /f "delims=" %%a in ('echo %%i^|find "索引"') do set mod3=%%a
for /f "delims=" %%b in ('echo %%i^|find "名称"') do set mod4=%%b
if defined mod4 if "%nx%"==".vhd" echo !mod4!|find /i "pro">nul&&set mod4=
if defined mod4 if "%nx%"==".vhd" echo !mod4!|find "专业版">nul&&set mod4=
if defined mod4 echo !mod3! !mod4!&set mod3=&set mod4=
)
setlocal disabledelayedexpansion
:: 显示VHD系统安装参数
echo.&echo =================VHD系统参数=================
echo.
echo VHD磁盘卷标：%vhdname%
echo.
echo VHD文件位置：%vhdPath%
echo.
echo VHD文件大小：%vhdSize% GB
echo.
echo Wim/Esd位置：%wim2%
echo.
echo Wim/Esd索引：%mod% %ver2%
echo.
echo 请确认以上VHD参数没有问题可以直接按回车键继续
echo.
set /p mod2=如需要安装其他版本则输入对应索引号按回车键继续：
if defined mod2 set mod=%mod2%
:: 创建并加载VHD磁盘
for %%i in (R S T U V W Y Z) do if not exist %%i: set pan=%%i
(echo create vdisk file="%vhdPath%" maximum=%vhdSize2% type=expandable&^
echo Select vdisk file="%vhdPath%"&^
echo attach vdisk&^
echo create partition primary&^
echo format quick fs=ntfs label="%vhdname%"&^
echo assign letter=%pan%:&^
echo exit)|diskpart
:: 应用系统镜像到VHD磁盘
dism /apply-image /imagefile:"%wim2%" /index:%mod% /applydir:%pan%:\
:: 配置引导记录
bcdboot %pan%:\Windows /l zh-ch
if %errorlevel% equ 0 set vhdSetup=ok
if not defined vhdSetup goto cuo2
:: 安装成功设置引导程序
bcdedit /timeout 3
bcdedit /set {bootmgr} Locale zh-cn
:: 部署自动应答文件
set yinda=%pan%:\Windows\Panther\unattend.xml
if exist %yinda% goto cuo2
md %pan%:\Windows\Panther
if exist %pan%:\Windows\Syswow64 (set sysbit=amd64) else set sysbit=x86
echo ^<?xml version='1.0' encoding='utf-8'?^>>%yinda%
echo ^<unattend xmlns="urn:schemas-microsoft-com:unattend"^>>>%yinda%
echo ^<settings pass="oobeSystem"^>>>%yinda%
echo ^<component name="Microsoft-Windows-Shell-Setup" processorArchitecture="%sysbit%" publicKeyToken="31bf3856ad364e35" language="neutral" versionScope="nonSxS" xmlns:wcm="http://schemas.microsoft.com/WMIConfig/2002/State" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"^>>>%yinda%
echo ^<AutoLogon^>>>%yinda%
echo ^<Enabled^>true^</Enabled^>>>%yinda%
echo ^<Username^>Administrator^</Username^>>>%yinda%
echo ^</AutoLogon^>>>%yinda%
echo ^<OOBE^>>>%yinda%
echo ^<SkipMachineOOBE^>true^</SkipMachineOOBE^>>>%yinda%
echo ^</OOBE^>>>%yinda%
echo ^</component^>>>%yinda%
echo ^</settings^>>>%yinda%
echo ^</unattend^>>>%yinda%
:: 安装失败返回
:cuo2
(echo select vdisk file="%vhdPath%"&echo detach vdisk)|diskpart
if defined vhdSetup Shutdown -r -f -t 0&exit
del /f /q "%wim2%"
set cuo=0&goto vhdset

复制代码