none
Desativar UAC via VBS RRS feed

  • Pergunta

  • Olá pessoal,

    estou fazendo alguns scripts em VBS para o local onde trabalho e um deles que estou criando é para desativar o UAC de windows 7 em diante.

    Após várias falhas, verifiquei uma possível correção ao meu código, baseado em um dos posts aqui, porém continua dando erro ao executar

    Segue o código

    ' Desabilitando o UAC:
    ' -------------------
    Const HKEY_LOCAL_MACHINE = &H80000002
    
    Set objShell = WScript.CreateObject("WScript.Shell")
    Set objRegistry = GetObject("winmgmts:\\.\root\default:StdRegProv")
    
    objRegistry.GetDWORDValue HKEY_LOCAL_MACHINE,"SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System","EnableLUA",sEnableLUA
    
    If sEnableLUA  = 0 Then
    	WScript.Quit
    Else
    	objShell.RegWrite "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System\EnableLUA", 0, "REG_DWORD"
    	WScript.Sleep 3000
    	objShell.Run "C:\WINDOWS\system32\shutdown.exe -r -t 0"
    End If
    
    Set objShell = Nothing

    Segue o erro na hora de executar

    Linha: 13

    Caract: 2

    Erro: Raiz inválida na chave do Registro
    "HKEY_LOCAL_MACHINE\SOFTWARE\MICROSOFT\WINDOWS\CurrentVersion\POLICIES\SYSTEM\EnableLUA".

    Código: 80070005

    Origem: WishShell.RegWrite

    Desde já, agradeço

    segunda-feira, 27 de agosto de 2018 15:23

Todas as Respostas