: Hello all,
: I've got a programm running that retrieves information from a file.
: After all the information is gathered the file (among other things) is placed in another directory.
: I'm now encountering small problems while moving the file(s). The file can't be moved because of the fact the file is locked by another process (which creates this file).
: Is there a way in VB to determ if a file has a lock or not?
: I've looked at the Getattr function, but that doesn't return what I need.
: If anybody can point me in the right direction....
: Thanks in advance.
: If ... Then
Private Function IsLocked() as boolean
On Error Goto FileIsLocked
Open "C:\Path\file.ext" For Output Lock Read Lock Write as #iFile
If the file is locked, Open will cause error, if not, True is returned
..this should work..
Don't take life too seriously anyway you won't escape alive from it!