Progressbar pour téléchargement de plusieurs fichier. [Résolu]

Messages postés
3
Date d'inscription
jeudi 20 octobre 2011
Dernière intervention
21 octobre 2011
- - Dernière réponse : cs_hatomike
Messages postés
3
Date d'inscription
jeudi 20 octobre 2011
Dernière intervention
21 octobre 2011
- 21 oct. 2011 à 12:28
bonjour, je suis nouveau en VB et j'ai déjà créer ceci.
Maintenant je voudrais faire un système d'installation des ressources en cliquant sur un bouton...
sa fonctionne parfaitement mais la progressbar que j'y est mis ne bouge pas et je voudrais savoir le code pour faire avancé une progressbar sur plusieurs téléchargement suite a un clique sur un bouton comme ceci:

    Private Sub Button10_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button10.Click
        If System.IO.File.Exists(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\.minecraft\TNT\install.txt") = False Then
            My.Computer.Network.DownloadFile("https://s3.amazonaws.com/MinecraftDownload/launcher/Minecraft.exe", Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\.minecraft\TNT\minecraft.exe")
            My.Computer.Network.DownloadFile("http://download1323.mediafire.com/ykryi52x5dog/fj2q7azsjfwbs2j/Craftback.exe", Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\.minecraft\TNT\craftback.exe")
            My.Computer.Network.DownloadFile("http://download1373.mediafire.com/8xgdr4bi02tg/1xeyz5552y4bczz/crack.exe", Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\.minecraft\TNT\crack.exe")
            Dim sw As New System.IO.StreamWriter(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\.minecraft\TNT\install.txt")
        ElseIf System.IO.File.Exists(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\.minecraft\TNT\install.txt") = True Then
            Kill(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\.minecraft\TNT\minecraft.exe")
            Kill(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\.minecraft\TNT\craftback.exe")
            Kill(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\.minecraft\TNT\crack.exe")
            My.Computer.Network.DownloadFile("https://s3.amazonaws.com/MinecraftDownload/launcher/Minecraft.exe", Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\.minecraft\TNT\minecraft.exe")
            My.Computer.Network.DownloadFile("http://download1323.mediafire.com/ykryi52x5dog/fj2q7azsjfwbs2j/Craftback.exe", Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\.minecraft\TNT\craftback.exe")
            My.Computer.Network.DownloadFile("http://download1373.mediafire.com/8xgdr4bi02tg/1xeyz5552y4bczz/crack.exe", Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\.minecraft\TNT\crack.exe")
        End If
    End Sub
Afficher la suite 

Votre réponse

5 réponses

Meilleure réponse
Messages postés
305
Date d'inscription
jeudi 29 avril 2004
Dernière intervention
18 janvier 2012
3
Merci
Salut Julien
Ce sujet a déjà été traité, mais je n'ai pas spécialement le temps de rechercher.

et...oui... "progressbar téléchargement" dans le champ recherche te donnait la réponse
Ces deux liens devraient faire l'affaire:
http://www.vbfrance.com/code.aspx?ID=2742
http://www.vbfrance.com/code.aspx?ID=6919
Bon courage

Dire « Merci » 3

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 119 internautes nous ont dit merci ce mois-ci

Commenter la réponse de cs_LA_Tupac
Messages postés
14400
Date d'inscription
vendredi 14 mars 2003
Dernière intervention
24 mars 2019
154
0
Merci
Bonjour,

Au vu du nom des URL, relis le règlement ...
Sinon, je ne t'aiderais pas à cracker ce superbe jeu qu'est Minecraft, en plus, il est pas cher (seulement 15€, je crois).

---------------------------------------------------------------------
[list=ordered][*]Pour poser correctement une question et optimiser vos chances d'obtenir des réponses, pensez à lire le règlement CS et aussi ce lien[*]Quand vous postez un code, merci d'utiliser la coloration syntaxique (3ième icône en partant de la droite : )
[*]Si votre problème est résolu (et uniquement si c'est le cas), pensez à mettre "Réponse acceptée" sur le ou les messages qui vous ont aidés./list
---
Commenter la réponse de NHenry
Messages postés
3
Date d'inscription
jeudi 20 octobre 2011
Dernière intervention
21 octobre 2011
0
Merci
Je suis du même avis que toi, je possède la version payante de ce jeu qui est tout simplement merveilleux.
Le code que j'ai postez est celui de la version beta que je fait pour un ami et il ne souhaite pas que je vire le launcher crack qui me fait ch*er
Dans la future version (celle que je fait), Je remplace le lanceur crack par un lien directe vers la version classique, c'est d'ailleurs écrie dans la liste des choses a faire sur le topique officiel: http://minecraft.fr/forum/index.php?threads/tool-minecraft-tnt-launcher.25719/

Tu comprendra donc que je suis formelement contre la version crack qui ne sert stricktement a rien a la preuve est donc ma chaine youtube :
http://www.youtube.com/user/Hatomike?feature=mhee

désolé du dérangement...
Commenter la réponse de cs_hatomike
Messages postés
14400
Date d'inscription
vendredi 14 mars 2003
Dernière intervention
24 mars 2019
154
0
Merci
Bonjour,

Il te faut avoir une gestion de l'avancé d'un téléchargement, ensuite, il te faudra une instance pour chaque téléchargement.

Tu ne pourras pas le faire en lot, il te faudra distinguer les 3 téléchargements.

Ce sujet a déjà été traité, mais je n'ai pas spécialement le temps de rechercher.

---------------------------------------------------------------------
[list=ordered][*]Pour poser correctement une question et optimiser vos chances d'obtenir des réponses, pensez à lire le règlement CS et aussi ce lien[*]Quand vous postez un code, merci d'utiliser la coloration syntaxique (3ième icône en partant de la droite : )
[*]Si votre problème est résolu (et uniquement si c'est le cas), pensez à mettre "Réponse acceptée" sur le ou les messages qui vous ont aidés./list
---
Commenter la réponse de NHenry
Messages postés
3
Date d'inscription
jeudi 20 octobre 2011
Dernière intervention
21 octobre 2011
0
Merci
merci beaucoup je vais regarder ça de plus pré
Commenter la réponse de cs_hatomike

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.