title image


Smiley TIPP: Rechner neu Booten


Private Const EWX_FORCE = 4

Private Const EWX_LOGOFF = 0

Private Const EWX_REBOOT = 2

Private Const EWX_SHUTDOWN = 1



Private Declare Function ExitWindowsEx Lib "user32" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long



Public Function Reboot()

ExitWindowsEx EWX_REBOOT + EWX_FORCE, &HFFFF

End Function



Public Function Shutdown()

ExitWindowsEx EWX_SHUTDOWN + EWX_FORCE, &HFFFF

End Function





... geht aber nur, wenn der Benutzer auch die nötigen Rechte hat.


Gruß aus dem Norden
Reinhard


Bitte immer die Access-Version angeben!
DB-Wiki


Wie man Fragen richtig stellt

YaccessAccess-FAQUnd ansonsten: Wikipedia




geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: