[VB6] Contare record in modo efficiente

[oregon]

Se il campo e' alfanumerico allora

Set RSD1 = DB1.OpenRecordset("SELECT COUNT(*) FROM ANAGRAFICA1 WHERE COPE LIKE '45*'")