VB6 ADO-Verbindung - Wie Sie Überprüfen, wenn Sie in der Transaktion?

Gibt es eine Möglichkeit zu sagen, indem nur der ADODB.Connection-Objekt, ob oder nicht es wird aktuell an einer Transaktion beteiligt?

Ich würde lieben im Stande zu sein, zu testen, diese auf das verbinden-Objekt selbst, ohne sich auf die Führung eines boolean-neben aktualisiert.

InformationsquelleAutor Tom Tresansky | 2010-04-07
  1. 10

    Den BeginTrans Methode kann verwendet werden, als eine Funktion, gibt die Verschachtelungsebene von Transaktionen. Wenn Sie eine Eigenschaft erstellen, zu speichern, dies können Sie überprüfen, wo immer Sie brauchen, um zu sehen, ob es größer als 0 ist. Wenn Sie einen commit oder rollback, müssen Sie verringern Sie die Immobilie selbst.

    Private m_TransLevel As Long

Public Property Get TransactionLevel() As Long
    TransactionLevel = m_TransLevel
End Property
Public Property Let TransactionLevel(vLevel As Long)
    m_TransLevel = vLevel
End Property

Public Sub SaveMyData()

    TransactionLevel = adoConnection.BeginTrans()
    ...

End Sub

    Könnte man auch anpassen, den Rückgabewert zu arbeiten, in einer Funktion, liefert True/False, wenn das level - > 1. Ich weiß nicht, wie diese als gut, aber es würde in etwa so Aussehen (ohne Fehlerbehandlung)

    Public Function IsConnectionInsideTransaction(ByVal vADOConnection as ADOBD.Connection) As Boolean
    Dim intLevel As Integer

    If vADOConnection.State = AdStateOpen Then
        intLevel = vADOConnection.BeginTrans()
        IsConnectionInsideTransaction = (intLevel > 1)
        vADOConnection.RollbackTrans
    End If

End Function
    • Habe ich mir Gedanken über Variationen der ersten Methode, die im wesentlichen die Verpackung der ADODB.Verbindung in eine neue MyConnection-Klasse, die würde fügen Sie diese und andere Funktionen. Wollte, um änderungen am vorhandenen code, wenn möglich dachte. Die zweite Möglichkeit beantwortet meine Frage, ich nehme an, scheint aber sehr riskant für mich, ich weiß nicht wirklich wollen, die Interaktion mit der Datenbank jedes mal, wenn ich überprüfen... Danke für die Vorschläge!
    • Verpackung mit Ihrem eigenen connection-Klasse könnte noch einige andere Vorteile. Wenn Sie jemals brauchen, um zu aktualisieren VB.net es könnte einfacher sein, wenn Sie gewickelt habe alle ADO-Objekte in Ihre eigenen Objekte. Sie machen konnten ähnliche Signaturen der ADO (zum minimieren von änderungen an bestehenden code), aber nur dann aussetzen, das minimum an Funktionalität, um den Umfang des upgrade-Aufwand. Ich würde vorschlagen, dass Sie in ein DLL-Projekt, so dass das Haupt-Projekt nicht auch Referenz ADO. Full disclosure: wir haben nicht geschieht dabei völlig in unsere eigenen Projekte, aber ich wünschte, wir hatten.
    • Wenn nur unsere reporting-engine verwendet ein wrapper um ADODB.Connection! Ich habe schon mit dem Gedanken getragen zu minimieren von änderungen an den bestehenden report Extraktion von code, so dass Benutzer Berichte ausführen können über eine WLAN-Verbindung (die in unserem Fall geht das durch eine benutzerdefinierte RPC-server).
    InformationsquelleAutor jac
  2. 2

    Wenn Sie die Verbindung zu einem Microsoft SQL Server und können sich darauf verlassen, reagieren schnell genug (d.h. es ist nicht auf der anderen Seite des Planeten) führen Sie die Abfrage:

    SELECT @@TRANCOUNT
    • ich mag diese Antwort! dim rstc, tc set rstc = adoCon.Execute("SELECT @@TRANCOUNT") tc = CLng(rstc.Felder(0))
    InformationsquelleAutor Stijn Sanders
  3. 0

    Wie es aussieht, können Sie die ADO-Zustand. http://msdn.microsoft.com/en-us/library/ms675068%28v=VS.85%29.aspx

    Wahrscheinlich wissen Sie bereits dieses andere Teil, aber ich poste es trotzdem.

    Dies erklärt, wie die Transaktionen arbeiten mit ADO in VB.
    http://support.microsoft.com/kb/198024

    InformationsquelleAutor Thomas Schultz
  4. 0

    Kann man nicht, es sei denn, Sie verfolgen ihn selbst. Das connection-Objekt, nicht eine Eigenschaft, die den Umgang mit der Transaktion Staat. Du musst Ihr proc-setzen Sie ein flag in einer anderen Tabelle/Einstellungen Bereich, wenn Sie HABEN, es zu haben (was problematisch sein kann, wenn unbehandelte Fehler auftreten, und das Zustands-flag bekommt "stecken" mit einem ungültigen status, Sie müssen sich mit einem gültigen "timeout" oder "override" zu ignorieren/zu töten/überschreiben Sie die vorherigen).

    InformationsquelleAutor jasonk
Schreibe einen Kommentar