>How about the following?
>
>

ON ERROR lError = .T.
>lError = .F.
>
>USE table1 EXCLUSIVE IN 0
>
>IF NOT lError
>   USE table2 EXCLUSIVE IN 0
>
>   IF NOT lError
>      USE table3 EXCLUSIVE IN 0
>   ENDif
>ENDif
>
>IF lError
>   ? "Could not get exclusive use of all tables."
>ENDif

I would discourage this. In pre-VFP8 apps, this was often required. But this is a very risky technique. What if someone comes along later and adds an Error() method to this?

Markus