>Hi all
>I have a form with a table in the dataenvironement
>The table is open exclusive
>How can i check if the table is open by another user
>and open the table in read only to let the user look but not edit the table.
>
>
>Thanks
>
>Benoit
You can attempt to open the table exclusively (use mytable exclusive) and trap for the error 'File in use by another' if someone else the table open. If youi get the error, you can then use the NOUPDATE keyword in the use command.
local llerror, lcerror
lcerror = on('error')
llerror = .F.
on error llerror = .T.
use mytable exclusive
on error &lcerror
if llerror then
use mytable shared noupdate
endif
HTH.
Larry Miller
MCSD
LWMiller3@verizon.netAccumulate learning by study, understand what you learn by questioning. -- Mingjiao