Ciao.....

a parte il fatto che a me il RS.Recordcount non è mai piaciuto tanto....

comunque per inserire un record nella tabella
non occorre aprire un recordset...

puoi sfruttare il comando CONNECTION.EXECUTE

del tipo

dim Conn as ADODB.Connection
dim intRec as Integer
...
...

Conn.execute "Insert Into Tabella(nome,ruolo) Values( ' " & nome & " ',' & ruolo & " ' ) " , intRec

dove intRec conterra' il numero dei record inseriti..........

Ciaoooo