* Save error handler lcOnError = ON("ERROR") * Set on error to find out if you get the file open ON ERROR llError = .t. llError = .f. * Attempt to use the file exclusively USE TheTable EXCLUSIVE * Restore the error handler ON ERROR &lcOnError IF llError * Someone else has it in use ELSE * It is not in use by anyone else but is now yours exlcusively ENDIF