VB5-nicht mehr vorhandenes USB-LW wird gefunden

reemrev · 23.09.2004, 13:44

Warum das fehlende Laufwerk angezeigt wurde, lässt sich derzeit trotz intensiver Tests nicht rekonstruieren, die USB Erkennung funktioniert derzeit einwandfrei.

Hab's umgeschrieben, das Programm wird nur gestartet, wenn der Stick vorhanden ist, alle 10sec wird überprüft, ob dieser noch dran ist, fehlt er, wird automatisch die Datei auf Festplatte gesichert und die Oberfläche gesperrt. Erst wenn der Stick wieder angesteckt ist, wird diese Sperre über einen mitlaufenden Timer aufgehoben.
Eine Frage hätte ich noch: wie kann man einen PC verlässlich (Maus&Tastatur) für ONUs sperren? Versuche gerade die diese Function: BlockInput Lib "user32" (ByVal fBlock As Boolean) As Boolean. Leider kann man diese Sperre mit Strg-Alt-Entf umgehen.

23.09.2004, 13:44	#11
reemrev Inventar Registriert seit: 31.01.2000 Beiträge: 1.706 Mein Computer	Warum das fehlende Laufwerk angezeigt wurde, lässt sich derzeit trotz intensiver Tests nicht rekonstruieren, die USB Erkennung funktioniert derzeit einwandfrei. Hab's umgeschrieben, das Programm wird nur gestartet, wenn der Stick vorhanden ist, alle 10sec wird überprüft, ob dieser noch dran ist, fehlt er, wird automatisch die Datei auf Festplatte gesichert und die Oberfläche gesperrt. Erst wenn der Stick wieder angesteckt ist, wird diese Sperre über einen mitlaufenden Timer aufgehoben. Eine Frage hätte ich noch: wie kann man einen PC verlässlich (Maus&Tastatur) für ONUs sperren? Versuche gerade die diese Function: BlockInput Lib "user32" (ByVal fBlock As Boolean) As Boolean. Leider kann man diese Sperre mit Strg-Alt-Entf umgehen.

Aktive Benutzer in diesem Thema: 1 (Registrierte Benutzer: 0, Gäste: 1)