[VB6] Intercetta solo un errore in routine

[Brainjar]

Ciao,
se imposti la connessione con un cursore lato cliente riesci ad
avere il recordcount :

   With cos
     ' Altre impostazioni tue  
     .CursorLocation = adUseClient 'tipo di cursore
   End With  
   
   set res=cos.execute("Select * from tabella where condizione = 'Bla'")
   If rs.Recordcount > 0 Then