Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Netzwerke (https://www.delphipraxis.net/14-netzwerke/)
-   -   Delphi Zeit einer RDP Session (https://www.delphipraxis.net/144691-zeit-einer-rdp-session.html)

haggi2383 14. Dez 2009 17:43


Zeit einer RDP Session
 
Servus...

Ich bin grad neu in diesem Forum und hab auch gleich mal eine Frage!

Ich will ein Programm schreiben, womit ich alle meine RDP verwalten kann. Damit meine ich, das ich auswählen kann welche RDP ich jetzt grad nutzen will, und wie lange diese Remotesession offen ist. Hab bis jetzt alles ohne Probleme geschafft. Aber nun stell ich mir die Frage, wie schaffe ich es, das ich die Dauer der Remotesession dokumieren kann.

Ich hatte da ne Idee, denn mstsc Prozess vom Taskmanager zu benutzen, wenn der nicht mehr im Taskmanager drin steht, ist ja die Verbindung geschlossen. Aber ich habe keine Ahnung wie das gehen soll.


Bin für jede Vorschlag offen, selbst für neue Herrangehnsweise.

Mfg
Haggi

haentschman 14. Dez 2009 20:26

Re: Zeit einer RDP Session
 
Hallo und wilkommen in der DP :dp:

...was denkst du denn über das selbst mitloggen. Beim Start der Session NOW speichern, beim Beenden ebenfalls und die Differenz berechnen. Oder soll auch laufend die Zeit angezeigt werden? Dann wäre das Stichwort Timer noch was für dich.

:hi:

haggi2383 15. Dez 2009 08:35

Re: Zeit einer RDP Session
 
Danke haentschman

diese Idee habe ich auch. Ich benutz den NOW Befehl wenn ich die Verbindung aufbaue:

Delphi-Quellcode:
startz:=DateTimeToStr(now);
shellexecute(Application.Handle, 'open', 'mstsc.exe', PChar('/edit I:\Fernwartungsordner\RDP\'+(kundenname)+'.rdp'), nil, SW_SHOWNORMAL);
Aber wie kann ich erkennen das die Verbindung geschlossen wird? Denn da kann ich ja wieder:
Delphi-Quellcode:
endez:=DateTimeToStr(now);
benutzen.

MfG
Haggi

haggi2383 15. Dez 2009 09:31

Re: Zeit einer RDP Session
 
O.K. ich hab grad die Lösung gefunden. Einfach:
Delphi-Quellcode:
  startz:=DateTimeToStr(now);
  shellexecute(Application.Handle, 'open', 'mstsc.exe', PChar('/edit I:\Fernwartungsordner\RDP\'+  (kundenname)+'.rdp'), nil, SW_SHOWNORMAL);
  ende := DateTimeToStr(Now);
Manchmal sehe ich den Wald vor Bäume nicht.

Danke


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

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