Discussion :

[jeff69]

Salut à tous,

Je voudrais travailler sur un Recordset càd :

- supprimer, ajouter et modifier des enregistrements.

et donc soit :
enregistrer ces modifictations effectuées dans mon Recordset à partir d'un clique sur un bouton
soit : annuler toutes ces modifications à l'aide d'un autre bouton.

Le problème est que le Recordset.update concerne le record en cours et non pas l'ensemble des records du recordset.

Autre exemple : si je fais 2 fois de suite mon_recordset.addnew avec les champs voulus même sans faire de mon_recordset.update le recordset va sauvegarder ces deux enregistrements.

Comment faire pour travailler sur mon recordset et soit enregistrer toutes ces modifications sur les enregistrements soit tout annuler?

Merci

[Delbeke]

Je ne connais pas bien ADO, mais en DAO il y a un BeginTrans,CommitTrans et Roolback qui permettent ce que tu demandes. Essaye de voir si c'est possible avec ADO

[jeff69]

Merci Delbeke du conseil mais la transaction me retourne le même résultat, je dois mal m'y prendre. Car si j'ajoute deux enregistrements je fais un con.rollbacktrans j'ai toujours mes enregistrements de sauvegardés. (enfin sauf le dernier effectué)

Voici mon code de test

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
 
    Set con2 = New ADODB.Connection
    con2.CursorLocation = adUseServer
    con2.Open "mabase"
    con2.BeginTrans
 
    'remplir mon recordset pour les modifications
    Set rs_option = New ADODB.Recordset
    'rs_option.CursorLocation = adUseServer
    rs_option.ActiveConnection = con2
    'rs_option.Properties("IrowsetIdentity") = True
    rs_option.Open "SELECT * FROM ligne_option_type WHERE id_materielle = " & m_id_mat, con, adOpenKeyset, adLockPessimistic, adCmdText
    'MsgBox rs_option.RecordCount
 
    'remplir combobox des options
    rs_option.AddNew
    rs_option!id_materielle = m_id_mat
    rs_option!id_option_d1_type = dc_option.BoundText
    rs_option!valeur = "1"
 
    rs_option.AddNew
    rs_option!id_materielle = m_id_mat
    rs_option!id_option_d1_type = dc_option.BoundText
    rs_option!valeur = "2"
 
    con2.RollbackTrans

Le deuxième ne sera pas enregistrée.

Si je mets un rs_option.update devant le con2.RollBackTrans
Le rollback ne fait aucun effet.

[ProgElecT]

Pour ADO voir CancelUpdate que je n'ai jamais eu l'occasion d'utiliser.

[jeff69]

non malheureusement ce n'est pas ca :

VI-D-3. CancelUpdate
Annule les modifications apportées sur l'enregistrement en cours, ou annule l'enregistrement crée par AddNew.

Donc si je crée plusieurs enregistrement à la suite avec Addnew seul le dernier sera annulé.