>Hello Ander!
>
>function isempty
>local lnrecno, lntop,lnBottom
>lnRecno=recno()
>Go top
>lnTop=recno()
>go bottom
>lnBottom=recno()
>on error go top
>go lnRecno
>on error
>return lntop=lnbottom
>
>HTH.
>
>Have a happy day
>Vladimir Shevchenko

Vladimir,

This code will fail with a table with one record in it by indicating that the table is empty when it is not.