Ciao
sto provando con un "facile" esempio in VB6 e volevo poter selezionare SOLO i record a partire da una certa data.
Stavo guardando questo esempio MDB in un database dove ho anche un campo DATA col formato (GG/MM/YYYY HH:MM:SS) che il tutto lo apro e vedo in questo modo:
Dim rs_explog As New ADODB.Recordset
rs_explog.Open "ArchivioMDB", CnnList, adOpenDynamic, adLockOptimistic, adCmdTableDirect
e quindi in questo esempio cerco nell'archivio tutti i record/campi
While Not rs_explog.EOF
For i = 1 To 62 ' sono 62 campi per ogni record
If rs_explog.Fields(i - 1).Value = Null Then
CampoExp(i) = " "
End If
rs_explog.Fields(i - 1).Value = "" & rs_explog.Fields(i - 1).Value
CampoExp(i) = rs_explog.Fields(i - 1).Value
Next i
' qui faccio quello che deve fare per ogni campo/record
' quindi passo al prossimo record all'interno del WHILE
rs_explog.MoveNext
Wend
Alla fine del database ha fatto il suo "lavoro" e questo finchzè non necessito di aprire solo una parte del mdb e non tutto.
Se quindi volessi qui selezionare o partire nel mdb da una determinata DATA di registrazione
(==> ho un campo come descritto >DD/MM/YYY HH:MM:SS<)
al momento ho inserito un semplice
IF SelezioneDATA1 < SelezioneDATA2 Then
e funziona ma purtroppo evidentemente aprendo il file così, mi fa passare sempre tutti i record prima di trovare quelli che sono
> SelezioneData2
E questo è molto lento evidentemente...
Per evitare di passare TUTTI i record, sarebbe possibile aprire il db (mdb) solo dalla data
> SelezioneData2
< SelezioneData2
= SelezioneData2
magari modificando quando lo apro con
Dim rs_explog As New ADODB.Recordset
rs_explog.Open "ArchivioMDB", CnnList, adOpenDynamic, adLockOptimistic, adCmdTableDirect
Grazie mille