Radu,
Thanks, i've got it!

Dim Counter as Integer
query = "SELECT GEN_ID(GEN_PRATICHE_IDPRATICA, 1) AS MyVar FROM
RDB$DATABASE;"
Set rs = cn.Execute(query, , adCmdText)
Counter = rs!MyVar
MsgBox Counter

i wonder: it's secure this method? I'm sure to receive THE exact GEN_ID of
the user if after that he executes an INSERT query ?
If there are other users (on other pc) in the meantime could be take that
GEN_ID value ?

Thanks
Adriano


[Non-text portions of this message have been removed]