Grazie ... e per dichiarare un Adodb.Recordset senza fare

codice:
Set DbRs = CreateObject("ADODB.recordset")
Come si puo fare con il dim?