
现在越来越多的软件均采用了EdgeWebView框架,像Office2024、Office365、CDR2024等,安装时会自动安装上Edge全家桶,四个重复的文件夹体积达3G以上,洁癖实在不能忍。既然大部分是重复的,于是寻思精简绿化体积只用一份达到目的,经过不断测试,终于在体积不到500M能实现EdgeWebView框架和Edge浏览器功能。为了方便,做成了一键批处理,下载Edge最新版本将数字版本号文件夹解压到存放绿化版edge目录中(路径不要含中文,且不要再放其它文件夹),再将批处理放入后运行绿化即可。
Edge最新绿色zip版网上搜索可下载(官方安装版需安装后提取),因体积大就不放链接了。
批处理脚本如下:
@echo off & title 绿化 EdgeWebView 脚本 by xb21cn
if exist "%ProgramFiles(x86)%\Microsoft\Edge" (
echo=&echo ----- 系统已存在 Edge,是否删除?-----
echo=&echo=
echo 不想删除则直接关闭本窗口退出! &echo= & pause
)
rd /s/q "%ProgramFiles(x86)%\Microsoft"
for /f "delims=" %%i in ('dir/ad/b/o-n "%CD%"') do (set "egver=%%i")
set "egdir=%CD%\%egver%"
set "edgep=%ProgramFiles(x86)%\Microsoft\EdgeWebView"
set "regph=HKLM\SOFTWARE\WOW6432Node\Microsoft\EdgeUpdate"
rd /q /s "%CD%\%egver%\acopilot_provider_msix"
rd /q /s "%CD%\%egver%\AdSelectionAttestationsPreloaded"
rd /q /s "%CD%\%egver%\BHO"
rd /q /s "%CD%\%egver%\copilot_provider_msix"
rd /q /s "%CD%\%egver%\edge_feedback"
rd /q /s "%CD%\%egver%\Extensions"
rd /q /s "%CD%\%egver%\Installer"
rd /q /s "%CD%\%egver%\MEIPreload"
rd /q /s "%CD%\%egver%\Notifications"
rd /q /s "%CD%\%egver%\ResiliencyLinks"
rd /q /s "%CD%\%egver%\Trust Protection Lists"
rd /q /s "%CD%\%egver%\VisualElements"
for /f %%i in ('dir/s/a/b "%CD%\%egver%\Locales" ^|findstr /i /v "zh-CN"') do (del /f /q "%%i")
del /f/q "%CD%\%egver%\identity_helper.*"
del /f/q "%CD%\%egver%\show_third_party_software_licenses.bat"
md "%edgep%\Application"
mklink /d "%edgep%\Application\%egver%" "%egdir%"
md "%ProgramFiles(x86)%\Microsoft\Edge\Application"
mklink /d "%ProgramFiles(x86)%\Microsoft\Edge\Application\%egver%" "%egdir%"
md "%ProgramFiles(x86)%\Microsoft\EdgeCore"
mklink /d "%ProgramFiles(x86)%\Microsoft\EdgeCore\%egver%" "%egdir%"
echo=>"%ProgramFiles(x86)%\Microsoft\EdgeUpdate"
attrib +r +s "%ProgramFiles(x86)%\Microsoft\EdgeUpdate"
reg add "%regph%\Clients\{F3017226-FE2A-4295-8BDF-00C3A9A7E4C5}" /f /v "location" /t REG_SZ /d "%edgep%\Application"
reg add "%regph%\Clients\{F3017226-FE2A-4295-8BDF-00C3A9A7E4C5}" /f /v "name" /t REG_SZ /d "Microsoft Edge WebView2 Runtime"
reg add "%regph%\Clients\{F3017226-FE2A-4295-8BDF-00C3A9A7E4C5}" /f /v "pv" /t REG_SZ /d "%egver%"
reg add "%regph%\Clients\{F3017226-FE2A-4295-8BDF-00C3A9A7E4C5}" /f /v "SilentUninstall" /t REG_SZ /d "\"%edgep%\Application\%egver%\Installer\setup.exe\" --force-uninstall --uninstall --msedgewebview --system-level --verbose-logging"
reg add "%regph%\Clients\{F3C4FE00-EFD5-403B-9569-398A20F1BA4A}" /f /v "name" /t REG_SZ /d "Microsoft Edge 更新"
reg add "%regph%\Clients\{F3C4FE00-EFD5-403B-9569-398A20F1BA4A}" /f /v "pv" /t REG_SZ /d "1.3.193.5"
reg add "%regph%\ClientState\{56EB18F8-B008-4CBD-B6D2-8C97FE7E9062}" /f /v "InstallTime" /t REG_DWORD /d 1721796638
reg add "%regph%\ClientState\{F3017226-FE2A-4295-8BDF-00C3A9A7E4C5}" /f /v "brand" /t REG_SZ /d "GGLS"
reg add "%regph%\ClientState\{F3017226-FE2A-4295-8BDF-00C3A9A7E4C5}" /f /v "DayOfInstall" /t REG_DWORD /d 4294967295
reg add "%regph%\ClientState\{F3017226-FE2A-4295-8BDF-00C3A9A7E4C5}" /f /v "DayOfLastActivity" /t REG_DWORD /d 4294967295
reg add "%regph%\ClientState\{F3017226-FE2A-4295-8BDF-00C3A9A7E4C5}" /f /v "DayOfLastRollCall" /t REG_DWORD /d 4294967295
reg add "%regph%\ClientState\{F3017226-FE2A-4295-8BDF-00C3A9A7E4C5}" /f /v "EBWebView" /t REG_SZ /d "%edgep%\Application\%egver%"
reg add "%regph%\ClientState\{F3017226-FE2A-4295-8BDF-00C3A9A7E4C5}" /f /v "InstallerProgress" /t REG_DWORD /d 100
reg add "%regph%\ClientState\{F3017226-FE2A-4295-8BDF-00C3A9A7E4C5}" /f /v "InstallerRepeatedFailureCount" /t REG_DWORD /d 0
reg add "%regph%\ClientState\{F3017226-FE2A-4295-8BDF-00C3A9A7E4C5}" /f /v "InstallSource" /t REG_SZ /d "offline"
reg add "%regph%\ClientState\{F3017226-FE2A-4295-8BDF-00C3A9A7E4C5}" /f /v "InstallTime" /t REG_DWORD /d 1721796641
reg add "%regph%\ClientState\{F3017226-FE2A-4295-8BDF-00C3A9A7E4C5}" /f /v "LastCheckSuccess" /t REG_DWORD /d 1721796668
reg add "%regph%\ClientState\{F3017226-FE2A-4295-8BDF-00C3A9A7E4C5}" /f /v "LastInstallerError" /t REG_DWORD /d 0
reg add "%regph%\ClientState\{F3017226-FE2A-4295-8BDF-00C3A9A7E4C5}" /f /v "LastInstallerExtraCode1" /t REG_DWORD /d 196757
reg add "%regph%\ClientState\{F3017226-FE2A-4295-8BDF-00C3A9A7E4C5}" /f /v "LastInstallerResult" /t REG_DWORD /d 0
reg add "%regph%\ClientState\{F3017226-FE2A-4295-8BDF-00C3A9A7E4C5}" /f /v "LastInstallerSuccessLaunchCmdLine" /t REG_SZ /d "\"%edgep%\Application\%egver%\msedge.exe\" --from-installer"
reg add "%regph%\ClientState\{F3017226-FE2A-4295-8BDF-00C3A9A7E4C5}" /f /v "LatestRecommendedVersion" /t REG_SZ /d "%egver%"
reg add "%regph%\ClientState\{F3017226-FE2A-4295-8BDF-00C3A9A7E4C5}" /f /v "ping_freshness" /t REG_SZ /d "{FB9B66BC-B467-4E84-80BC-959707BDEAE6}"
reg add "%regph%\ClientState\{F3017226-FE2A-4295-8BDF-00C3A9A7E4C5}" /f /v "pv" /t REG_SZ /d "%egver%"
reg add "%regph%\ClientState\{F3017226-FE2A-4295-8BDF-00C3A9A7E4C5}" /f /v "UninstallArguments" /t REG_SZ /d " --uninstall --msedgewebview --system-level --verbose-logging"
reg add "%regph%\ClientState\{F3017226-FE2A-4295-8BDF-00C3A9A7E4C5}" /f /v "UninstallString" /t REG_SZ /d "%edgep%\Application\%egver%\Installer\setup.exe"
reg add "%regph%\ClientState\{F3017226-FE2A-4295-8BDF-00C3A9A7E4C5}\CurrentState" /f /v "DownloadProgressPercent" /t REG_DWORD /d 0
reg add "%regph%\ClientState\{F3017226-FE2A-4295-8BDF-00C3A9A7E4C5}\CurrentState" /f /v "DownloadTimeRemainingMs" /t REG_DWORD /d 1232473
reg add "%regph%\ClientState\{F3017226-FE2A-4295-8BDF-00C3A9A7E4C5}\CurrentState" /f /v "InstallProgressPercent" /t REG_DWORD /d 100
reg add "%regph%\ClientState\{F3017226-FE2A-4295-8BDF-00C3A9A7E4C5}\CurrentState" /f /v "InstallTimeRemainingMs" /t REG_DWORD /d 0
reg add "%regph%\ClientState\{F3017226-FE2A-4295-8BDF-00C3A9A7E4C5}\CurrentState" /f /v "StateValue" /t REG_DWORD /d 7
reg add "%regph%\ClientState\{F3C4FE00-EFD5-403B-9569-398A20F1BA4A}" /f /v "InstallSource" /t REG_SZ /d "taggedmi"
reg add "%regph%\ClientState\{F3C4FE00-EFD5-403B-9569-398A20F1BA4A}" /f /v "InstallTime" /t REG_DWORD /d 1721796638
reg add "%regph%\ClientState\{F3C4FE00-EFD5-403B-9569-398A20F1BA4A}" /f /v "pv" /t REG_SZ /d "1.3.193.5"
mshta VBScript:Execute("Set a=CreateObject(""WScript.Shell""):Set b=a.CreateShortcut(a.SpecialFolders(""DeskTop"") & ""\Edge.lnk""):b.TargetPath=""%egdir%\msedge.exe"":b.WorkingDirectory=""%egdir%"":b.Arguments=""--no-first-run --disable-component-update --disable-background-networking --user-data-dir=%SystemDrive%\users\edge"":b.Save:close")
exit /b
测试 OfficePlus 完美运行:
