Hi All,
avrei un piccolo problemino con il mio Game Client.
Questa è la logica che deve avere il programma:
Inizio automaticamente il controllo degli aggiornamenti.
Sono disponibili aggiornamenti?
Si, scarico l'archivio e estraggo i file sovrascrivendoli dopo apro il form Game e chiudo questo form
No, apro il form Game e chiudo questo form
Ecco il codice:
Imports System.Net
Imports System.Net.WebClient
Imports System.IO
Imports System.IO.File
Public Class CheckUpdates
Public plglobal As String = My.Computer.FileSystem.ReadAllText("PL_global.bin" , System.Text.Encoding.Default)
Private Sub Label1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label1.Click
End Sub
Private Sub CheckUpdates_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Azioni.Text = "Inizio programma di Aggiornamento del Gioco..." & vbCrLf
Azioni.AppendText("Connessione al Master Server..." & vbCrLf)
Azioni.AppendText("Connessione accettata!" & vbCrLf)
Progresso.Increment(10)
Azioni.AppendText("Controllo versione Server..." & vbCrLf)
Progresso.Increment(30)
Try
My.Computer.Network.DownloadFile("http://***********.biz/Servers/Client/Version_10/prova.zip", "C:\prova.zip")
Shell("unrar.dll e -y C:\prova.zip", AppWinStyle.Hide)
Progresso.Increment(40)
Azioni.Text = "Preparo l'avvio del Gioco..." & vbCrLf
My.Computer.FileSystem.DeleteFile("prova.zip")
Progresso.Increment(20)
'QUI SI DOVREBBE CHIUDERE IL FORM E APRIRE IL FORM GAME MA NON SO COME FARE
Catch
Azioni.Text = "Nessun aggiornamento disponibile." & vbCrLf
Azioni.Text = "Avvio il gioco..." & vbCrLf
'QUI SI DOVREBBE CHIUDERE IL FORM E APRIRE IL FORM GAME MA NON SO COME FARE
Finally
End Try
End Sub
Private Sub Label2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label2.Click
End Sub
End Class
Inoltre vorrei che durante il download dell'aggiornamento uscisse scritto il progresso nell Text Box "Azioni". Come posso fare?
Il programma mi dice sempre che non ci sono aggiornamenti. E' da giorni che ci smanetto sopra ma non riesco e ormai il Server è quasi pronto.
Potete aiutarmi?
Grazie
Rispondi quotando
