How can I determine if a file is locked or not?

[nikink]

Howdy folks, I'm trying to script a program that will find each profile on a computer, load its userhive, make some changes to that hive.

I've found some hive loading examples from the forums here that I'm working through to understand and modify, but occasionally the machines I'll need to modify have locked ntuser.dat files even if that user is no longer logged on.

Does anyone know a way to either unlock these files, so I can use'em (best option), or at least detect that they are locked so I can ignore'em (acceptable option for now)?

[PsaltyDS]

Kind of brute-force, but effective -- a function to test-open the file. Returns 1 if the files exists and can be opened for write. Returns 0 and sets @error if not:

$MyFile = "C:\Temp\Test.txt"

If _FileTestOpen($MyFile) Then
    MsgBox(64, "File", "File can be used.")
Else
    MsgBox(16, "File", "Error.  Can not use file: @error = " & @error)
EndIf

Func _FileTestOpen($FileIn)
    If Not FileExists($FileIn) Then Return SetError(1, 0, 0)
    Local $hFile = FileOpen($FileIn, 1)
    If $hFile = -1 Then
        Return SetError(2, 0, 0)
    Else
        FileClose($hFile)
        Return 1
    EndIf
EndFunc   ;==>_FileTestOpen

[nikink]

Kind of brute-force, but effective -- a function to test-open the file. Returns 1 if the files exists and can be opened for write. Returns 0 and sets @error if not:

$MyFile = "C:\Temp\Test.txt"

If _FileTestOpen($MyFile) Then
    MsgBox(64, "File", "File can be used.")
Else
    MsgBox(16, "File", "Error.  Can not use file: @error = " & @error)
EndIf

Func _FileTestOpen($FileIn)
    If Not FileExists($FileIn) Then Return SetError(1, 0, 0)
    Local $hFile = FileOpen($FileIn, 1)
    If $hFile = -1 Then
        Return SetError(2, 0, 0)
    Else
        FileClose($hFile)
        Return 1
    EndIf
EndFunc   ;==>_FileTestOpen

Fantastic thanks! I'll give it a try. B-)