Excel) (ODBCErrors 物件
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 支援與意見反應。