Dabei seit: 19.10.2002
Beiträge: 819
Herkunft: München
Ich weiß ja nicht genau für was du das brauchst. Solltest Du eine Konsolenanwendung machen, dann verwende ReadConsole.
Sollte das ganze eine Art Keylogger werden, dann geht das nicht so einfach, denn getc oder ähnliche Funktionen können nur Tastatureingabe abfangen, die auch an den jeweiligen Prozess gesendet werden. Wie genau das bei einem Keylogger funktioniert weiß ich jetzt auch nicht 100%ig. Ich vermute mal, das ein eigener Treiber geladen werden muß.
Dabei seit: 19.10.2002
Beiträge: 3.028
Herkunft: Irgendwo im Nirgendwo
Keyloggen geht am besten mit einem Systemweiten Keyboardhook.
Da gibts WinApi Funktionen für, guck mal bei www.codeguru.com,
die haben ein beispiel projekt mit einer C++-DLL, die dürfte auch unter
VB ansprechbar sein...
Devil
__________________ Intelligenz ist eine Illusion des Menschen
Dabei seit: 10.09.2001
Beiträge: 356
Herkunft: ...von da, wo mein Haus wohnt...
Hi,
da gibts doch ne api-funktion. Erstell einen Timer und setz das Interval auf 1 ms.
code:
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal _
vKey As Long) As Integer
sub Timer1_timer()
For i = 1 To 255
If (GetAsyncKeyState(i) And 1) = 1 Then key_pressed(i)
Next i
end sub
sub key_pressed(key as integer)
print chr(key)
end sub
Die Funktion key_pressed schreibt die gedrückte Taste jetzt einfach auf das Form. Kannst ja dort reinschreiben wass de willst. Der Parameter key ist dann der Ascii-code der gedrückten Taste. Du kannst ja die Schleife von 1 bis 255 etwas umändern, dass z.b. die ersten 4 nicht geprüft werden. Das sind nämlich die Maustasten, wenn ich mich net täusche.
[edit]
Das mit dem Ascii-Code stimmt nicht ganz. Ich weiß nicht, was es für Codes sind. Probier halt ma aus. Ich weiß auch net, obs nur bis 255 geht, oder weiter.
__________________ Grüßle, Medi
Dieser Beitrag wurde 3 mal editiert, zum letzten Mal von Medusa: 08.08.2003 00:56.
