Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Table exclusive in dataenvironment
Message
General information
Forum:
Visual FoxPro
Category:
Databases,Tables, Views, Indexing and SQL syntax
Miscellaneous
Thread ID:
00546926
Message ID:
00546935
Views:
22
>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
   * couldn't open table exclusively
   use mytable shared noupdate
endif
HTH.
Larry Miller
MCSD
LWMiller3@verizon.net

Accumulate learning by study, understand what you learn by questioning. -- Mingjiao
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform