如何在Access中查找损坏的查询?

时间:2011-08-23 05:54:26

标签: ms-access

如何在访问中找到损坏的查询。

即。由于删除了基础表或表中列的名称发生了更改,可能已损坏的查询?

是否有一种简单的方法 - 而不是仅仅打开每个运行的查询并检查是否出现了问题?

1 个答案:

答案 0 :(得分:3)

以下是一些可能感兴趣的注释,具体取决于您的Access版本。

请参阅:GetDependencyInfo Method [Access 2003 VBA Language Reference]

不要忘记,在大多数情况下,曲目名称自动更正信息不是一件好事,但在某些情况下可能很有用。

Dim dinf As DependencyInfo

For j = 0 To CurrentData.AllQueries.Count - 1
    Set dinf = CurrentData.AllQueries(j).GetDependencyInfo

    For i = 0 To dinf.Dependencies.Count - 1
        ''Missing alias, query or table, as far as I can tell
        If dinf.Dependencies.Item(i).Name Like "MISSING:*" Then
            Debug.Print CurrentData.AllQueries(j).Name _
                & "   " & dinf.Dependencies.Item(i).Name
        End If
    Next
Next

您可能需要更新依赖项:

Application.CurrentProject.UpdateDependencyInfo

这需要保存。