Transaction Status в Ado Connection

Помогите пожалуйста:
Происходит обрыв Connection; пытаюсь подключиться заново, но перед этим нужно закрыть Connection.
If AdoConnect.State <> 0 Then AdoConnect.Close
Если вовремя этого уже начата Transaction , то не возможно закрыть Connection , пытаюсь Rollback Transaction также не получается т.к выходит ошибка что Connection Failure.....
Пытаюсь написать таким образом:
If AdoConnect.State <> 0 Then
AdoConnect.CommitTrans
AdoConnect.Close
End if
Получаеться , но только если действительно Transaction уже начата , в противном случае ошибка "No Trancaction is Active".

Два вопроса:
1. Как узнать что Trancaction is Active ?
2. Правильно ли использовать AdoConnect.CommitTrans не доведя Trancaction
до конца, данные терять ни как нельзя.
Спасибо большое зарание.

При обрыве соединения с сервером транзакция должна откатыватся сама.

Ни кто ни куда не откатывается.
Было бы хорошо.
Ну что ни кто не может помочь?
Два маленьких несчастненьких вопроса.

2 bushmen

При обрыве соединения с сервером транзакция должна откатыватся сама.

На сервере так и происходит. Но ADO об этом не знает.

2 v.i.k

Да вот кабы ты на Delphi писал, то я б помог. У TADOConection есть свойство InTransaction. И так такие проблемы решаются на ура, но ува на vb не знаю как.

InTransaction в ADOConnection вообще-то устанавливается просто по результатам открытия транзакции. Т.е., в данному случае можно просто руками отслеживать начало транзакции и помечать в каком-нить голобальном флажке. Хотя способ не очень ошибкоустойчивый...

Nobody faults but mine... (LZ)

2 aag

InTransaction в ADOConnection вообще-то устанавливается просто по результатам открытия транзакции.

Так этого было бы и достаточно (хотя значение этого свойства может и не совпадать с реальным состоянием дел на сервере), но в чистом ADOConnection этого нет.