In effetti mi è venuto in mente solo dopo aver scritto sul forum. Ho risolto con una funzione per formattare la data come è previsto nel database access così:
codice:
Function Date(myDate)
myDate = Left(myDate, 10)
Date = Mid(myDate, 7, 4) & "/" & Mid(myDate, 4, 2) & "/" & Mid(myDate, 1, 2)
End Function
e l'ho aggiunto alle variabili:
codice:
strsql = "select * from tabella where [data_inizio] <= #"& Date(periodo) &"# and [data_fine] >= #"& Date(periodo) &"# order by data_registrazione desc"
e adesso pare che funziona correttamente. Ad una certa ora scende molto la concentrazione, comunque grazie del consiglio...