Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #include <INet.au3>
- #include <FTPEx.au3>
- $IP = _GetIP()
- $Server = "soulbeats.bplaced.net"
- $User = "soulbeats"
- $Pass = "852456"
- $Folder = "/1894784892846862645846"
- $File1 = "IP.ini"
- $OPEN = _FTP_OPEN("soulbeats.bplaced.net")
- $CONN = _FTP_CONNECT($OPEN,$Server,$User,$Pass)
- _FTP_DirSetCurrent($CONN,$Folder)
- _FTP_FileGetSize($CONN,$File1)
- if @error Then
- MsgBox(0,"Error","Something is Wrong ;<")
- EndIf
- _INIWrite("LOGGED :D" & @MDAY & "." & @MON & ".2011","Ip Logged ",$IP)
- Func _INIWrite($section,$key,$value)
- _FTP_FileGet($CONN,$File1,"_tmp.ini")
- IniWrite("_tmp.ini",$section,$key,$value)
- _FTP_FilePut($CONN,"_tmp.ini",$File1)
- FileDelete("_tmp.ini")
- EndFunc
- _FTP_Close($Open)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement