Question

让别人输入我是猪然后自动关机的程序

有的请发送763513548的邮箱 ， 谢谢

Answer 1

你的这个是vbs脚本，以前别人发我的，源代码是这样的：
on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t 10 -c ""说我是畜生，不说就20秒关你机，不信，试试···"" ",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) + "哈哈哈哈，真过瘾"
-----------------华---丽---的---分---割---线-----------------------------
已发邮箱，请查收

Answer 2

代码：
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) + "哈哈哈哈，真过瘾"

过程：创建一个记事本，把代码复制到记事本上，关掉，记得保存，看记事本那个图标，后面有个.txt，把它改成.vbs，就可以了。
-r -t 60 -c 是时间代码 你可以把60改成1，这样1秒你没输入就关机了，如果发给你朋友，他就肯定郁闷了。
(a <> "我是猪")是答案代码。

Answer 3

无语

Answer 4

真恶搞

Answer 5

呵呵！没有