2

运行此代码时:

CreateObject("WScript.Shell").RegWrite "HKLM\Whatever\", "MyValue", "REG_SZ"

.RegWrite只在出现错误的 Windows 8 上遇到问题:

“注册表项中的根无效”。

4

1 回答 1

2

好吧,由于错误描述如此无益,我需要做一些测试以找出这是权限问题。但是,提升脚本可以解决这个问题。为了做出这个真正的答案,我应该发布我所做的,对吧?

Call ElevateUAC

' ---------------------------
' my duty task goes here...
' ---------------------------


Sub ElevateUAC
    If Not WScript.Arguments.Named.Exists("elevated") Then
        'Launch the script again as administrator
        With CreateObject("Shell.Application")
        .ShellExecute "wscript.exe", """" & _
            WScript.ScriptFullName & """ /elevated", "", "runas", 1
            WScript.Quit
        End With
    End If
End Sub
于 2013-02-09T01:11:16.093 回答