ODBCErrors 属性

返回一个 ODBCErrors 集合，该集合包含由最近的查询表或数据透视表操作产生的所有 ODBC 错误。只读。

有关返回集合中单个对象的详细信息，请参阅返回集合中的对象。

说明

如果同时有多个查询在运行，那么 ODBCErrors 集合包含从最后完成的查询开始的所有 ODBC 错误。

示例

本示例刷新查询表一，并显示产生的所有 ODBC 错误。

With Worksheets(1).QueryTables(1)
    .Refresh
    Set errs = Application.ODBCErrors
    If errs.Count > 0 Then
        Set r = .Destination.Cells(1)
        r.Value = "The following errors occurred:"
        c = 0
        For Each er In errs
            c = c + 1
            r.offset(c, 0).value = er.ErrorString
            r.offset(c, 1).value = er.SqlState
        Next
    Else
        MsgBox "Query complete: all records returned."
    End If
End With