Discussion :

[Asdorve]

Bonjour,

J'ai un recordset rsADO1 qui contient un certain nombre de données.

Je clone ce recordset dans rsADO2

Code :

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

1
2
 
Set rsADO2 = rsADO.Clone

puis je déconnecte les 2 recordsets:

Code :

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

1
2
3
 
Set rsADO1.ActiveConnection = Nothing
Set rsADO2.ActiveConnection = Nothing

Ensuite, je travaille avec rsADO1 et je fais des Delete sur certaines lignes, et je m'aperçois que ça fait le même traitement sur les lignes du rsADO2.

Comment ça se fait?
Comment avoir deux recordset indépendants?

Merci d'avance.

[ThierryAIM]

Utilise la méthode Requery sur rsADO1 avant de le modifier

[Asdorve]

Utilise la méthode Requery sur rsADO1 avant de le modifier

merci pour la réponse. Toutefois ça ne change rien.

J'ai ce code là. Comment fonctionne Requery?

Code :

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

1
2
3
4
5
6
7
8
9
10
 
Set rsADO2 = rsADO.Clone
Set rsADO1.ActiveConnection = Nothing
Set rsADO2.ActiveConnection = Nothing
 
rsADO1.Requery
 
[...]
 
rsADO1.Delete

[ThierryAIM]

avant de déconnecter le rs, pas après !
et d'abord pourquoi les déconnecter ?

[Asdorve]

J'ai testé avant et après et ça ne change pas.

Je déconnecte pour faire un delete dans mon recordset sans supprimer les enregistrements de ma base. ça m'est déjà arrivé une fois, pas deux...

[Asdorve]

j'ai trouvé une solution:

Code :

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

1
2
3
4
5
6
7
8
 
Set rsADO2 = rsADO.Clone
 
Set rsADO.ActiveConnection = Nothing
 
rsADO2.Requery
 
Set rsADO2.ActiveConnection = Nothing

Je ne sais pas ce que ça vaut, mais ça marche.

[ThierryAIM]

c'est normal rsADO et rsADO1 ?

[Edit] ce devait être une faute de frappe

Ben oui ça marche
Requery sur l'un ou l'autre des rs désynchronise les clones