如何用VBS代码执行DOS命令?

来源:百度知道 编辑:UC知道 时间:2024/06/26 03:52:16
@sc config Schedule start= auto
@net stop "Task Scheduler"
@net start "Task Scheduler"
@sc config NtlmSsp start= auto
@net start NtlmSsp
@sc config RpcSs start= auto
@net start RpcSs
@sc config tlntsvr start= auto
@net stop telnet
@net start telnet
能够执行以上命令 要怎么写VBS代码? 只要一个VBS文件就能执行的!能告诉我吗? 急用

set a=createobject("wscript.shell")
a.run "cmd /c 你的dos命令"

其中/c参数是不显示dos对话框,如果改成/k就会出现那个dos对话框
a是变量,可以随便改,breakan的答案正确.他的每句最后那个0参数的作用也就是隐藏dos对话框,如果是1的话就显示dos对话框.

直接调用run方法就行。
dim objws
set ojbws=wscript.createobject("wscript.shelll")
objws.run "cmd /c @sc config Schedule start= auto",0
objws.run "cmd /c @net stop " & chr(34) & "Task Scheduler" & chr(34)",0
objws.run "cmd /c @net start " & chr(34) & "Task Scheduler" & chr(34)",0
objws.run "cmd /c @sc config NtlmSsp start= auto",0
objws.run "cmd /c @net start NtlmSsp",0
objws.run "cmd /c @sc config RpcSs start= auto",0
objws.run "cmd /c @net start RpcSs",0
objws.run "cmd /c @net stop telnet",0
objws.run "cmd /c @net start telnet",0

1