注册表字键查找问题

telking

For $net1 = 1 To 100
$var = RegEnumKey("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services", $net1)
MsgBox(4096, "HKLM\Software 下的第" & $net1 & "个子键是：", $var)
Next

这个查找系统服务，有个奇怪问题，只要{C822AC86-F6A4-462C-9862-9525343B21E9}带有{}的子键都不能查找出来，其它都可以查找出来，是什么原因

[ 本帖最后由 telking 于 2008-6-9 09:51 编辑 ]

bing614

[au3]For $net1 = 1 To 100000000000
        $var = RegEnumKey("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services", $net1)
        If @error <> 0 Then ExitLoop
        If $var="{6302B780-51C5-431A-9FEF-8D174E4E1B63}" Then MsgBox(0,"",$var)
Next[/au3]
最好使用 While WEnd

telking

这样是没办法找到的，因为只要带有{}的子键都不能查找出来，你在自己的电脑测试下就知道，6302B780-51C5-431A-9FEF-8D174E4E1B63是每台电脑都不同的，我的目的是将带有{}的子键都找出来

netegg

原帖由 telking 于 2008-6-8 09:54 发表
这样是没办法找到的，因为只要带有{}的子键都不能查找出来，你在自己的电脑测试下就知道，6302B780-51C5-431A-9FEF-8D174E4E1B63是每台电脑都不同的，我的目的是将带有{}的子键都找出来

反推试过吗，用一个都有的键名，反推回项名

telking

这样不行，应该是和{}有关

netegg

枚举查找服务不用这样，而且SERVICE里面包括驱动

[ 本帖最后由 netegg 于 2008-6-8 18:23 编辑 ]

telking

原帖由 netegg 于 2008-6-8 18:22 发表
枚举查找服务不用这样，而且SERVICE里面包括驱动

不是为了查找服务，是查找网卡设置，带有{}的子键都是网卡来的，主要就是查找出有几个本地连接和他们的设置

bing614

晕，有没有试过呀~！没试过干啥玩意说不行，气死了。

bing614

服了某些人了.
[au3]#include<array.au3>
Dim $R[2][2]
For $net1 = 1 To 100000000000
    $var = RegEnumKey("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services", $net1)
    If @error <> 0 Then ExitLoop
    $R[$net1][0]="第"&$net1&"键"
        $R[$net1][1]=$var       
        ReDim $R[UBound($R)+1][2]
Next
_ArrayDisplay($R,"")[/au3]

telking

呵呵，不好意思，我知道原因，我检查的时候发现这几个是排在第几位，用你这个程序排查出来竟然排在最后