刚才我同学发给我一个自动关机的VB程序
==
这样的VB程序怎样阻止
==

复制内容到剪贴板

代码:

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

只要把这个程序发送给对方
他一打开
就会定时关机
很有趣

[ 本帖最后由 jingling886 于 2008-7-16 11:28 编辑 ]

开始，运行，CMD，shutdown -a。

很管用奥
==
你从那知道的?

http://bbs.pep.com.cn/thread-359194-1-1.html

vb语言看起来太亲切了……

MS看一下代码中就可以找到方法。

shutdown -a

shutdown -r -t 60
60分钟重新启动

shutdown -a 取消关机

那个命令 只在xp以上才有用哦
2000不行

都是从那学的?

我是早前的时候为了开着电脑放着音乐听着睡觉，但又不想电脑一夜开着，所以就希望能有个定时关机的东西，然后上网搜，就搜到了。

奥

你这一招倒提醒了我
=
我也是经常用电脑听歌

关闭显示器

呵呵，不过有些时候我听到机子关了都还没睡着的。。。

因为我的电脑不在我睡觉的屋里
==
所以我没这么干过
......

睡觉的屋？

我的床特大
==
放电脑的屋子放不下
一个书橱,一个写字台,一台电脑
就满了

把这个程序升升级，改成开机自动运行，3——5秒没有提示自动关机。
把注册表也锁了。
再想想怎么把安全模式禁止了。

挖哈哈哈。。。。。。。。。。。

得在给他改改
==
如果他说他是猪也给他关机
==
MS不这样有点赔了
==
从哪学的
楼上
传授一下

。。。。
我没一样懂得弄。。。。

关键是你改完了以后他能看得懂啊。