Объект OLEDBErrors (Excel)

Статья
04/07/2023

Коллекция объектов OLEDBError .

Замечания

Каждый объект OLEDBError представляет ошибку, возвращенную последним запросом OLE DB. Если указанный запрос OLE DB выполняется без ошибок, коллекция OLEDBErrors пуста. Ошибки в коллекции индексируются в том порядке, в котором они создаются поставщиком OLE DB. Нельзя добавлять члены в коллекцию.

Пример

Используйте свойство OLEDBErrors объекта Application , чтобы вернуть коллекцию OLEDBErrors .

В следующем примере отображается описание ошибки и значение свойства SqlState для каждой ошибки OLE DB в коллекции.

For Each objEr in Application.OLEDBErrors 
 MsgBox "The following error occurred:" & _ 
 objEr.ErrorString & " : " & objEr.SqlState 
Next objEr

Используйте OLEDBErrors (index), где index — это номер индекса ошибки OLE DB, чтобы вернуть один объект OLEDBError . В следующем примере отображается описание ошибки и значение свойства SqlState для первой ошибки, возвращенной последним запросом OLE DB.

Set objEr = Application.OLEDBErrors(1) 
MsgBox "The following error occurred:" & _ 
 objEr.ErrorString & " : " & objEr.SqlState

Методы

Элемент

Свойства

См. также

Справочник по объектной модели Excel

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.

Поделиться через