Shut Down

[Marvin133]

gibt es einen shut down befehl der den pc runter fährt?

[RSBasic]

Code: Alles auswählen

Procedure ExitWindows(Flags.l)
   Protected tkp.TOKEN_PRIVILEGES
   Protected tkpNewButIgnored.TOKEN_PRIVILEGES
       
   OpenProcessToken_(GetCurrentProcess_(),#TOKEN_ADJUST_PRIVILEGES | #TOKEN_QUERY,@hdlTokenHandle)

   ; Get the LUID for shutdown privilege.
   LookupPrivilegeValue_(0,"SeShutdownPrivilege",tkp\Privileges\Luid)

   tkp\PrivilegeCount = 1    ; One privilege to set
   tkp\Privileges\Attributes = #SE_PRIVILEGE_ENABLED   
   
   ; Enable the shutdown privilege in the access token of this process.
   AdjustTokenPrivileges_(hdlTokenHandle,0,tkp,0,0,0)
   
   ExitWindowsEx_(Flags,0)
EndProcedure

ExitWindows(#EWX_SHUTDOWN)

Quelle: http://www.purebasic.fr/german/viewtopi ... 42#p122242

[c4s]

@RSBasic
Ein simples "ja" hätte seine Frage auch beantwortet.

[STARGÅTE]

In seiner Signatur steht: PB 4.41 Demo

API geht also sowieso nicht !

[RSBasic]

@c4s
Natürlich

@STARGÅTE
Ups, nicht gesehen.

@Marvin133

Code: Alles auswählen

RunProgram("shutdown.exe","-s -t 0 -f","",0)