ACCESS + VB +ORACLE + TRANSACTION

[Lude]

Hi,

___codeschnipsel___start
Private Sub Form_Load()
    Set wrkODBC = CreateWorkspace("ODBCWorkspace", "cdb", _
        "usr", dbUseODBC)
    Workspaces.Append wrkODBC
    DefaultType = dbUseJet
    wrkODBC.BeginTrans
End Sub
___codeschnipsel___end

und beim betätigen des "undo"-buttons geschieht ein rollback

___codeschnipsel___start
Private Sub cmdUndo_Click()
  Set wrkODBC = CreateWorkspace("ODBCWorkspace", "cdb", _
      "usr", dbUseODBC)
  Workspaces.Append wrkODBC
  DefaultType = dbUseJet
  wrkODBC.Rollback
End Sub
___codeschnipsel___end

warum nimmst Du keinen "form-globalen" Workspace (doppeltes "Create" bringt kein Glueck.)? btw - Nimm doch einfach den Standard-Workspace und ein "form-globales" Connection-Objekt.

Eventuell musst Du auch sicherstellen, dass die tran in ein und derselben Verbindung begonnen und committed wird.

Gruss,
Lude