Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)
-   -   Delphi Windows von remote aus sperren (AD?) (https://www.delphipraxis.net/134662-windows-von-remote-aus-sperren-ad.html)

mquadrat 26. Mai 2009 16:44


Windows von remote aus sperren (AD?)
 
Hallo zusammen,

Ich suche derzeit nach einem Weg einen Rechner per Remote-Aufruf zu sperren (Std. Windows-Funktion. Also Herunterfahren >> Sperren). Im Optimalfall würde ich das gerne nach am aktuell angemeldeten AD Benutzer festmachen. Also z.B. "Sperre alle Rechner an denen Benutzer XY gerade angemeldet ist".

Jemand eine Idee?

Luckie 27. Mai 2009 08:50

Re: Windows von remote aus sperren (AD?)
 
Also erstmal musts du ja alle TRechner im netzwerk auflisten und wer an den Rechnern angenmeldet ist. Siehe dazu mein Programm LoggedOn: http://www.michael-puff.de/Developer/Delphi/Programme -> LoggedOn.zip

Allerdings wie man remote einen benutzer abmelden kann, weiß ich nicht, nur wie man einen Rechner remote runterfahren kann.

Berlinermauer 27. Mai 2009 08:56

Re: Windows von remote aus sperren (AD?)
 
Die unsaubere Art : shutdown /l , aber es gibt doch auch irgendwie Eine Funktion WindowsEx oder so, wo man dann einfach statt Shutdown LOGOFF eingibt.

Wie die Funktion genau hieß, weiß ich nich, wenn dann hatte immer ShellExecute(handle,'open','shutdown','-l'); benutzt.

Keine Gewähr, dass die Funktionen so stimmen!

Luckie 27. Mai 2009 09:18

Re: Windows von remote aus sperren (AD?)
 
MSDN-Library durchsuchenExitWindowsEx funktioniert nicht über das Netzwerk, sondern nur lokal.

mquadrat 27. Mai 2009 09:37

Re: Windows von remote aus sperren (AD?)
 
Um einen lokalen Dienst werde ich wohl nicht herum kommen. Zumal ich die Benutzer wahrscheinlich abmelden muss. Wird ein Rechner entsperrt wird nämlich scheinbar nicht mehr im AD nachgefragt, ob der Nutzer überhaupt noch aktiv und gültig ist. Man kann also einen gesperrten Rechner trotz deaktiviertem AD Nutzer wieder entsperren.

@Luckie:
Sehr schickes Programm. Vielen Dank. Scannen unserer Domäne liefert zwar einen Fehler ("Code: -1, Message: Der Dienst ist nicht gestartet worden") aber scannen einzelner Rechner funktioniert.


Alle Zeitangaben in WEZ +1. Es ist jetzt 02:01 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz