【叶子出品】锁定文件夹使其他程序不能访问【提供源码】

叶子的离开 · 发表于 2014-11-4 16:06:57

欢迎您注册加入！这里有您将更精采！

您需要登录才可以下载或查看，没有账号？注册

x

[Visual Basic] 纯文本查看 复制代码

#Include Once "windows.bi"

Dim Shared File_Share_Flag As Long
Dim Shared hDir As HANDLE

Extern "Windows-MS"
	Sub LockPath(PathStr As String) Export
		hDir = CreateFile(PathStr,FILE_LIST_DIRECTORY,File_Share_Flag,0,OPEN_EXISTING,FILE_FLAG_BACKUP_SEMANTICS,0)
	End Sub
	
	Sub UnLockPath() Export
		CloseHandle(hDir)
	End Sub
End Extern

iftodo · 发表于 2014-11-7 19:18:01

x64asm上的叶子？？

叶子的离开 · 发表于 2014-11-9 11:46:13

iftodo 发表于 2014-11-7 19:18
x64asm上的叶子？？

纳尼，被人认出来了哈

账号		自动登录	找回密码
密码			注册