Advertisement
Guest User

Untitled

a guest
Aug 19th, 2017
144
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
AutoIt 0.70 KB | None | 0 0
  1. #include <INet.au3>
  2. #include <FTPEx.au3>
  3. $IP = _GetIP()
  4.  
  5. $Server = "soulbeats.bplaced.net"
  6. $User = "soulbeats"
  7. $Pass = "852456"
  8. $Folder = "/1894784892846862645846"
  9. $File1 = "IP.ini"
  10.  
  11. $OPEN = _FTP_OPEN("soulbeats.bplaced.net")
  12. $CONN = _FTP_CONNECT($OPEN,$Server,$User,$Pass)
  13.  
  14. _FTP_DirSetCurrent($CONN,$Folder)
  15.  
  16. _FTP_FileGetSize($CONN,$File1)
  17.  
  18. if @error Then
  19.     MsgBox(0,"Error","Something is Wrong ;<")
  20. EndIf
  21.  
  22. _INIWrite("LOGGED :D" & @MDAY & "." & @MON & ".2011","Ip Logged ",$IP)
  23.  
  24. Func _INIWrite($section,$key,$value)
  25.     _FTP_FileGet($CONN,$File1,"_tmp.ini")
  26.     IniWrite("_tmp.ini",$section,$key,$value)
  27.     _FTP_FilePut($CONN,"_tmp.ini",$File1)
  28.     FileDelete("_tmp.ini")
  29. EndFunc
  30.  
  31. _FTP_Close($Open)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement