Prova a inserire la linea
CnDb.CursorLocation = adUseServer
prima della Open della Connection (ovvero prima della CnDb.Open ...)
Prova a inserire la linea
CnDb.CursorLocation = adUseServer
prima della Open della Connection (ovvero prima della CnDb.Open ...)