|
|
本帖最后由 gxbcm 于 2024-5-11 15:45 编辑
把最终版源码贴出来
@echo off
%1 mshta vbscript:createobject("shell.application").shellexecute("""%~0""","::",,"runas",1)(window.close)&&exit /b
pushd "%CD%"
CD /D "%~dp0"
mode con cols=90 lines=90
SET BPFB=C:
SET BPFH=C:
SET DIRS=C:
SET ES=C:
SET BPFE=C:
SET WE=ESD
SET NM=OKK
SET UP=关闭Y:
SET AA1=1
SET KK=OFF1
SET XX1=1
SET YS=--compress=LZX:20
SET KK2=切换ESD-WIM界面
for %%a in (C D E F G H I J K L M N O P Q R S T U V W X Y Z ) do (
SET SNADIR=%%a:\SNAP\
SET DIRSD=%%a:
SET DIRSDWJ=%%a:
SET WZ=%SNADIR%SYSC%XX1%.%WE%
SET WZ1=%SNADIR%SYSC%XX1%.%WE%
IF exist %%a:\SNAP\ GOTO MENU
IF exist %%a: SET n1=%%a
)
SET DIRS=%n1%
SET /P DIRS= 请输入备份存放工作盘(C-%DIRS%)字母 回车：
SET SNADIR=%DIRS%:\SNAP\
MD %SNADIR%
GOTO MENU
EXIT
:MENU
SET Bn=0
SET Hn=0
IF NOT EXIST %SNADIR%00.DPT (
BOOTICE /DEVICE=0 /PARTITIONS /BACKUP_DPT=00.DPT /QUIET
COPY 00.DPT %SNADIR% /Y
)
CLS
IF "%KK%"=="OFF1" (
SET KK1=关闭
SET KK=OFF1
) ELSE (
SET KK1=开启
SET KK=--wimboot
)
IF EXIST %PF%%LJ%%WJ%.ESD @wimlib-imagex.exe info %PF%%LJ%%WJ%.ESD>EWJ.txt
IF EXIST %PF%%LJ%%WJ%.ESD @findstr "Image Count:" EWJ.TXT >EWJ1.TXT & SET /P WEAA=<./EWJ1.TXT
IF EXIST %PF%%LJ%%WJ%.WIM @wimlib-imagex.exe info %PF%%LJ%%WJ%.WIM>WWJ.txt
IF EXIST %PF%%LJ%%WJ%.WIM @findstr "Image Count:" WWJ.TXT >WWJ1.TXT & SET /P WWAA=<./WWJ1.TXT
IF %errorlevel%==1 CLS & GOTO PASS
IF %WE% equ ESD (
SET /A WAA1=%WEAA:~16,1%
SET WCK=EWJ.txt
SET WWZ1=%PF%%LJ1%%WJ%%KZ%
SET WWZ=%PF%%LJ%%WJ%%KZ%
) ELSE (
SET /A WAA1=%WWAA:~16,1%
SET WCK=WWJ.txt
SET WWZ1=%PF%%LJ1%%WJ%%KZ%
SET WWZ=%PF%%LJ%%WJ%%KZ%
)
title WIMLIB-IMAGEX 系统备份恢复
IF EXIST %SNADIR%SYSC%XX1%.ESD @wimlib-imagex.exe info %SNADIR%SYSC%XX1%.ESD>ESD%XX1%.txt
IF EXIST %SNADIR%SYSC%XX1%.ESD @findstr "Image Count:" ESD%XX1%.TXT >ESD1%XX1%.TXT & SET /P EAA=<./ESD1%XX1%.TXT
IF EXIST %SNADIR%SYSC%XX1%.WIM @wimlib-imagex.exe info %SNADIR%SYSC%XX1%.WIM>WIM%XX1%.txt
IF EXIST %SNADIR%SYSC%XX1%.WIM @findstr "Image Count:" WIM%XX1%.TXT >WIM1%XX1%.TXT & SET /P WAA=<./WIM1%XX1%.TXT
IF %errorlevel%==1 CLS & GOTO PASS
IF %WE% equ ESD (
SET /A EAA1=%EAA:~16,1%
SET ECK=ESD%XX1%.TXT
SET WEZ=%SNADIR%SYSC%XX1%.%WE%
SET WEZ1=%SNADIR%SYSC%XX1%.%WE%
) ELSE (
SET /A EAA1=%WAA:~16,1%
SET ECK=WIM%XX1%.TXT
SET WEZ=%SNADIR%SYSC%XX1%.%WE%
SET WEZ1=%SNADIR%SYSC%XX1%.%WE%
)
:PASS
IF %NM% equ OFFN (
for /l %%i in (1,1,%WAA1%) do set /a WAA2=%%i
SET /A Bn=WAA2+1
SET /A Hn=WAA2
SET WZ1=%WWZ1%
SET WZ=%WWZ%
SET CK=%WCK%
GOTO MESSS
)
for /l %%i in (1,1,%EAA1%) do set /a EAA2=%%i
IF NOT EXIST %SNADIR%SYSC%XX1%.%WE% (
SET /A Bn=0
SET /A Hn=0
SET WZ=%WEZ%
SET WZ1=%WEZ1%
) ELSE (
SET /A Bn=EAA2+1
SET /A Hn=EAA2
SET WZ=%WEZ%
SET WZ1=%WEZ1%
SET CK=%ECK%
)
)
:MESSS
color 1f
echo. WIMLIB-IMAGEX 备份恢复系统--%WE%文件
echo. ━━ 默认设置 ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
echo. [L]挂载ESP %ES%盘 [W]关联ESP-系统%BPFE%盘 [F]修复ESP引导 [N]隐藏ESP分区
echo. [B]备份默认%BPFB%盘 [P]参数WIMBOOT %KK1% [O]分区表 [X]选择文件SYSC%XX1%.%WE%
echo. [H]恢复默认%BPFH%盘 [G]备份格式默认:%WE% [R]查看镜像信息 [U]%UP%虚拟盘
echo. [Y]压缩模式:%YS%
echo. --- 存储信息 ---------------------------------------------------------------------------
echo. [C]默认搜索%DIRSDWJ%盘 [Z]查找镜像%WE%文件 [K]重建镜像
echo. 备份存储目录%WZ1%
echo. 映像文件中有%Hn%个备份
echo. 默认：备份第%Bn%个备份 恢复第%Hn%个备份
echo. ----------------------------------------------------------------------------------------
echo. [5] 一键自动备份系统
echo.
echo. [0] 一键自动恢复系统
echo.
echo. [8] 删除一个增量备份
echo.
echo. [2] 查看备份%SNADIR%目录
echo. ----------------------------------------------------------------------------------------
echo. [E]退出 [Q]重启 [S]启动SNAPSHOT一键自动备份恢复
echo. ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
SET ST1=2
SET /P ST1= 请输入选项(默认:%ST1%)回车：
if /I "%ST1%"=="5" goto winbackup
if /I "%ST1%"=="0" goto winrecover
if /I "%ST1%"=="2" goto folderopen
if /I "%ST1%"=="G" goto GHWZ
if /I "%ST1%"=="F" goto XZ
if /I "%ST1%"=="B" goto BPFB
if /I "%ST1%"=="L" goto ES1
if /I "%ST1%"=="W" goto BPFE1
if /I "%ST1%"=="H" goto BPFH1
if /I "%ST1%"=="N" goto NN
if /I "%ST1%"=="Q" goto QQ
if /I "%ST1%"=="Y" goto YY
if /I "%ST1%"=="O" goto MENU1
if /I "%ST1%"=="S" goto SS
if /I "%ST1%"=="X" goto XX
if /I "%ST1%"=="R" goto RR
if /I "%ST1%"=="U" goto UU
if /I "%ST1%"=="8" goto SC
if /I "%ST1%"=="e" goto exit
if /I "%ST1%"=="C" goto CC
if /I "%ST1%"=="K" goto KK
if /I "%ST1%"=="Z" goto ZZ
if /I "%ST1%"=="P" GOTO KSK
GOTO MENU
EXIT
:KK
IF NOT EXIST %WZ% GOTO MENU
SET P8=%WZ%
ECHO.按E键-返回主菜单
SET /P B8= 重建默认: %WZ1% 按任意键开始..... 回车：
if /I "%B8%"=="e" goto MENU
wimlib-imagex optimize %WZ% --check
PAUSE
GOTO MENU
:UU
IF NOT EXIST %DIRSD%\YP\ MD %DIRSD%\YP\
IF %UP% equ 关闭Y: (
SET UP=开启Y:
SUBST Y: %DIRSD%\YP\
) ELSE (
SET UP=关闭Y:
SUBST Y: /D
)
GOTO MENU
:GHWZ
IF %WE% equ ESD (
SET WE=WIM
SET KK2=切换WIM-ESD界面
SET YS=--compress=XPRESS
) ELSE (
SET WE=ESD
SET KK2=切换ESD-WIM界面
SET YS=--compress=LZX:20
)
SET WZ1=%SNADIR%SYSC%XX1%.%WE%
SET WZ=%SNADIR%SYSC%XX1%.%WE%
SET NM=OKK
GOTO MENU
:RR
TYPE %CK% | MORE
GOTO MENU
:ZZ
SET NM=OFFN
SET NNN=9
SET BPF09=1
ECHO.搜索文件中.......请等待......
IF EXIST X.TXT DEL X*.TXT
DIR "%DIRSDWJ%\*.%WE%" /S /B >X.TXT
for /f "delims=" %%a in ("X.txt") do if %%~za equ 0 PAUSE & GOTO MENU
FIND /N "%DIRSDWJ%\" X.TXT >X1.TXT
for /f "tokens=*" %%a in (X1.TXT) do @echo %%a|find /v /i "---">>X2.TXT
TYPE X2.TXT
SET /P BPF09= 默认:%BPF09%请输入第几个文件号[数字] 回车：
ECHO. 按任意键选定文件
For /f "delims=" %%i in ( 'Type X2.TXT^|Find "[%BPF09%]"' ) do (Echo %%i>X3.TXT)
SET /P SAA=<./X3.TXT
IF %BPF09% LEQ %NNN% (
SET /P SAA1=%SAA:~3,200%>X4.TXT
) ELSE (
SET /P SAA1=%SAA:~4,200% >X4.TXT
)
for /f %%i in (X4.TXT) do SET PF=%%~di
for /f %%i in (X4.TXT) do SET LJ=%%~pi
SET LJ1=%LJ:~0,8%...\
for /f %%i in (X4.TXT) do SET WJ=%%~ni
for /f %%i in (X4.TXT) do SET KZ=%%~xi
GOTO MENU
:CC
SET NM=OKK
for %%b in (C D E F G H I J K L M N O P Q R S T U V W X Y Z) do (
IF exist %%b: SET k1=%%b
)
SET BPF6=%DIRSDWJ%
SET /P BPF6= 默认:备份存储%DIRSD%盘 请输入备份存储盘： (请输入C-%K1%)字母 回车：
IF %BPF6%==%DIRSDWJ% GOTO MENU
SET DIRSDWJ=%BPF6%:
GOTO MENU
:SS
SNAP.EXE & EXIT
EXIT
:QQ
shutdown -r -t 0
EXIT
:XX
SET NM=OKK
SET sn=1
for /l %%i in (1,1,10) do (
IF NOT EXIST %SNADIR%SYSC%%i.%WE% GOTO PASS50
set /a sn=%%i+1
)
:PASS50
IF NOT EXIST %SNADIR%SYSC%XX1%.%WE% SET sn=1
SET XX1=%sn%
SET /P XX1= 请输入完整备份文件号 默认:SYSC%XX1%.%WE% (默认第%XX1%个完整备份 请输入1-9)数字 回车：
ECHO. 选择的是SYSC%XX1%.%WE% 文件
SET WZ1=%SNADIR%SYSC%XX1%.%WE%
SET WZ=%SNADIR%SYSC%XX1%.%WE%
CLS
GOTO MENU
:YY
ECHO.压缩率选项如下：
echo.1.--compress=LZX:20 4.--compress=LZMS 7.--compress=XPRESS
echo.2.--compress=LZX 5.--compress=none 8.--compress=XPRESS:80
echo.3.--compress=LZX:100 6.--wimboot 9.--solid
SET /P YS= 请输入压缩模式 默认:%YS% (1-9)数字 回车：
if /I "%YS%"=="1" SET YS=--compress=LZX:20
if /I "%YS%"=="2" SET YS=--compress=LZX
if /I "%YS%"=="3" SET YS=--compress=LZX:100
if /I "%YS%"=="4" SET YS=--compress=LZMS
if /I "%YS%"=="5" SET YS=--compress=none
if /I "%YS%"=="6" SET YS=--wimboot
if /I "%YS%"=="7" SET YS=--compress=XPRESS
if /I "%YS%"=="8" SET YS=--compress=XPRESS:80
if /I "%YS%"=="9" SET YS=--solid
GOTO MENU
:NN
CMD /C "ECHO LIST VOL"|DISKPART
ECHO. 隐藏 ESP分区
ECHO.------------------------------
set /p v=请选择ESP分区的卷号（0-9数字:%v%) 然后按回车:
cmd /c "echo select vol %v% & echo remove & echo list vol"|diskpart
ECHO. 已经卸载ESP分区盘符
ECHO. 隐藏ESP分区盘符，便于保护引导区文件，不被修改！！！
ECHO.-----------------------------------------------------------
SET ES=C:
PAUSE
GOTO MENU
:BPFE1
for %%b in (C D E F G H I J K L M N O P Q R S T U V W X Y Z) do (
IF exist %%b: SET k1=%%b
)
SET BPF0=C
SET /P BPF0= 请输入关联ESP-分区对应的WINDOWS盘符 默认C:盘 (请输入C-%K1%)字母 回车：
SET BPFE=%BPF0%:
GOTO MENU
:ES1
CLS
CMD /C "ECHO LIST VOL"|DISKPART
ECHO. 挂载 ESP分区
ECHO.------------------------------
set /p v=请选择ESP分区的卷号（0-9数字:%v%) 然后按回车:
cmd /c "echo select vol %v% & echo assign & echo list vol"|diskpart
ECHO. 已经分配 ESP分区盘符
for %%b in (C D E F G H I J K L M N O P Q R S T U V W X Y Z) do (
IF exist %%b: SET k1=%%b
)
SET BPF1=C
SET /P BPF1= 请输入ESP分区挂载的盘符 默认C:盘 (请输入C-%K1%)字母 回车：
SET ES=%BPF1%:
GOTO MENU
:BPFB
for %%b in (C D E F G H I J K L M N O P Q R S T U V W X Y Z) do (
IF exist %%b: SET k1=%%b
)
SET BPF1=C
SET /P BPF1= 请输入需要备份目标盘符 默认C:盘 (请输入C-%K1%)字母 回车：
SET BPFB=%BPF1%:
GOTO MENU
:BPFH1
for %%b in (C D E F G H I J K L M N O P Q R S T U V W X Y Z) do (
IF exist %%b: SET k1=%%b
)
SET BPF2=C
SET /P BPF2= 请输入需要恢复目标盘符 默认C:盘 (请输入C-%K1%)字母 回车：
SET BPFH=%BPF2%:
IF /I %BPFH% equ %DIRSD% (
ECHO. 与备份盘一致重新选择盘符
GOTO BPFH1
)
GOTO MENU
:XZ
set syspart=%BPFE%
set rootpart=%ES%
set bios=uefi
set sect=n
echo. 默认ESP分区%ES%盘 关联ESP-分区对应的Windows盘符为 %BPFE%盘 默认固件类型: uefi
set /p bios=按E键-返回主菜单 请输入"固件类型",可选 uefi , bios 默认 uefi 类型:
if /I "%bios%"=="e" goto MENU
bcdboot.exe %syspart%\windows /s %rootpart% /f %bios% /l zh-cn
if %bios%==uefi (
copy "%windir%\Boot\DVD\EFI\boot.sdi" "%rootpart%\EFI\Microsoft\Boot\">nul
if exist %rootpart%\EFI\boot\zh-CN rd /s /q %rootpart%\EFI\boot\zh-CN
md %rootpart%\EFI\boot\zh-CN
copy "%rootpart%\EFI\Microsoft\Boot\zh-CN\bootmgfw.efi.mui" "%rootpart%\EFI\Boot\zh-CN\">nul
if %processor_architecture%==X86 (
ren %rootpart%\EFI\Boot\zh-CN\bootmgfw.efi.mui bootia32.efi.mui
) else (
ren %rootpart%\EFI\Boot\zh-CN\bootmgfw.efi.mui bootx64.efi.mui )
)
if %bios%==bios (
copy "%windir%\Boot\DVD\PCAT\boot.sdi" "%rootpart%\Boot\">nul
set /p sect=是否将引导写入扇区，是请输入“y”:
)
if %sect%==y (
cmd /c bootsect.exe /nt60 %rootpart% /force
cmd /c bootsect.exe /nt60 %rootpart% /mbr /force
)
ECHO. 已经--修复ESP分区引导
ECHO.------------------------------
PAUSE
GOTO MENU
:KSK
IF "%KK%"=="--wimboot" (SET KK=OFF1
) ELSE (
SET KK= --wimboot
)
GOTO MENU
EXIT
:SC
SET ST7=%Hn%
ECHO.按E键-返回主菜单
SET /P ST7=默认删除%WZ1% (默认第%Hn%个备份 输入1-%Hn%数字) 回车：
if /I "%ST7%"=="e" goto MENU
IF NOT EXIST %WZ% GOTO MENU
"wimlib-imagex.exe" delete %WZ% %Hn% --soft
PAUSE
GOTO MENU
:winbackup
IF NOT EXIST %WZ% GOTO BACKUP1
SET ST9=%Bn%
ECHO.按E键-返回主菜单
echo. 备份%BPFB%盘 默认备份为第%Bn%个备份 输入1即覆盖更新完整备份
SET /P ST9=默认备份%WZ1% (默认第%Bn%个备份 输入%Bn%-9数字) 回车：
if /I "%ST9%"=="1" goto BACKUP1
if /I %ST9% LEQ %Hn% goto winbackup
if /I "%ST9%"=="e" goto MENU
if /i %BPFB% neq C: "wimlib-imagex.exe" append %BPFB%\ %WZ% %ST9% %ST9% & PAUSE & GOTO MENU
IF NOT EXIST "X:\WINDOWS\" "wimlib-imagex.exe" append %BPFB%\ %WZ% %ST9% %ST9% --snapshot & PAUSE & GOTO MENU
IF EXIST "X:\WINDOWS\" "wimlib-imagex.exe" append %BPFB%\ %WZ% %ST9% %ST9% & PAUSE & GOTO MENU
GOTO MENU
exit
:BACKUP1
SET ST0=0
ECHO.按E键-返回主菜单 备份%BPFB%盘
SET /P ST0=默认备份%WZ1% 回车：
if /I "%ST0%"=="e" goto MENU
if /i %BPFB% neq C: "wimlib-imagex.exe" capture %BPFB%\ %WZ% 1 1 %YS% --check & PAUSE & GOTO MENU
if %WE% equ ESD (
IF EXIST "X:\WINDOWS\" "wimlib-imagex.exe" capture %BPFB%\ %WZ% 1 1 %YS% --check
IF NOT EXIST "X:\WINDOWS\" "wimlib-imagex.exe" capture %BPFB%\ %WZ% 1 1 --snapshot %YS% --check
) ELSE (
IF EXIST "X:\WINDOWS\" "wimlib-imagex.exe" capture %BPFB%\ %WZ% 1 1 %YS% --check
IF NOT EXIST "X:\WINDOWS\" "wimlib-imagex.exe" capture %BPFB%\ %WZ% 1 1 --snapshot %YS% --check
)
pause
GOTO MENU
EXIT
:winrecover
ECHO.按E键-返回主菜单
echo. 进入PE中恢复系统 恢复到%BPFH%盘 参数wimboot %KK1%
set ST4=%Hn%
SET /P ST4=默认恢复%WZ1% (默认第%Hn%个恢复 输入1-%ST4%数字) 回车：
if /I "%ST4%"=="e" goto MENU
IF NOT EXIST %WZ% GOTO MENU
if /i %BPFH% neq C: goto PSS
IF NOT EXIST "X:\WINDOWS\" GOTO MENU
:PSS
FORMAT %BPFH% /Q /Y
IF "%KK%"=="--wimboot" (
"wimlib-imagex.exe" apply %WZ% %ST4% %BPFH% --wimboot
) ELSE (
"wimlib-imagex.exe" apply %WZ% %ST4% %BPFH%
)
GOTO MENU
EXIT
:MENU1
CLS
echo. 备份恢复分区表！警告-警告-警告！！！慎重操作！！！
echo. ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
echo. 1. 备份--硬盘分区表
echo.
echo. 2. 备份硬盘分区表--U盘
echo.
echo. 3. 手动启动BOOTICE-备份恢复分区表
echo.
echo. E. 退出
echo. ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
set choice=1
set /p choice= 请选择要进行的操作(默认为:%choice%) 然后按回车:
if /i "%choice%"=="1" goto MBR0
if /i "%choice%"=="2" goto MBRU
if /i "%choice%"=="3" goto MBR1
if /i "%choice%"=="e" goto MENU
EXIT
:MBRU
ECHO.--------------------------------------------
echo. 备份分区表！分区表文件存储在%SNADIR%01.DPT
ECHO. 备份-硬盘分区表存储到U盘
ECHO.--------------------------------------------
set /p rootpart=请输入“U盘符”[字母]回车：
BOOTICE.EXE /DEVICE=0 /PARTITIONS /BACKUP_DPT=01.DPT /QUIET
COPY 01.DPT %rootpart%:\ /y
ECHO. 已经保存 硬盘分区表到目标盘：%rootpart%:盘 中.....
ECHO.------------------------------------------------------
PAUSE
GOTO MENU1
EXIT
:MBR0
ECHO.------------------------------------------------
echo. 备份硬盘分区表！分区表文件存储在%SNADIR%01.DPT
ECHO.------------------------------------------------
BOOTICE.EXE /DEVICE=0 /PARTITIONS /BACKUP_DPT=01.DPT /QUIET
COPY BOOTICE.EXE %SNADIR% /Y
COPY 01.DPT %SNADIR% /Y
ECHO.------------------------------
PAUSE
GOTO MENU1
EXIT
:MBR1
ECHO.------------------------------------------
echo. 手动备份恢复分区表！BOOTICE-分区管理
ECHO.------------------------------------------
PAUSE
BOOTICE.EXE /DEVICE=0
GOTO MENU1
EXIT
:folderopen
DIR %SNADIR%
pause
GOTO MENU
exit老师们看看，我真的是个小白，编写放上很生疏，但是思路不生疏，设计理念不生疏。就是编写逻辑太饶人了。测试是我编写理念的一大指导方向。所以更新次数最多，测试最多的，当然优化也是最多的一个软件了，测试能帮助我找到问题和BUG。这里面真的很饶，很烧脑。真的没有动力，真的不想玩了。希望能给后来者，一些启发。
|
|
[复制链接]
IP卡
狗仔卡
楼主
显身卡
发表于 2024-4-20 15:49:54
