none
Problemas na leitura de chave de registro remoto. RRS feed

 > 

  • Pergunta

  • Question
    Entrar para Votar
    0
    Entrar para Votar

    Ba galera bom dia

    estou tendo um problema tche com um processo de leitura de uma chave de registro remotamente, o resultado voleta em branco tche, o que esta errado neste codigo abaixo.

    a chave no registro tche " teste " tem como valor a palavra " valor ", e ela é do tipo Reg_SZ.

    obrigado galera

    codigo.

    strComputer = "."

Const HKEY_LOCAL_MACHINE = &H80000002
strKeyPath = "SYSTEM\CurrentControlSet\Control\Lsa\teste"

'reads the registry values
strValue1 = Null

Set objReg = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\default:StdRegProv")

objReg.GetStringValue HKEY_LOCAL_MACHINE,strKeyPath,strValue1

    WScript.Echo "O valor no registro é: " & strValue1

    sexta-feira, 10 de maio de 2013 13:17
    |

Respostas

  • Question
    Entrar para Votar
    0
    Entrar para Votar

    Ba galera, erro corrigido tche, segue para conhecimento da galera quando necessitar fazer uma consulta deste tipo tche.

    strComputer = "."

Const HKEY_LOCAL_MACHINE = &H80000002
strKeyPath = "SYSTEM\CurrentControlSet\Control\Lsa\"
strkeyname = "teste"

'reads the registry values
strValue1 = Null

Set objReg = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\default:StdRegProv")

objReg.GetStringValue HKEY_LOCAL_MACHINE,strKeyPath,strkeyname,strValue1

    WScript.Echo "O valor no registro é: " & strValue1

    Referencia.

    http://msdn.microsoft.com/en-us/library/windows/desktop/aa390788(v=vs.85).aspx

    • Marcado como Resposta Marcelo TI segunda-feira, 13 de maio de 2013 14:24
    segunda-feira, 13 de maio de 2013 14:24
    |