Hello Alejandro

This function works with any file not just a dbf.

	* Function returns true if file or table can be locked for writing
	Func LOCKABLE
	Lparam lcFile
	Local lcRetval,liHandle
	lcRetval=.f.
	liHandle=fopen(lcFile,12)
	If liHandle>0
		lcRetval=.t.
		=fclose(liHandle)
	Endif
	Return lcRetval

>I'm writing a routine to open a file exclusively. If I find the file is already open, how can I tell whether it is opened exclusively other than by closing it and trying to opening it exclusively, trapping for error?
>
>TIA,
>
>Alex