Народ, я понимаю, что эта тема навязла в зубах. Но никто так и не дал на нее удовлетворительного ответа. Почему ADO в некоторых случаях не "видит" ошибок при выполнении запросов?

set nocount on не помогает!!!


Привожу пример:

1. SQL script

create table t1(col1 int not null unique)
go
insert into t1 (col1) values (1)
go

create proc sp1
as
begin
set nocount on
select count(*) from sysobjects
insert into t1 (col1) values (1)
end
go

2. VBS script, который его использует:

on error resume next
strConnectionString = "..."

Function ProcessMessage(nStep)
If (Err.Number <> 0) Then
MsgBox "Step: " & CStr(nStep) & Chr(13) + Chr(10) & "Error occured (" & Hex(Err.Number) & "): " & Err.Description
End If
End Function

set cn = CreateObject("ADODB.Connection")
ProcessMessage(1)

cn.Open strConnectionString
ProcessMessage(2)

cn.Execute "set nocount on"
ProcessMessage(3)

cn.Execute "exec sp1"
ProcessMessage(4)

MsgBox "Finish"
-------------------------------------------------------------------------
Если в теле процедуры есть select "вовне", т.е. не во временную таблицу и не в переменную, то ADO перестает видеть ошибки, происходящие ПОСЛЕ этого селекта. Err = 0, Errors collection пустая.

В MSDN рекомендуют либо ставить set nocount on, либо использовать ODBC драйвер вместо OLEDB'шного. НИ ТО, НИ ДРУГОЕ НЕ ПОМОГАЕТ.

Люди! Ведь среди вас дофига народу, который использует ADO. Не верю, что вы не сталкивались с подобной ситуацией!
-------------------------------------------------------------------------
SQL-DMO в таком скрипте ошибку выдает, равно как и чистый OLEDB.

Зуб даю, пустая. И Err.Number = 0.

Тест простейший - прогони и убедись. Все приведено в первом сообщении. Если сделаешь это, пожалуйста, напиши о результатах.

2 nic_ii: спасибо, с command'ом попробую, пока руки не дошли.

2 Dankov: а зачем тогда коллекция Errors? И по какому принципу она то заполняется, то нет? Встречный вопрос (если твоя информация верна) - каким образом отличать рекордсет, содержащий данные, от рекордсета, содержащего ошибки?
--------------------------------------------------------
Вопрос в никуда - почему в MSDN ничего на эту тему нет?! Такие вещи должны быть выбиты здоровенными буквами. Или у меня глаза в кармане... Может, кто пальцем ткнет?
--------------------------------------------------------
Все, иду проверять ваши версии. Спасибо откликнувшимся О результатах напишу.