Come già detto, la comparazione sulla query secca tra una seek di DAO e una select...where di ADO è improponibile, ancor di più se si vuole usare la stessa logica nel codice. Nel caso specifico con ADO userei una SELECT...WHERE IN(), bypassando completamente il ciclo For i =56To100