允许和禁止运行指定软件

易语言 2020-04-13 18:56:44

允许和禁止运行指定软件

.如果 (选择 (是否为空 (开关), 真, 开关 = 真))
写注册项 (3, “SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\Explorer\RestrictRun”, 1)
.否则
写注册项 (3, “SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\Explorer\RestrictRun”, 0)
.如果结束
.如果 (选择 (是否为空 (添加or删除), 真, 添加or删除 = 真))
.计次循环首 (取数组成员数 (文件名), n)
写注册项 (3, “SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\Explorer\RestrictRun\” + 文件名 [n], 文件名 [n])
.计次循环尾 ()
.否则
.计次循环首 (取数组成员数 (文件名), n)
删除注册项 (3, “SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\Explorer\RestrictRun\” + 文件名 [n])
.计次循环尾 ()