一段设置服务启动状态的VBS脚本求解 - 中国DOS联盟论坛

strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colServiceList = objWMIService.ExecQuery _
("Select * from Win32_Service where StartMode = 'Manual'")
For Each objService in colServiceList
errReturnCode = objService.Change( , , , , "Disabled")   
Next

请教各位高手这段代码的具体意思是什么？最好可以详细解释下......谢谢！~
上次帖子发错地方了。请斑竹见谅啊。呵呵！~新手上路么......

─────────────────　版务记录　─────────────────
执行：HAT
操作：在帖子标题中增加搜索关键字；代码加code标签
说明：原标题"一段VBS脚本......【求解】"不利于论坛搜索
处罚：论坛新人免于积分处罚
提示：建议阅读以下帖子
{1415}提问的智慧
{7326}论坛新手必读，所有人的基本行为准则
{22703}请不要做浮躁的人
{32667}那些连标题都写不清楚的人们啊，你们醒醒吧
{32825}本版严厉整顿烂帖
─────────────────　版务记录　─────────────────

[ Last edited by HAT on 2008-12-2 at 20:52 ]

第1楼　86772710	发表于 2008-12-02 18:48
新手上路　发帖 7　积分 8
[求助]一段设置服务启动状态的VBS脚本求解 strComputer = "." Set objWMIService = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") Set colServiceList = objWMIService.ExecQuery _ ("Select * from Win32_Service where StartMode = 'Manual'") For Each objService in colServiceList errReturnCode = objService.Change( , , , , "Disabled") Next 请教各位高手这段代码的具体意思是什么？最好可以详细解释下......谢谢！~ 上次帖子发错地方了。请斑竹见谅啊。呵呵！~新手上路么...... ─────────────────　版务记录　───────────────── 执行：HAT 操作：在帖子标题中增加搜索关键字；代码加code标签说明：原标题"一段VBS脚本......【求解】"不利于论坛搜索处罚：论坛新人免于积分处罚提示：建议阅读以下帖子 {1415}提问的智慧 {7326}论坛新手必读，所有人的基本行为准则 {22703}请不要做浮躁的人 {32667}那些连标题都写不清楚的人们啊，你们醒醒吧 {32825}本版严厉整顿烂帖 ─────────────────　版务记录　───────────────── [ Last edited by HAT on 2008-12-2 at 20:52 ]

第2楼　pusofalse	发表于 2008-12-02 18:56
银牌会员　发帖 646　积分 1,604
看来处罚得还不够~建议在版主未看到之前将标题改得清楚些，免得再被扣分。。^_^

第3楼　86772710	发表于 2008-12-02 19:14
新手上路　发帖 7　积分 8
...... ......不是吧？

第4楼　HAT	发表于 2008-12-02 20:54
版主　发帖 5,017　积分 9,023
《System Administration Scripting Guide》里面的例子，书中讲的很清楚： Disables all services configured as manual start. Among other things, this prevents Power Users from being able to start these services. 英语水平不过关的话，可以在线翻译一下。