使用DoCmd.OpenQuery执行操作查询突发"Property Not Found"错误求助

老兄，这种突然炸锅的老代码最闹心了！我之前也帮人排查过不少Access+SQL Server链接表的类似问题，给你几个实打实的排查方向，挨个试一遍应该能解决：

1. 链接表的ODBC连接出了幺蛾子 #

• 先查ODBC驱动：有没有最近更新过SQL Server ODBC驱动？或者服务器端的SQL Server版本升级了？驱动和服务器版本不匹配很容易触发这种随机的「属性找不到」错误。
• 重新链接表：在Access里走工具 -> 数据库实用工具 -> 链接表管理器，选中所有SQL Server链接表重新链接一遍，确保连接字符串是最新状态。
• 换成无DSN的直接连接：把链接表的连接方式改成直接写ODBC字符串，比用DSN稳定得多。比如在VBA里用这段代码重建链接：

DoCmd.TransferDatabase acLink, "ODBC Database", _
    "ODBC;DRIVER=SQL Server Native Client 11.0;SERVER=你的服务器名;DATABASE=你的库名;UID=账号;PWD=密码;", _
    acTable, "SQL目标表名", "Access链接表名"

2. 并发/锁定冲突在搞鬼 #

• 毕竟是往SQL Server插数据，很可能遇到其他进程（比如ETL脚本、其他用户）锁定了目标表，导致Access这边执行查询时触发奇怪错误。
• 加重试和超时设置：在VBA开头加DBEngine.SetOption dbLockRetry, 10（让Access重试10次），或者在操作查询的SQL视图开头加SET NOCOUNT ON，减少返回给Access的状态信息，降低冲突概率。
• 换用DAO执行查询：把DoCmd.OpenQuery换成更稳定的DAO方式，比如：

CurrentDb.Execute "你的操作查询名", dbFailOnError

这种方式能更精准捕获错误，也不容易出现DoCmd那种莫名的权限/锁定问题。

3. Access数据库本身轻度损坏 #

• 运行3年的数据库，难免积累点小损坏，导致查询属性读取异常。
• 先做压缩修复：点文件 -> 信息 -> 压缩和修复数据库，很多奇怪的小错误都能靠这个搞定。
• 迁移查询到新库：把那5个操作查询导出到空白Access库，测试能不能正常执行。如果新库没问题，说明原库有损坏，建议把所有对象迁移到新库彻底解决。

4. SQL Server端的权限/结构变化 #

• 查账号权限：有没有最近修改过Access连接用的SQL账号权限？比如插入权限被误删了？
• 核对表结构：打开操作查询的SQL视图，对比SQL Server目标表的字段，确保所有插入的字段都存在、数据类型匹配，没有拼写错误——哪怕是一个字段名改了，都可能触发「属性找不到」。

临时应急方案 #

如果错误是随机出现的，可以给VBA加个重试机制，能解决不少偶发问题：

Dim retryCount As Integer
retryCount = 0
On Error Resume Next
Do
    Err.Clear
    DoCmd.OpenQuery "你的查询名"
    retryCount = retryCount + 1
Loop While Err.Number <> 0 And retryCount < 3
On Error GoTo 0
If Err.Number <> 0 Then
    MsgBox "查询执行失败：" & Err.Description
End If

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