If i change,

ocapanegocios=createobject("capadatos.capanegocios") ---> It's OK ???
miRecordset=oCapaNegocios.ListaClientes()
thisform.processa(miRecordSet)
thisform.Refresh

By the way, i forgot, what's the letters to pré-format the message?

João Batista