[VB6]: Usare BETWEEN per i campi di tipo data/ora

[x69asterix]

posto tutto il codice nella speranza di trovare una soluzione:
allora
db = db1.mdb
tabella = Piani
campi:
ID =contatore
Cartella =testo
FisicaEntrata =testo
FisicaUscita =testo
FisicaTempo =testo
RtConsegna =testo
DaFisicaARadio =testo
Anno =testo

Public Cn2 As New ADODB.Connection
Public Rs2 As New ADODB.Recordset

Private Sub Command1_Click()
With Rs2
.ActiveConnection = Cn2
.LockType = adLockOptimistic
End With
Rs2.Open "SELECT * FROM Piani  WHERE ????   BETWEEN #" & Format(DTPicker1.Value, "mm/dd/yyyy") & "# & #" And Format(DTPicker2.Value, "mm/dd/yyyy") & "#" '"
Set DataGrid1.DataSource = Rs2
End Sub


Private Sub Form_Load()

Unload Form1
With Cn2
.ConnectionString = "Provider = Microsoft.Jet.OleDB.4.0;" & _
"Data Source =" & App.Path & "\db1.mdb"

.ConnectionTimeout = 5
.CursorLocation = adUseClient
.Mode = adModeShareDenyNone
.Open
End With
End Sub

Private Sub Form_Unload(Cancel As Integer)
Form1.Show
End Sub