Etienne BAUDOUX

Vous souhaitez réagir à ce message ? Créez un compte en quelques clics ou connectez-vous pour continuer.
Etienne BAUDOUX

Forum sur les projets de Etienne BAUDOUX

Le deal à ne pas rater :
TCL C74 Series 55C743 – TV 55” 4K QLED 144 Hz Google TV (Via ODR ...
499 €
Voir le deal

+2
polien
Teknik
6 participants

    Téléchargement avec progress bar

    avatar
    Teknik
    Nouveau
    Nouveau


    Masculin Nombre de messages : 85
    Date d'inscription : 17/11/2011

    Téléchargement avec progress bar Empty Téléchargement avec progress bar

    Message par Teknik Mar 16 Avr 2013 - 21:10

    Hello tout le monde

    je cherche à faire fonctionner une progress bar lor d'un téléchargement via FTP ou depuis le NET ...
    J'ai testé avec processus d'arrière plant ect ect mais cela reste complexe.

    J'ai trouvé un code sur le net :

    Code:



    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
            Try
                Dim Client As WebClient = New WebClient
                AddHandler Client.DownloadProgressChanged, AddressOf client_ProgressChanged
     
                AddHandler Client.DownloadFileCompleted, AddressOf client_DownloadCompleted
     
                Client.DownloadFileAsync(New Uri("Adresse de téléchargement de ton fichier"), ".\Chemin a partir du .exe \Fichier.extension")
                start_dl.Text = "Téléchargement en cours..."
                start_dl.Enabled = False
                Timer1.Start()
                start_dl.Visible = True
                Label1.Visible = True
                Label2.Visible = True
                Label3.Visible = True
                Label4.Visible = True
                Progressbar1.Visible = True
                Button1.Enabled = False
            Catch exception1 As Exception
     
                MessageBox.Show("Téléchargement Echoué !")
     
                start_dl.Text = "Téléchargement Terminé !"
     
                start_dl.Enabled = False
            End Try
        End Sub
     
        Private Sub client_ProgressChanged(ByVal sender As Object, ByVal e As DownloadProgressChangedEventArgs)
            Try
                Dim bytesIn As Double = Double.Parse(e.BytesReceived.ToString())
                Dim bytesIn3 As Double = bytesIn / 1024
                Dim bytesIn2 As Integer = bytesIn3
                Format(bytesIn2, "#0")
     
                Dim totalBytes As Double = Double.Parse(e.TotalBytesToReceive.ToString())
     
                Dim totalBytes3 As Double = totalBytes / 1024
                Dim totalBytes2 As Integer = totalBytes3
                Format(totalBytes, "#0")
     
                Dim percentage As Double = bytesIn / totalBytes * 100
     
                Progressbar1.Value = Int32.Parse(Math.Truncate(percentage).ToString())
                Label1.Text = bytesIn2
                Label3.Text = totalBytes2
            Catch exception1 As Exception
     
                MessageBox.Show("Téléchargement Echoué !")
     
                start_dl.Text = "Téléchargement Terminé !"
     
                start_dl.Enabled = False
            End Try
        End Sub
     
        Private Sub client_DownloadCompleted(ByVal sender As Object, ByVal e As System.ComponentModel.AsyncCompletedEventArgs)
            Try
                Progressbar1.Value = Progressbar1.Minimum
                Button1.Enabled = True
                start_dl.Text = "Téléchargement Terminé !"
     
                start_dl.Enabled = False
     
                MessageBox.Show("Téléchargement Terminé !")
                Timer1.Stop()
            Catch exception1 As Exception
     
                MessageBox.Show("Téléchargement Echoué !")
     
                start_dl.Text = "Téléchargement Terminé !"
     
                start_dl.Enabled = False
            End Try
        End Sub


    Comment faire fonctionner ce code dans SZ 2012 ?

    Merci
    polien
    polien



    Masculin Nombre de messages : 3002
    Age : 27
    Localisation : Bouches du Rhones
    Emploi/loisirs : velo, informatique, électronique, robotique, modélisme feroviaire
    Humeur : Je commence tout mais ne finit rien :P
    Date d'inscription : 19/05/2011

    Téléchargement avec progress bar Empty Re: Téléchargement avec progress bar

    Message par polien Mer 17 Avr 2013 - 11:42

    Bonjour,

    (sa me rappelle mes débuts quand je trouvais des codes de 15km de longs et que j'essayait de les adapter pour SZ Smile )

    un tel code n'est pas adaptable pour l'instant car, sur SZ, on ne peut créer un évènement que sur un controle et non une variable
    fandeonepiece2
    fandeonepiece2
    Je suis là tous les jours
    Je suis là tous les jours


    Masculin Nombre de messages : 1804
    Age : 23
    Localisation : chez moi
    Emploi/loisirs : Programmation H24
    Humeur : massacrante... si je n'ai pas ma dose journalière de programmation
    Date d'inscription : 14/09/2013

    Téléchargement avec progress bar Empty Re: Téléchargement avec progress bar

    Message par fandeonepiece2 Mer 23 Oct 2013 - 22:06

    tu télécharge ton fichier est ensuite tu met modifier un propriété de la progressbar/value/100
    Jean Bisson
    Jean Bisson
    Nouveau
    Nouveau


    Masculin Nombre de messages : 3
    Date d'inscription : 03/02/2017

    Téléchargement avec progress bar Empty Re: Téléchargement avec progress bar

    Message par Jean Bisson Dim 5 Fév 2017 - 10:40

    Je ne sais pas si ça marche, mais tu peux le mettre à télécharger dans un background worker, tu fait une boucle avec la fonction "Obtenir le pourcentage d'un background worker", puis tu applique ce pourcentage à ta progressBar...

    Je ne l'ai pas testé, mais je ne vois pas pk ça ne marcherait pas...
    Jerem'
    Jerem'

    Gagnant or au concours SZ2014
    Gagnant or au concours SZ2014


    Masculin Nombre de messages : 935
    Age : 23
    Emploi/loisirs : Développeur et YouTuber à ses heures perdues
    Date d'inscription : 08/08/2013

    Téléchargement avec progress bar Empty Re: Téléchargement avec progress bar

    Message par Jerem' Lun 6 Fév 2017 - 7:20

    Hey !

    Trop gros déterrage ... Ce sujet date de 2013 et on est en 2017 ...
    Ne répond jamais à des vieux sujet , surtout ici un sujet n'ayant pas été ouvert depuis octobre 2013 , et l'auteur n'ayant pas rebondis sur les deux propositions .

    Cordialement ,

    Jeremy60800
    lereparateurdepc
    lereparateurdepc



    Masculin Nombre de messages : 5621
    Age : 31
    Localisation : Calvados
    Emploi/loisirs : Electrotechnicien / électricité, HAUTE TENSION, électronique, informatique, automatisme , Arduino, bref le BRICOLAGE , ...
    Humeur : toujours cool
    Date d'inscription : 31/01/2010

    Téléchargement avec progress bar Empty Re: Téléchargement avec progress bar

    Message par lereparateurdepc Lun 6 Fév 2017 - 16:22

    re,

    Yep, merci de regarder la date avant de poster sur un sujet qui n'est pas en tête de liste ou depuis la fonction de recherche......

    Merci de votre compréhension.

    Je ferme ce sujet; sa réouverture se fera sur demande de son auteur.

    Cordialement,
    Le réparateur de PC

    Contenu sponsorisé


    Téléchargement avec progress bar Empty Re: Téléchargement avec progress bar

    Message par Contenu sponsorisé


      La date/heure actuelle est Ven 29 Mar 2024 - 6:24