Question

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

@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代码?

Answer 1

直接调用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