Energie

Zielsetzung

Die "Energieoptionen" sollen als Administrator geöffnet werden.

Realisierung

Das folgende Skript startet eine Anwendung als Administrator. Das Kennwort wird im Skript hinterlegt.

set ws=CreateObject("WScript.Shell")
ws.run "runas /noprofile /user:rechnername\admin ""C:\Programme\...\app.exe""",2
',2=Fenster minimiert starten
x=0
do:x=x+1
loop until ws.AppActivate("C:\WINDOWS\system32\runas.exe") or x>5555
if x>5555 then msgbox "Fehler: Programm braucht zu lange":WScript.Quit
ws.sendkeys("kennwort{ENTER}")

Statt dem Programm kann auch eine DLL aufgerufen werden, in diesem Fall powercfg.cpl:

%windir%\system32\rundll32.exe shell32.dll,Control_RunDLL powercfg.cpl

Hinweis

Soll das Administratorkennwort jedesmal manuell eingegeben werden, genügt folgendes .CMD-Skript:

runas /user:admin /noprofile "rundll32.exe shell32.dll,Control_RunDLL powercfg.cpl"