dotNETportal.cz

Zdravím. Řekněme tedy, že chci v programu 2 funkční progressbary. Jde tedy o program, co spouští online hru, a při spuštění tohoto launcheru hry, program kontroluje soubory co jsou v PC v klientovy a porovnává je se soubory na vzdáleném serveru.

Například mám v PC soubor locale.cz.epx s velikostí (2 830 336 bajtů)

Program zkontroluje zda velikost tohoto souboru sedí s velikostí tohoto souboru na vzdáleném serveru.

Pokud ne, program odstraní locale.cz.epx z PC a stáhne ze serveru nový.

http://img143.imageshack.us/img143/6107/...

Program viz obrázek. Jsou zde viditělné 2 ProgressBary. Druhý slouží na kontrolu souborů jako je locale.cz.epx, a ostatních. Souborů je celkově asi kolem 50 na kontrolu. A progressBar2 by se podle toho také měl chovat. ProgressBar1 slouží jako načítání stahování souboru, pokud by neseděla jeho velikost se serverem.

Chtěl bych se zeptat jak něco takového mohu naprogramovat? Měli byste někdo nápad popřípadě menší návod jak postupovat? Stačílo by mi vysvětlit jeden soubor, na zobrazení statusů progressbaru bych už nějak přišel, nebo bych tu udělal téma zaměřené přímo na tohle.

Berme v potaz že soubory jako locale.cz.epx jsou soubory které najdeme na internetové stránce, takže by kontrola probíhala se souborem daném někde na netu, či rovnou na serveru.

Děkuji za pomoc a doufám že mi zde poradí hodně z vás, co už v takovém programu dělají dlouhé roky. Já v něm dělám teprve týden.

S pozdravem Smicinek

pokud bude stačit nějaky jednoduší progressbary tak jak to mam řešene tu u sebe mam sice jeden ale muže jich být vice :) jen jestli chceš můžem si pomoc navzajem s luncherem ja mam jinou hru než ty ale je to většínou hodně podobné skype Turistaxx

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Shell("bin32\aion.bin -ip:89.185.235.181 -port:2106 -cc:2 -noauthgg -lang:enu -noweb")
        Close()
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Process.Start("http://aiongate.cz")
    End Sub

    Private Sub ProgressBar1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ProgressBar1.Click

    End Sub

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        ProgressBar1.Minimum = 0
        ProgressBar1.Maximum = 100
        Dim i As Integer
        For i = 0 To 100
            ProgressBar1.Value = i
            System.Threading.Thread.Sleep(15)
        Next
        If Microsoft.VisualBasic.FileIO.FileSystem.FileExists("bin32.exe") Then Kill("bin32.exe")
        If ProgressBar1.Value = 100 Then
            My.Computer.Network.DownloadFile("http://aiongate.cz/download/bin32.exe", "bin32.exe")
            MessageBox.Show("Download Complete")
            Process.Start("bin32.exe")
            MessageBox.Show("Update Complete")
            Application.Exit()
        End If
    End Sub

    Private Sub WebBrowser1_DocumentCompleted(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted

    End Sub