vb 6.0

Ok Leute , habe zwar schon sehr viel über Keysend hier gelesen aber die Quelltexte sind mir ein bissl zu Komplex daher fang ich mal ganz von vorne an.

Ich erstelle um keysend zu verstehen z.b. einfach nen Programm. Wenn ich es starte soll er alle Tasten die in der Programmlaufzeit gedrückt werden in eine List1 schreiben.

die Frage:
womit fang ich da zuerst an? hät evtl jemand nen kleinen Quelltext womit ich erstmal rumtesten kann?

ich fang erstmal mit was kleineren an später baue ich das aus

hoffe mal das das leichter ist als ich denke

danke schonmal für die Antworten

mfg Myers

Hai !
Ich glaube das Thema hatten wir schon paar mal, benutze SuFu !


Mfg Alex

sry aber ich finde kein derartiges Thema könntest du mir evtl link geben?
es soll auch erstmal easy beschrieben sein damit ich weiss welcher Quelltext für welche Funktion ist

was meinst du mit "aufzeichnen", willst du gedrückten Tasten in Array schreiben oder in String ?

Mfg Alex

ich denke mal das es im string besser wäre. da ich die gespeicherten tastenklicks später über winsock verschicken möchte.

Programmierst du ein Virus ?
hier ist die Beispiel Code :




Mfg Alex

nein ich programmiere ne Serversoftware . ich bring mir bloß gerade selber vb bei und wenn mir ne geile idee mir einfällt mach ich einfach nen progg

Ja das VB habe ich mir auch selber bei gebracht, war kein Lehrer dabei wo mir alles Erklärt kann. Hab ca 6 VB Bücher, man kann ab und zu was brauchen bevor ich hier eine Frage stelle und warte bis Antwort bekommst, und wenn noch ein Antwort bekomme !

Mfg Alex

kannst du das auch in vb 6.0 schreiben ? wüsste nicht wie ich es umwandeln oder umschreiben könnte da er viele befehle nich kennt. wie z.b. handels oO oder wir klären das icq sonst wird das hier noch ewig dauern ;)?!

Kein Problem klopfe an !

Mfg Alex

{

Thema.Closing();
}

Nenn es wie du willst, ich nenne es Keylogger, das Thema hatten wir aber wirklich schon einmal.

[VB 2008] Keydown ereigniss, im Hintergrund

Ja Dragofly schon wieder die scheis API, ok, das kenn ich !

boar Leute mir jetzt egal was für Antworten ihr jetzt gibt.

1.die Quelltextvorlagen sind alle top danke

aber kann man das nich irgendwie so machen

zum beispiel^^ nich lachen sieht bestimmt dumm aus

if keypress then

list1.additem = tastediegedrückt wurde

kann man das nich soo einfach machen? und nein ich mach das Programm nich um böse sachen zu machen -.- ich will bloß sämtliche sachen die mich interessieren lernen.

Leute habs geschafft danke an alle die mitgeholfen haben

für die die es interessiert

Dim result As Integer

Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer


Private Sub Timer1_Timer()

For i = 1 To 255
result = 0
result = GetAsyncKeyState(i)

If result = -32767 Then
Label1.Caption = i
End If

Next i

End Sub


noch einfacher denk ich funzt es nich