注册表修改一特定值

hn3211098

圈住的下面是随机变
我想修改FriendlyName这个值请问应该怎么写
谢谢了各位大神

afan

枚举就是了

Local $ii = 1, $sSubkey
Do
        $sSubkey = RegEnumKey('HK...\Disk', $ii)
        If @error <> 0 Then ExitLoop
        RegWrite($sSubkey, 'FriendlyName', ..)
        $ii += 1
Until 0

hn3211098

afan 发表于 2021-2-24 13:31
枚举就是了

For $i = 1 To 100
        $sSubkey = RegEnumVal('HKLM64\SYSTEM\CurrentControlSet\Enum\SCSI\Disk&Ven_&Prod_ST1000VM002-1ET1', $i)
        If @error <> 0 Then ExitLoop (1)
        RegWrite($sSubkey, "FriendlyName", "REG_SZ", "456213")
       
Next
我这样写的还是不行啊麻烦大神给看看

afan

hn3211098 发表于 2021-2-24 18:54
For $i = 1 To 100
        $sSubkey = RegEnumVal('HKLM64\SYSTEM\CurrentControlSet\Enum\SCSI\Disk&Ven_&Pro ...

你这注册表路径与图不符… 图上路径末尾是 ...\Disk

hn3211098

afan 发表于 2021-2-24 18:59
你这注册表路径与图不符… 图上路径末尾是 ...\Disk

#include <MsgBoxConstants.au3>

Local $sSubKey = ""

For $i = 1 To 100
        $sSubKey = RegEnumKey('HKLM64\SYSTEM\CurrentControlSet\Enum\SCSI\Disk&Ven_&Prod_ST1000VM002-1ET1', $i)
        If @error Then ExitLoop
        RegWrite($sSubKey, "FriendlyName", "REG_SZ", "456213")
Next
我还用了这种也是不行
大神不要在意图上什么

afan

hn3211098 发表于 2021-2-24 19:01
#include

Local $sSubKey = ""

不是在意不在意，你的路径不对，你这似乎多加了子键

hn3211098

afan 发表于 2021-2-24 19:03
不是在意不在意，你的路径不对，你这似乎多加了子键

这样的！

afan

hn3211098 发表于 2021-2-24 19:08
这样的！

你可以先加调试看看 $sSubKey 是什么

hn3211098

afan 发表于 2021-2-24 19:12
你可以先加调试看看 $sSubKey 是什么

你看大神也能获取到就是没有写成功咋回事这是！

afan

hn3211098 发表于 2021-2-24 19:08
这样的！

子键需要补上上一级路径
$sSubkey = 'HKLM64\SYSTEM\CurrentControlSet\Enum\SCSI\Disk&Ven_&Prod_ST1000VM002-1ET1\' & $sSubkey
RegWrite($sSubKey, "FriendlyName", "REG_SZ", "456213")

hn3211098

For $i = 1 To 100
        Local $sSubKey = RegEnumKey('HKLM64\SYSTEM\CurrentControlSet\Enum\SCSI\Disk&Ven_&Prod_ST1000VM002-1ET1', $i)
        If @error Then ExitLoop
        $sSubKey = 'HKLM64\SYSTEM\CurrentControlSet\Enum\SCSI\Disk&Ven_&Prod_ST1000VM002-1ET1\' & $sSubKey
        RegWrite($sSubKey, "FriendlyName", "REG_SZ", "456213")
Next


这样解决