绿色版Edge系统应用关联脚本 - 无忧启动论坛

@ECHO OFF
SETLOCAL ENABLEDELAYEDEXPANSION
CHCP 936 >NUL 2>NUL
TITLE 绿色版Edge系统应用关联脚本
:: ======================================
:: 适配绿色版Edge目录
:: ======================================
SET "EDGE_EXE=C:\Program Files (x86)\Microsoft\MSEDGEX64-bin\Application\msedge.exe"
SET "TARGET_ARGS=--profile-directory=Default --disable-logging --disable-breakpad --no-report-upload --disable-component-update --disable-background-networking"
SET "GreenBrowser_Name=Microsoft Edge"
SET "GreenBrowser_Exe=msedge.exe"
:: 指定目录
SET "GreenBrowser_Path=C:\Program Files (x86)\Microsoft\MSEDGEX64-bin\Application"
SET "GreenBrowser_Icon=!GreenBrowser_Path!\!GreenBrowser_Exe!,0"
:: 关联标识
SET "Browser_CLSID={F3017226-FE2A-4295-8BDF-00C3A9A7E4C5}"
SET "Browser_AppID=GreenEdgeX64"
:: ======================================
:: 第一步：基础校验
:: ======================================
:: 拼接完整路径并强制加引号
SET "GreenBrowser_FullPath=!GreenBrowser_Path!\!GreenBrowser_Exe!"
IF NOT EXIST "!GreenBrowser_FullPath!" (
ECHO [31m 错误：绿色版Edge主程序不存在！
ECHO 检测路径："!GreenBrowser_FullPath!"[0m
PAUSE
EXIT /B 1
)
ECHO [33m 检测到绿色版Edge路径："!GreenBrowser_FullPath!"[0m
ECHO.
:: ======================================
:: 第二步：管理员提权
:: ======================================
:: 检查是否管理员
NET SESSION >NUL 2>&1
IF %ERRORLEVEL% NEQ 0 (
ECHO [33m正在请求管理员权限...[0m
:: 用VBS提权（比powershell更稳定，无闪退）
SET "VBS_TEMP=%TEMP%\EdgeGreenElevate.vbs"
ECHO Set UAC = CreateObject^("Shell.Application"^) > "!VBS_TEMP!"
ECHO UAC.ShellExecute "!~f0!", "", "", "runas", 1 >> "!VBS_TEMP!"
CSCRIPT //NOLOGO "!VBS_TEMP!" >NUL 2>&1
DEL /F /Q "!VBS_TEMP!" >NUL 2>&1
EXIT /B 0
)
:: ======================================
:: 第三步：核心关联
:: ======================================
ECHO [33m正在配置系统关联...[0m
:: 1. 注册【默认浏览器核心项】（StartMenuInternet）
:: 64位系统主项
reg add "HKLM\SOFTWARE\Clients\StartMenuInternet\!Browser_AppID!" /ve /d "!GreenBrowser_Name!" /f >NUL 2>&1
reg add "HKLM\SOFTWARE\Clients\StartMenuInternet\!Browser_AppID!\shell\open\command" /ve /d ""!GreenBrowser_FullPath!"" /f >NUL 2>&1
reg add "HKLM\SOFTWARE\Clients\StartMenuInternet\!Browser_AppID!\DefaultIcon" /ve /d "!GreenBrowser_Icon!" /f >NUL 2>&1
:: 32位兼容项（WOW6432Node）
reg add "HKLM\SOFTWARE\WOW6432Node\Clients\StartMenuInternet\!Browser_AppID!" /ve /d "!GreenBrowser_Name!" /f >NUL 2>&1
reg add "HKLM\SOFTWARE\WOW6432Node\Clients\StartMenuInternet\!Browser_AppID!\shell\open\command" /ve /d ""!GreenBrowser_FullPath!"" /f >NUL 2>&1
:: 2. 注册【程序路径关联】（App Paths）
:: 64位
reg add "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\!GreenBrowser_Exe!" /ve /d ""!GreenBrowser_FullPath!"" /f >NUL 2>&1
:: 32位兼容
reg add "HKLM\SOFTWARE\WOW6432Node\Microsoft\Windows\CurrentVersion\App Paths\!GreenBrowser_Exe!" /ve /d ""!GreenBrowser_FullPath!"" /f >NUL 2>&1
:: 3. 设置【默认浏览器】（系统+当前用户）
reg add "HKLM\SOFTWARE\Clients\StartMenuInternet" /ve /d "!Browser_AppID!" /f >NUL 2>&1
reg add "HKLM\SOFTWARE\WOW6432Node\Clients\StartMenuInternet" /ve /d "!Browser_AppID!" /f >NUL 2>&1
reg add "HKCU\SOFTWARE\Clients\StartMenuInternet" /ve /d "!Browser_AppID!" /f >NUL 2>&1
:: ======================================
:: 第四步：创建快捷方式（附加参数+只读）
:: ======================================
ECHO [33m正在创建桌面/开始菜单快捷方式...[0m
:: 桌面快捷方式（处理路径空格）
SET "DESKTOP_LINK=%USERPROFILE%\Desktop\!GreenBrowser_Name!.lnk"
SET "DESKTOP_LINK=%PUBLIC%\Desktop\!GreenBrowser_Name!.lnk"
powershell -Command "$WshShell = New-Object -ComObject WScript.Shell; $shortcut = $WshShell.CreateShortcut('!DESKTOP_LINK!'); $shortcut.TargetPath = '!GreenBrowser_FullPath!'; $shortcut.IconLocation = '!GreenBrowser_Icon!'; $shortcut.Description = '浏览 Web'; $shortcut.Save()" >NUL 2>&1
powershell -Command "$ErrorActionPreference = 'Stop'; $wshell = New-Object -ComObject WScript.Shell; $targetExe = '%EDGE_EXE%'; $argsStr = '%TARGET_ARGS%'; $lnkList = @('%USERPROFILE%\Desktop\Microsoft Edge.lnk', '%PUBLIC%\Desktop\Microsoft Edge.lnk', '%APPDATA%\Microsoft\Internet Explorer\Quick Launch\User Pinned\TaskBar\Microsoft Edge.lnk', 'C:\ProgramData\Microsoft\Windows\Start Menu\Programs\Microsoft Edge.lnk'); foreach ($lnk in $lnkList) { if (Test-Path $lnk) { try { attrib -r $lnk 2>&1 | Out-Null; $shortcut = $wshell.CreateShortcut($lnk); $shortcut.TargetPath = $targetExe; $shortcut.Arguments = $argsStr; $shortcut.WorkingDirectory = Split-Path $targetExe -Parent; $shortcut.Save(); Write-Host '[成功] 已修改：' $lnk; } catch { Write-Host '[失败] 无法修改：' $lnk ' 原因：' $_.Exception.Message; } } else { Write-Host '[跳过] 快捷方式不存在：' $lnk; } }" >nul 2>&1
attrib +r "%USERPROFILE%\Desktop\Microsoft Edge.lnk" >nul 2>&1
attrib +r "%PUBLIC%\Desktop\Microsoft Edge.lnk" >nul 2>&1
:: 开始菜单快捷方式
SET "STARTMENU_LINK=%APPDATA%\Microsoft\Windows\Start Menu\Programs\!GreenBrowser_Name!.lnk"
powershell -Command "$WshShell = New-Object -ComObject WScript.Shell; $shortcut = $WshShell.CreateShortcut('!STARTMENU_LINK!'); $shortcut.TargetPath = '!GreenBrowser_FullPath!'; $shortcut.IconLocation = '!GreenBrowser_Icon!'; $shortcut.Save()" >NUL 2>&1
:: ======================================
:: 第五步：完成提示
:: ======================================
ECHO.
ECHO [32m 绿色版Edge系统关联配置完成！[0m
ECHO 验证方式：
ECHO 1. 打开「控制面板\程序\默认程序\设置默认程序」，可看到"Microsoft Edge"
ECHO 2. 直接在运行（Win+R）输入msedge.exe，可启动绿色版Edge
ECHO 3. 桌面已创建"Microsoft Edge"快捷方式
ECHO.
ECHO 按任意键退出...
PAUSE >NUL
EXIT /B 0

复制代码