如何静默解除.accdb与TFS的绑定？规避压缩确认弹窗

嘿，针对你在Access 2010 v14环境里遇到的问题——用msaccess.exe myproject.accdb /compact解除TFS绑定会弹出确认弹窗，我来分享几个可行的解决方案：

方案一：VBA编程先解绑再压缩（零弹窗） #

这个方法是先通过代码移除数据库的源代码控制绑定属性，再执行压缩，从根源上避免弹窗触发。步骤如下：

1. 打开目标Access数据库，按Alt + F11打开VBA编辑器
2. 插入新模块，粘贴以下代码：

Sub UnbindAndCompactDB()
    Dim db As DAO.Database
    Dim originalDbPath As String
    Dim tempCompactPath As String
    
    ' 获取当前数据库路径，生成临时压缩文件路径
    Set db = CurrentDb
    originalDbPath = db.Name
    tempCompactPath = Left(originalDbPath, Len(originalDbPath) - 5) & "_temp_compacted.accdb"
    
    ' 移除TFS绑定属性（忽略属性不存在的错误）
    On Error Resume Next
    db.Properties.Delete "SourceControlProvider"
    db.Properties.Delete "SourceControlVer"
    On Error GoTo 0
    
    ' 执行压缩修复，不显示任何弹窗
    Application.CompactRepair _
        sourceFile:=originalDbPath, _
        destinationFile:=tempCompactPath, _
        compactReport:=False
    
    ' 替换原文件（可选，按需调整）
    Kill originalDbPath
    Name tempCompactPath As originalDbPath
    
    MsgBox "TFS绑定已解除，数据库压缩完成！", vbInformation
End Sub

3. 运行这个宏即可，全程不会弹出确认对话框。

⚠️ 重要提醒：执行前务必备份数据库，避免意外导致数据丢失！

方案二：修改注册表全局禁用SCC提示 #

如果需要批量处理多个数据库，可以通过注册表设置让Access不再弹出解除绑定的确认框：

• 按下Win + R输入regedit打开注册表编辑器
• 定位到路径：HKEY_CURRENT_USER\Software\Microsoft\Office\14.0\Access\Settings
• 右键新建DWORD(32位)值，命名为DisableSCCWizard，设置数值数据为1
• 重启Access后，再执行msaccess.exe myproject.accdb /compact就不会看到弹窗了

方案三：直接修改系统表解除绑定（无需压缩） #

如果你只是想解绑而不需要压缩，可直接操作Access的系统表移除绑定信息：

1. 打开数据库时按住Shift键跳过所有启动项
2. 显示系统表：点击「文件」→「选项」→「当前数据库」→「导航选项」→勾选「显示系统对象」
3. 找到并打开MSysConf表，删除Config字段值为SourceControlProvider和SourceControlVer的记录
4. 保存表后，数据库就和TFS彻底解绑了，后续操作也不会再触发相关提示

补充说明 #

• 方案一的代码可以单独提取解绑部分使用，不需要执行压缩步骤
• 所有操作建议先在备份的测试数据库上验证，确保符合你的需求

内容的提问来源于stack exchange，提问作者axelfriman