Vraag : Hoe schrap ik alle verslagen van een ADODB recordset?

Hello,

Given bepaalde voorwaarden, zou ik alle verslagen in een ADODB willen schrappen recordset.  Gelieve te verwijzen naar de hieronder code.  Hoofdzakelijk, vergelijk ik twee meer rstDossier recordsets, en rstTemp.  Als rstTemp leeg is, echter, zou ik enkel alle verslagen in meer rstDossier willen schrappen en dan sub weggaan.  

What is de correcte code voor het schrappen van alle verslagen van meer rstDossier?

Thank u en achting,
Saleve
" codeBody " 
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:

Dim meer rstDossier als ADODB.Recordset
Schemerige rstTemp als ADODB.Recordset
Schemerige sql als Koord
Vastgestelde meer rstDossier = Nieuwe ADODB.Recordset
Reeks rstTemp = Nieuwe ADODB.Recordset

'Bepaal en open recordset van meer tbl_Dossier
sql = „UITGEZOCHTE tbl_Dossier.* VAN meer tbl_Dossier; “

rstDossier.Open sql, CurrentProject.Connection, _
         adOpenStatic, adLockOptimistic
         
'Bepaal en open recordset van tbl_TempDossierRecordSource
sql = „UITGEZOCHTE tbl_tempDossierRecordSource.* VAN tbl_tempDossierRecordSource; “
     
rstTemp.Open sql, CurrentProject.Connection, _
         adOpenStatic, adLockOptimistic
         
'Vergelijk zowel recordsets als meer tbl_Dossier update om na te denken tempDossierRecordSource
    
'Schrap: verwijder verslagen uit meer tbl_Dossier die niet in de temperaturenlijst zijn
'als er geen verslagen verlaten in de temperaturenlijst zijn
'schrap dan alle verslagen in meer tbl_Dossier en uitgangssub
      Als rstTemp.RecordCount = 0 toen

Antwoord : Hoe schrap ik alle verslagen van een ADODB recordset?

Is het geen rstdossier.delete?
Andere oplossingen  
 
programming4us programming4us