>>Hi All:
>>
>>How can I test if a table is opened exclusive or shared?
>
>TRY
> USE YourTable SHARED
> MESSAGEBOX([The table is opened shared])
>CATCH
> MESSAGEBOX([The table is opened exclusive])
>ENDTRY
>
>
>>
>>How can I change it from exclusive to shared? If I execute a USE mytable SHARED command, I will cancel a previous SET ORDER TO command, which I do not want to do.
>
>SELECT ExclTable
>lcOrder = TAG()
>lnRecno = RECNO()
>USE ExclTable SHARED
>SET ORDER TO (m.lcOrder)
>GOTO m.lnRecno
>
>>Thanks,
>>
>>Yossi
Thanks, I'll use the code!