Специалисты, помогите разобраться в ситуации:
в ниже приведенном коде на vbscript при возникновении ошибки
во втором INSERTе транзакция откатывается сама.
как бы узнать кто за это отвечает и на сколько это надежно.


on error goto 0
Dim k, ra
k=0
ra=0
Set oRS = CreateObject("ADODB.connection")
oRS.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\base\proba.mdb"
ors.Open
k=ors.BeginTrans
ors.Execute "INSERT INTO ORs1 (TN) values ( '" & Now() & "');",ra
ors.Execute "INSERT INTO ORs2 (TN) values ( '" & Now() & "');",ra
'if err.number<>0 then
' msgbox "Возникла ошибка, при обновлении данных"
' ors.RollbackTrans
'else
' ors.CommitTrans
'end if
ors.CommitTrans
ors.Close


Спасибо.

Спасибо.

Если не сложно подскажите в чем грубость и как это сделать нежнее.
on error goto line похоже, что не работает.

Спасибо.
На VB/VBA я так и делал, но на vbscript (может быть только у меня)
после on error goto
компилятор пропускает только 0
И метка, И номер строки, И NEXT
вызывают ошибку компиляции сценария

Забыл сказать: Win XP SP1

Вместо Exit Sub можно указать wscript.quit

А вот с номером строки или меткой - проблемка.

Да-а-а-а.
Действительно
On Error Resume Next.
Прийдется чуть усложнить логику, но корректно обработать ошибки
получится.
Спасибо.