Discussion :

[star]

.
Dans l'aide "Access 2013 developer documentation", il est précisé dans la rubrique ci-dessous au paragraphe "Remarks"

Transactions are not supported for linked tables.

Sauriez-vous m'indiquer si, en effet, c'est le cas ?

Je suis franchement étonné de lire une telle chose...
.

[loufab]

Bonjour,

Pas du tout étonné.

On peut contourner en exécutant le SQL via DAO (ou ADO) directement sur la base distante.

Cordialement,

[star]

Merci Loufab de la précision concernant la gestion des transactions dans le cadre des tables liées, et pour la solution de contournement via DAO ou ADO.

Mais, je me pose la question de savoir lorsque des tables liées sont contenues dans une base de données externe, comme par exemple MySQL, les ordres DML soumis depuis ACCESS sont pris en compte, exécutés et gérés par le moteur du SGBDR cible. Il m'apparait logique de penser qu'un ordre BEGIN TRANSACTION, COMMIT ou ROLLBACK soit traité de la même manière qu'un ordre DML quelconque (SELECT, INSERT, UPDATE, DELETE).

Reste en effet le recours à DAO ou ADO du type :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

CurrentDb.Execute "BEGIN TRANSACTION"

, etc.
.

[loufab]

Dans ce cas utilise ADO et non pas DAO.

Le currentdb.execute avec une transaction est totalement illogique.

Une transaction doit obligatoirement être dans le même thread SQL. Avec ADO on peut utiliser les méthodes de transaction ou bien choisir d'utiliser l'instruction SQL. Tout dépend de ce que tu as à réaliser.

Cordialement,

[star]

.
Je voudrais dans une transaction créditer un compte et en débitant un autre du même montant, exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
 
CurrentDb.Execute "BEGIN TRANSACTION;"
CurrentDb.Execute "UPDATE Comptes SET MtCompte = MtCompte + 100 WHERE IdCompte = 1;"
CurrentDb.Execute "UPDATE Comptes SET MtCompte = MtCompte - 100 WHERE IdCompte = 2;"
CurrentDb.Execute "COMMIT;"

Est-ce possible de la sorte ?
.

[tee_grandbois]

bonsoir,
apparemment oui mais il faut l'exécuter dans un espace de travail comme dans l'exemple donné ici

[star]

.
Merci pour le lien : https://learn.microsoft.com/fr-fr/of...ans-method-dao

L’exemple suivant montre comment utiliser une transaction dans un espace de travail Data Access Objects (DAO).
Exemple de code fourni par Microsoft Access 2010 Programmer’s Reference.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
 
    Public Sub TransferFunds()
        Dim wrk As DAO.Workspace
        Dim dbC As DAO.Database
        Dim dbX As DAO.Database
 
        Set wrk = DBEngine(0)
        Set dbC = CurrentDb
        Set dbX = wrk.OpenDatabase("e:\books\acc2007vba\myDB.accdb")
 
        On Error GoTo trans_Err
 
        'Begin the transaction
 
        wrk.BeginTrans
 
        'Withdraw funds from one account table
        dbC.Execute "INSERT INTO tblAccounts ( Amount, Txn, TxnDate ) SELECT -20, 'DEBIT', Date()", dbFailOnError
 
        'Deposit funds into another account table
        dbX.Execute "INSERT INTO tblAccounts ( Amount, Txn, TxnDate ) SELECT 20, 'CREDIT', Date()", dbFailOnError
 
        'Commit the transaction
        wrk.CommitTrans dbForceOSFlush
 
    trans_Exit:
        'Clean up
        wrk.Close
        Set dbC = Nothing
        Set dbX = Nothing
        Set wrk = Nothing
        Exit Sub
 
    trans_Err:
        'Roll back the transaction
        wrk.Rollback
        Resume trans_Exit
 
    End Sub

.