ODBCError 物件的集合。
註解
每一個 ODBCError 物件都代表由最近的 ODBC 查詢所傳回的錯誤。 如果指定的 ODBC 查詢在執行時沒有產生任何錯誤,則 ODBCErrors 集合就是空的。 集合中的錯誤會依 ODBC 資料來源產生的順序編製索引。 您無法在集合中新增成員。
範例
使用 Application 物件的 ODBCErrors 屬性來傳回 ODBCErrors 集合。 下列範例會重新整理第一張查詢表,並顯示所發生的任何 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
方法
屬性
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。