>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
>
>
>
>
This does not reliably work. The only reliable way to tell if a file is open exclusively is to try to USE it exclusively and then trap the error.
Craig Berntson
MCSD, Microsoft .Net MVP, Grape City Community Influencer