[Solved] Lock a folder? Topic is solved

[gwarble]

Hey all,

Is it possible to lock a folder in the way you can lock a file to prevent deletion/moving by another user?
file := FileOpen(FileName, "r-d")

is this possible with the LockFile function or any other way? Edit: CreateFile?
help appreciated
thanks

Solved by Flipeador below

[BoBo]

Probably a workaround: http://www.makeuseof.com/tag/how-to-loc ... -computer/
Run/FileSetAttrib/RegWrite/...

[Flipeador]

Code: Select all

DirName := A_Desktop . "\1"
R := DllCall("Kernel32.dll\CreateFileW", "Ptr", &DirName, "UInt", 2, "UInt", 0, "Ptr", 0, "UInt", 3, "UInt", 0x2000000, "Ptr", 0, "Ptr")
MsgBox % R

[BoBo]

Code: Select all

DirName := A_Desktop . "\1"
R := DllCall("Kernel32.dll\CreateFileW", "Ptr", &DirName, "UInt", 2, "UInt", 0, "Ptr", 0, "UInt", 3, "UInt", 0x2000000, "Ptr", 0, "Ptr")
MsgBox % R

Hi Flipeador, would you mind to provide an "unlock"-option as well?! Thx for Ur effort

[Flipeador]

Hi Flipeador, would you mind to provide an "unlock"-option as well?! Thx for Ur effort

Code: Select all

; https://msdn.microsoft.com/en-us/library/windows/desktop/ms724211(v=vs.85).aspx
DllCall("Kernel32.dll\CloseHandle", "Ptr", R)

[gwarble]

Flipeador, still to test, but thanks!

Edit: Works great, thanks again! My intended use is to lock certain folders with a script running on a server, to prevent those root folders from being accidentally drag'n'drop'ed around by users who have open permissions for creating/deleting

[gwarble]

so to expand on this, I would actually like to be able to lock from deletion/moving but still be accessible/stuff created/modified/deleted within... in short, the third parameter, dwShareMode = 3

https://msdn.microsoft.com/en-us/librar ... s.85).aspx

Code: Select all

DirName := A_ScriptDir "\Test"
FileCreateDir, % DirName
R  := DllCall("Kernel32.dll\CreateFileW", "Ptr", &DirName, "UInt", 2, "UInt", 3, "Ptr", 0, "UInt", 3, "UInt", 0x2000000, "Ptr", 0, "Ptr")
MsgBox, Locked!
DllCall("Kernel32.dll\CloseHandle", "Ptr", R)
MsgBox, Unlocked!