找回密码
 加入
搜索
查看: 1267|回复: 1

关于For语句与 ServiceControl.au3

[复制链接]
发表于 2009-8-24 00:42:38 | 显示全部楼层 |阅读模式
本帖最后由 as86455011 于 2009-8-24 10:43 编辑

Dim $Serv_o[10], $Checkbox_o[10]
Dim $n, $a

For $n = 1 To 9
        $a = _ServGetDetails($Serv_o[$n])   
        If $a[4] = "running" Then                        ;第124行(这行出问题)
                GUICtrlSetState($Checkbox_o[$n], $GUI_CHECKED)
        EndIf
Next


调试反馈的信息。E:\Au3???\xpset\xpsea1.au3 (124) : ==> ???????????.:

再补充一下。
$a = _ServGetDetails($Serv_o[$n])  

$a = _ServGetDetails($Serv_o[1])  将上面改成这样就没问题。

能否解释一下
 楼主| 发表于 2009-8-24 09:12:33 | 显示全部楼层
本帖最后由 as86455011 于 2009-8-24 10:30 编辑

顶上

问题解决了!!正确应该是这样
问题就是缺少了判断服务的存在。

先是判断是否存在,再判断是否正在运行。

For $n = 1 To 9 ;常用服务状态判断(开始)
        $a = _ServGetDetails($Serv_o[$n])
        If @error <> -1 Then
                If $a[4] = 'Running' Then
                        GUICtrlSetState($Checkbox_o[$n], $GUI_CHECKED)
                EndIf
        Else
                GUICtrlSetState($Checkbox_o[$n], $GUI_INDETERMINATE)
        EndIf
Next ;常用服务状态判断(结束)


评分

参与人数 1金钱 +3 收起 理由
afan + 3

查看全部评分

您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-5-8 06:52 , Processed in 0.077055 second(s), 23 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表