lokal Registry Schlüssel erstellen

  • VBScript

    lokal Registry Schlüssel erstellen

    Hallo,

    ich plage mich seit einiger Zeit damit rum, einen Registry Eintrag lokal auf einem Rechner zu erstellen. Da der Benutzer keinen Zugriff auf die Registry hat, kann der Schlüssel nicht einfach so erstellt werden.

    Ich möchte daher dem Skript User und Pass des lokalen Admins mitgeben. Das sollte doch mit WMI eigentlich funktionieren.

    Allerdings habe ich dazu nur Tipps bei Remote Rechner gefunden, aber keine für einen lokalen PC. Mit Connect.Server klappts nicht weil es eben lokal ist.

    Das Script sieht bisher so aus:


    Const HKEY_LOCAL_MACHINE = &H80000002

    strComputer = "."

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

    strKeyPath = "SYSTEM\CurrentControlSet\Control\Lsa\Kerberos\parameters"


    strValueName = "MaxPacketSize"
    dwValue = 00000001
    oReg.SetDWORDValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,dwValue

    wscript.echo "DSL Fix erfolgreich installiert"



    Für Hilfe wäre ich echt dankbar!!

    Gruss,
    Dominik