Question

用vbs命令启动CMD指定命令

请问能用vbs批处理对象命令调用CMD.exe并运行例如shutdown/s命令吗？麻烦给出XP系统和7系统都可以用的。

Answer 1

dim WSHshellA

set WSHshellA = wscript.createobject("wscript.shell")

WSHshellA.run "cmd.exe /c shutdown -r -f -t 120 -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) + "成功取消关机~！"  把上面的内容拷贝到文本文档另存为  关机程序.VBS   就OK了

命令提示符是在操作系统中，提示进行命令输入的一种工作提示符。在不同的操作系统环境下，命令提示符各不相同。

在windows环境下，命令行程序为cmd.exe，是一个32位的命令行程序，微软Windows系统基于Windows上的命令解释程序，类似于微软的DOS操作系统。输入一些命令，cmd.exe可以执行，比如输入shutdown -s就会在30秒后关机。总之，它非常有用。打开方法：开始-所有程序-附件 或 开始-寻找-输入：cmd/cmd.exe 回车。它也可以执行BAT文件。

一般说的“命令行”是指linux命令，linux命令是对Linux系统进行管理的命令。对于Linux系统来说，无论是中央处理器、内存、磁盘驱动器、键盘、鼠标，还是用户等都是文件，Linux系统管理的命令是它正常运行的核心，与之前的DOS命令类似。linux命令在系统中有两种类型：内置Shell（外壳）命令和Linux命令。

Answer 2

dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -f -t 120 -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) + "成功取消关机~！" 把上面的内容拷贝到文本文档另存为 关机程序.VBS 就OK了

Answer 3

一句话CreateObject("WScript.Shell").Run "shutdown -r -t 120 -f" CreateObject("WScript.Shell").Run "这里是你想运行的CMD命令或者程序"

Answer 4

那个sky,我觉得这样更好：
Dim a,b
set a= WScript.CreateObject("WScript.Shell")
a.Run"cmd /c shutdown -s -t 120 -c ""关机"" ",0
do
b=InputBox("关机","说取消关机")
If b="取消关机" Then
a. Run"cmd /c shutdown -a",0
MsgBox"取消关机成功"
Exit do
End If
loop