Bonjour,

Pour des raisons pratique j'ai créé un Recordset manuellement comme suit.
Cela fonctionne.

Voici un exemple :
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
Sub Céer_Table_déconnectée()
 
    Dim rs As ADODB.Recordset
    Set rs = New ADODB.Recordset
 
    'Création de la table
    'Ajout de deux champs
    With rs
        .Fields.Append "Value", adInteger
        .Fields.Append "Name", adVarChar, 20
        .LockType = adLockOptimistic
        .Open , , adOpenStatic
    End With
 
    ' Ajout d'un enregistrement
    rs.AddNew
    rs![Value] = 97
    rs![Name] = "Martin"
 
    ' Ajout d'un enregistrement
    rs.AddNew
    rs![Value] = 96
    rs![Name] = "Paul"
 
    etc...
 
    rs.Update
 
 
End Sub

Comment faire pour créer un 2ème Recordset rs2, qui sera en fait une requête sur la table rs ? (sans utiliser les filtres)
Pour exemple, rs2 devra être un recordset qui reprend uniquement les champs où [Value]=48.


Merci

A+

Dams'