Beyond Compare 5.0.2.30045 绿色批处理

qq8899399 · 发表于 2024-7-11 19:01:29

本帖最后由 qq8899399 于 2024-8-30 03:27 编辑

https://cloud.189.cn/web/share?code=bANBnuVB3e6v（访问码：a3de）

@ECHO Off
PUSHD %~DP0
>NUL 2>&1 REG.exe query "HKU\S-1-5-19" || (
ECHO SET UAC = CreateObject^("Shell.Application"^) > "%TEMP%\Getadmin.vbs"
ECHO UAC.ShellExecute "%~f0", "%1", "", "runas", 1 >> "%TEMP%\Getadmin.vbs"
"%TEMP%\Getadmin.vbs"
DEL /f /q "%TEMP%\Getadmin.vbs" 2>NUL
Exit /b
)
TITLE Beyond Compare 5 安装/卸载
:Menu
SET Options=
ECHO.&ECHO. 1.添加资源管理器右键菜单项
ECHO.&ECHO. 2.移除资源管理器右键菜单项
ECHO.&ECHO. 3.退出
ECHO.
SET /P Options=[92m请输入选择项目序号并按回车确认：[0m
IF /I "%Options%"=="1" GOTO AddMenu
IF /I "%Options%"=="2" GOTO RemoveMenu
IF /I "%Options%"=="3" GOTO OUT
ECHO.&ECHO.序号无效，请重新输入！
PING -n 2 127.1>NUL
CLS
GOTO Menu
:AddMenu
ECHO.&ECHO 添加 BeyondCompare 5 鼠标右键关联
reg add "HKCU\Software\Scooter Software\Beyond Compare" /f /v "ExePath" /d "%~dp0BCompare.exe" >NUL
reg add "HKCU\SOFTWARE\Scooter Software\Beyond Compare 5" /f /v "ExePath" /d "%~dp0BCompare.exe" >NUL
reg add "HKCU\SOFTWARE\Scooter Software\Beyond Compare 5\BcShellEx" /f /v "SavedLeft" /d "%~dp0BCompare.exe" >NUL
reg add "HKLM\SOFTWARE\WOW6432Node\Scooter Software\Beyond Compare\BcShellEx" /f /v "ExePath" /d "%~dp0BCompare.exe" >NUL
reg add "HKLM\SOFTWARE\WOW6432Node\Scooter Software\Beyond Compare\BcShellEx" /f /v "SavedLeft" /d "%~dp0BCompare.exe" >NUL
reg add "HKLM\SOFTWARE\WOW6432Node\Scooter Software\Beyond Compare 5\BcShellEx" /f /v "ExePath" /d "%~dp0BCompare.exe" >NUL
reg add "HKLM\SOFTWARE\WOW6432Node\Scooter Software\Beyond Compare 5\BcShellEx" /f /v "SavedLeft" /d "%~dp0BCompare.exe" >NUL
reg add "HKLM\SOFTWARE\Scooter Software\Beyond Compare\BcShellEx" /f /v "ExePath" /d "%~dp0BCompare.exe" >NUL
reg add "HKLM\SOFTWARE\Scooter Software\Beyond Compare\BcShellEx" /f /v "SavedLeft" /d "%~dp0BCompare.exe" >NUL
reg add "HKLM\SOFTWARE\Scooter Software\Beyond Compare 5\BcShellEx" /f /v "ExePath" /d "%~dp0BCompare.exe" >NUL
reg add "HKLM\SOFTWARE\Scooter Software\Beyond Compare 5\BcShellEx" /f /v "SavedLeft" /d "%~dp0BCompare.exe" >NUL
reg add "HKLM\SOFTWARE\Classes\CLSID\{812BC6B5-83CF-4AD9-97C1-6C60C8D025C5}" /f /ve /d "CirrusShellEx" >NUL
reg add "HKLM\SOFTWARE\Classes\CLSID\{812BC6B5-83CF-4AD9-97C1-6C60C8D025C5}\InProcServer32" /f /ve /d ""%~dp0BCShellEx64.dll"" >NUL
reg add "HKLM\SOFTWARE\Classes\CLSID\{812BC6B5-83CF-4AD9-97C1-6C60C8D025C5}\InProcServer32" /f /v "ThreadingModel" /d "Apartment" >NUL
reg add "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\BCompare.exe" /f /ve /d "%~dp0BCompare.exe" >NUL
reg add "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\BCompare.exe" /f /v "UseURL" /t REG_DWORD /d "1" >NUL
reg add "HKLM\SOFTWARE\Classes\.bcss" /f /ve /d "BeyondCompare.Snapshot" >NUL
reg add "HKLM\SOFTWARE\Classes\BeyondCompare.Snapshot" /f /ve /d "Beyond Compare Snapshot" >NUL
reg add "HKLM\SOFTWARE\Classes\BeyondCompare.Snapshot\DefaultIcon" /f /ve /d ""%~dp0BCompare.exe,0"" >NUL
reg add "HKLM\SOFTWARE\Classes\BeyondCompare.Snapshot\shell\open\command" /f /ve /d ""%~dp0BCompare.exe" "%%1"" >NUL
reg add "HKLM\SOFTWARE\Classes\.bcpkg" /f /ve /d "BeyondCompare.SettingsPackage" >NUL
reg add "HKLM\SOFTWARE\Classes\BeyondCompare.SettingsPackage" /f /ve /d "Beyond Compare Settings Package" >NUL
reg add "HKLM\SOFTWARE\Classes\BeyondCompare.SettingsPackage" /f /v "EditFlags" /t REG_DWORD /d "0x00100000" >NUL
reg add "HKLM\SOFTWARE\Classes\BeyondCompare.SettingsPackage\DefaultIcon" /f /ve /d ""%~dp0BCompare.exe,0"" >NUL
reg add "HKLM\SOFTWARE\Classes\BeyondCompare.SettingsPackage\shell\open\command" /f /ve /d ""%~dp0BCompare.exe" "%%1"" >NUL
reg add "HKLM\SOFTWARE\Classes\*\shellex\ContextMenuHandlers\CirrusShellEx" /f /ve /d "{812BC6B5-83CF-4AD9-97C1-6C60C8D025C5}" >NUL
reg add "HKLM\SOFTWARE\Classes\Folder\shellex\ContextMenuHandlers\CirrusShellEx" /f /ve /d "{812BC6B5-83CF-4AD9-97C1-6C60C8D025C5}" >NUL
reg add "HKLM\SOFTWARE\Classes\lnkfile\shellex\ContextMenuHandlers\CirrusShellEx" /f /ve /d "{812BC6B5-83CF-4AD9-97C1-6C60C8D025C5}" >NUL
reg add "HKLM\SOFTWARE\Classes\Directory\shellex\ContextMenuHandlers\CirrusShellEx" /f /ve /d "{812BC6B5-83CF-4AD9-97C1-6C60C8D025C5}" >NUL
reg add "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Shell Extensions\Approved" /f /v "{812BC6B5-83CF-4AD9-97C1-6C60C8D025C5}" /d "Beyond Compare 5 Shell Extension" >NUL
reg add "HKLM\SYSTEM\CurrentControlSet\Services\EventLog\Application\Beyond Compare 5" /f /v "TypesSupported" /t REG_DWORD /d "7" >NUL
reg add "HKLM\SYSTEM\CurrentControlSet\Services\EventLog\Application\Beyond Compare 5" /f /v "EventMessageFile" /d "%~dp0BCompare.exe" >NUL
ECHO.&ECHO 复制配置文件到当前用户目录
IF NOT EXIST "%USERPROFILE%\AppData\Roaming\Scooter Software\Beyond Compare 5" (mkdir "%USERPROFILE%\AppData\Roaming\Scooter Software\Beyond Compare 5")
copy /y .\config "%USERPROFILE%\AppData\Roaming\Scooter Software\Beyond Compare 5"
ECHO.&ECHO 正在添加BeyondCompare.5.ShellExt App
PowerShell.exe -NonInteractive -Command "Add-AppxPackage '%~dp0BCShellEx.msix'"
#备用PowerShell.exe -NonInteractive -Command "Add-AppProvisionedPackage -Online -SkipLicense -Regions all -PackagePath:'%~dp0BCShellEx.msix'"
ECHO.&ECHO 正在创建BeyondCompare 5 桌面快捷方式
mshta VBScript:Execute("Set a=CreateObject(""WScript.Shell""):Set b=a.CreateShortcut(a.SpecialFolders(""Desktop"") & ""\Beyond Compare 5.lnk""):b.TargetPath=""%~dp0BCompare.exe"":b.WorkingDirectory=""%~dp0"":b.Save:close")
ECHO.&ECHO 重启Explorer资源管理器
taskkill /f /im explorer.exe & start "" %systemroot%\explorer.exe
cls
ECHO.&ECHO 绿化完成，任意键关闭！&pause>nul &exit
:RemoveMenu
ECHO.&ECHO 结束 BeyondCompare 5 进程
taskkill /f /im BCompare.exe>NUL 2>NUL
ECHO.&ECHO 移除 BeyondCompare 5 鼠标右键关联
reg delete "HKLM\SOFTWARE\Classes\.bcss" /F>NUL 2>NUL
reg delete "HKLM\SOFTWARE\Classes\.bcpkg" /F>NUL 2>NUL
reg delete "HKLM\SOFTWARE\Classes\BeyondCompare.Snapshot" /F>NUL 2>NUL
reg delete "HKLM\SOFTWARE\Classes\BeyondCompare.SettingsPackage" /F>NUL 2>NUL
reg delete "HKCU\SOFTWARE\Scooter Software\Beyond Compare" /F>NUL 2>NUL
reg delete "HKLM\SOFTWARE\Scooter Software\Beyond Compare" /F>NUL 2>NUL
reg delete "HKCU\SOFTWARE\Scooter Software\Beyond Compare 5" /F>NUL 2>NUL
reg delete "HKLM\SOFTWARE\Scooter Software\Beyond Compare 5" /F>NUL 2>NUL
reg delete "HKLM\SOFTWARE\WOW6432Node\Scooter Software\Beyond Compare" /F>NUL 2>NUL
reg delete "HKLM\SOFTWARE\WOW6432Node\Scooter Software\Beyond Compare 5" /F>NUL 2>NUL
reg delete "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\BCompare.exe" /F >NUL 2>NUL
reg delete "HKLM\SOFTWARE\Classes\CLSID\{812BC6B5-83CF-4AD9-97C1-6C60C8D025C5}" /F >NUL 2>NUL
reg delete "HKLM\SYSTEM\CurrentControlSet\Services\EventLog\Application\Beyond Compare 5" /F>NUL 2>NUL
reg delete "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Shell Extensions\Approved" /F /v "{812BC6B5-83CF-4AD9-97C1-6C60C8D025C5}">NUL 2>NUL
reg delete "HKLM\SOFTWARE\Classes\*\shellex\ContextMenuHandlers\CirrusShellEx" /F>NUL 2>NUL
reg delete "HKLM\SOFTWARE\Classes\Folder\shellex\ContextMenuHandlers\CirrusShellEx" /F>NUL 2>NUL
reg delete "HKLM\SOFTWARE\Classes\lnkfile\shellex\ContextMenuHandlers\CirrusShellEx" /F>NUL 2>NUL
reg delete "HKLM\SOFTWARE\Classes\Directory\shellex\ContextMenuHandlers\CirrusShellEx" /F>NUL 2>NUL
ECHO.&ECHO 正在移除 BeyondCompare.5.ShellExt App
PowerShell.exe "Get-AppxPackage -AllUsers -Name "ScooterSoftware.BeyondCompare.5.ShellExt" | Remove-AppxPackage -AllUsers"
ECHO.&ECHO 正在移除 BeyondCompare 5 桌面快捷方式
del /f /q "%USERPROFILE%\Desktop\Beyond Compare 5.lnk" /F>NUL 2>NUL
ECHO.&ECHO 正在移除 BeyondCompare 5 用户配置文件
rmdir /s /q "%USERPROFILE%\AppData\Roaming\Scooter Software">NUL 2>NUL
ECHO.&ECHO 重启Explorer资源管理器
taskkill /f /im explorer.exe & start "" %systemroot%\explorer.exe
cls
ECHO.&ECHO 移除完成
ECHO.&ECHO 移除完成
ECHO.&ECHO 移除完成
ECHO.&ECHO 移除完成
ECHO.&ECHO 移除完成
ECHO.&ECHO 移除完成
ECHO.&ECHO 卸载成功，按任意键关闭。&pause>nul &exit
:OUT
exit

复制代码

BCShellEx.msix 必须在安装目录 ,图片就不编辑了。

yyz2191958 · 发表于 2024-7-11 19:09:28

恭喜恭喜问题解决

Bluebells · 发表于 2024-7-11 19:21:32

为何要用 v4 版的?

softwarezheng · 发表于 2024-7-11 20:01:48

感恩天地！感谢未来

悠悠youyou · 发表于 2024-7-11 20:03:56

感恩天地！感谢未来

2011lanz · 发表于 2024-7-11 20:32:10

很牛，谢谢分享！

yc2428 · 发表于 2024-7-11 20:34:56

谢谢分享

情深梦缘 · 发表于 2024-7-11 20:38:19

Bluebells 发表于 2024-7-11 19:21
为何要用 v4 版的?

同问，为何要用V4版的？

ppll-2030 · 发表于 2024-7-11 20:46:04

右键有什么特别的功能吗？我一直都是直接拖两个文件就可以了。

h25530095 · 发表于 2024-7-11 21:39:52

一直用单文件版，顶起给需要的人

15126222223 · 发表于 2024-7-11 22:17:45

厉害了。来学习的。

wang1126 · 发表于 2024-7-12 05:57:32

谢谢分享

haczllq · 发表于 2024-7-12 07:50:11

感谢分享

BEIKING · 发表于 2024-7-12 08:20:14

用V4版的也有一个问题，，语言文件不兼容

china.gaofeng · 发表于 2024-7-12 08:56:57

没觉得BC5右键菜单有什么不好啊，除了原来选中左侧文件/文件夹后，再选择另一个文件/文件夹，原来是直接显示比较，现在是在级联菜单下显示比较，稍微啰嗦一点点，但也没什么不妥

dxgtxxzx · 发表于 2024-7-12 08:57:39

这个比较实用

2267981144 · 发表于 2024-7-12 10:21:55

感谢提供分享！

softwarezheng · 发表于 2024-7-13 09:39:17

感恩天地，感谢有你

qq8899399 · 发表于 2024-7-13 15:01:22

ppll-2030 发表于 2024-7-11 20:46
右键有什么特别的功能吗？我一直都是直接拖两个文件就可以了。

你先打开BC 再拖文件，步骤不多两步？

qq8899399 · 发表于 2024-7-13 15:02:15

Bluebells 发表于 2024-7-11 19:21
为何要用 v4 版的?

V5 的。折腾了两天没办法做成批处理方式，水平不行，所以用V4的

ppll-2030 · 发表于 2024-7-13 16:21:19

qq8899399 发表于 2024-7-13 15:01
你先打开BC 再拖文件，步骤不多两步？

如果只是这个功能，那还是算了。太占右键空间了

2012_maxbo · 发表于 2024-7-13 16:40:03

楼主这是曲线救国，我也在想怎么解决呢，可惜水平不够，还是等等吧

qq8899399 · 发表于 2024-7-13 21:23:09

2012_maxbo 发表于 2024-7-13 16:40
楼主这是曲线救国，我也在想怎么解决呢，可惜水平不够，还是等等吧

是啊。水平不够。没办法只能这样
之前BC4 的方法行不通了
官方https://www.scootersoftware.com/kb/shellex 也没有BC5的方法，

qq8899399 · 发表于 2024-7-14 18:46:41

2012_maxbo 发表于 2024-7-13 16:40
楼主这是曲线救国，我也在想怎么解决呢，可惜水平不够，还是等等吧

已解决~ 批处理通配符搞错了。引起

toptop · 发表于 2024-7-14 19:23:10

谢提供分享！

Rock2000 · 发表于 2024-7-15 11:42:13

Add-AppProvisionedPackage : 参数错误。所在位置行:1 字符: 1 + Add-AppProvisionedPackage -Online -SkipLicense -Regions all -PackageP ... + ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ + CategoryInfo : NotSpecified: (:) [Add-AppxProvisionedPackage], PSArgumentException + FullyQualifiedErrorId : Microsoft.Dism.Commands.AddAppxProvisionedPackageCommand

qq8899399 · 发表于 2024-7-15 12:41:12

Rock2000 发表于 2024-7-15 11:42
Add-AppProvisionedPackage : 参数错误。所在位置行:1 字符: 1 + Add-AppProvisionedPackage -Online -Sk ...

BCShellEx.msix 必须在安装目录

Rock2000 · 发表于 2024-7-15 17:34:22

本帖最后由 Rock2000 于 2024-7-15 17:43 编辑

qq8899399 发表于 2024-7-15 12:41
BCShellEx.msix 必须在安装目录

是在安装目录了。就这行出错
PowerShell.exe -NonInteractive -Command "Add-AppProvisionedPackage -Online -SkipLicense -Regions all -PackagePath:'%~dp0BCShellEx.msix'"

qq8899399 · 发表于 2024-7-15 17:47:50

Rock2000 发表于 2024-7-15 17:34
是在安装目录了。就这行出错
PowerShell.exe -NonInteractive -Command "Add-AppProvisionedPackage - ...

我这正常。 WIN11 22631 怪事了

qq8899399 · 发表于 2024-7-15 17:52:23

Rock2000 发表于 2024-7-15 17:34
是在安装目录了。就这行出错
PowerShell.exe -NonInteractive -Command "Add-AppProvisionedPackage - ...

你手工在安装目录运行打开CMD 菜单下面的看下报错不？
PowerShell.exe -NonInteractive -Command "Add-AppProvisionedPackage -Online -SkipLicense -Regions all -PackagePath:BCShellEx.msix"

		自动登录	找回密码
密码			注册

[已解决] Beyond Compare 5.0.2.30045 绿色批处理

点评

评分

点评

点评

点评

评分

点评

点评

点评

点评