Und zwar hab ich ein Problem ;o der launcher soll die version von einer Auslesen und dann entscheiden ob er updaten soll oder nicht nur das dumme ist er Lädt das update immer runter v_v
Code:
2. Problem o: wie kann ich festlegen das man die größe nicht ändern kann ? das geht bei mir irgendwie nicht....
Code:
Code:
Dim request As HttpWebRequest = DirectCast(WebRequest.Create("https://dl.dropboxusercontent.com/s/rq5zduzim3akk56/version.txt"), HttpWebRequest)
Dim response As HttpWebResponse = DirectCast(request.GetResponse, HttpWebResponse)
Dim str2 As String = New StreamReader(response.GetResponseStream).ReadToEnd
Dim productVersion As String = Application.ProductVersion
Me.download = New WebClient
If str2.Contains(productVersion) Then
Me.TextBox1.Text = "Kein Update verfügbar"
Else
Try
Me.download.DownloadFileAsync(New Uri("http://sonsoferenia.safe-ws.de/download/client.zip"), (MyProject.Computer.FileSystem.CurrentDirectory & "\SonsofErenia " & str2 & ".zip"))
Me.TextBox1.ForeColor = Color.Green
Me.TextBox1.Text = "Neues Update verfügbar! Herunterladen ..."
Catch exception1 As Exception
ProjectData.SetProjectError(exception1)
Dim exception As Exception = exception1
MessageBox.Show(exception.Message, ("Fehler aufgetreten während des runterladens. Bitte versuchen Sie es später noch einmal ..." & exception.Message))
ProjectData.ClearProjectError()
End Try
End If