Télécharger un fichier sur internet tres simplement en vb.net

Soyez le premier à donner votre avis sur cette source.

Snippet vu 13 660 fois - Téléchargée 40 fois


Contenu du snippet

Voila une manière simple de télécharger un fichier sur le web... je n'ai pas tester les limites de tailles, mais je pense qu'il faut eviter de tenter de pomper un fichier de 500Mo... sauf si vous etes sur à 100% de votre connection et du serveur distant...mais bon, bref.

Source / Exemple :


Private Function download_file(ByVal url As String, ByVal chemin As String) As String
        Dim dl As New System.Net.WebClient() 'on crée un objet webclient
        Dim n As Long = Environment.TickCount 'cette variable n'est pas obligatoire, elle servira à deduire le temps que le téléchargement à pris
        Try
            dl.DownloadFile(url, chemin) 'la commande de telechargement de l'objet dl
            dl.Dispose() 'on libere dl
            Return "téléchargement effectué en " & ((Environment.TickCount - n) / 1000) & " secondes" 'on renvoie une string indiquant le temps de téléchargement, sous entendant par la meme occasion l'execution avec succés du téléchargement
        Catch ex As Exception
            Return ex.Message.ToString 'si il y a une erreur, on en renvoie la description
        End Try
    End Function

    'Puis appelez la fonction dans une string, un texte ou un label.
 Label1.Text = download_file("http://batto.free.fr/ConsoleFileCompare.exe", "D:\ConsoleFileCompare.exe")

Conclusion :


Voila, comme d'hab, je pense et j'espere que ca servira.

A voir également

Ajouter un commentaire Commentaires
surfzoid Messages postés 463 Date d'inscription vendredi 15 août 2003 Statut Membre Dernière intervention 21 avril 2010
22 juin 2008 à 20:00
exacte backgroundworker_dowork, c'est ça principale utilité , de plus entre temps, j'avais découvert la classe network dans l'espace de nom "My.Computer" qui a déja une fonction de télécharchement.
@++ et bonne prog
hvb Messages postés 939 Date d'inscription vendredi 25 octobre 2002 Statut Membre Dernière intervention 27 janvier 2009 3
22 juin 2008 à 18:31
lol... c'est à toi de le placer dans un thread pour ne pas "geler" ton main thread

regarde ça sinon :
http://www.vbfrance.com/codes/NET2-CLASSE-TELECHARGEMENT-HTTP-AVEC-GESTION-RESUME-PROGRESSION_41850.aspx
soldier8514 Messages postés 295 Date d'inscription vendredi 20 décembre 2002 Statut Membre Dernière intervention 24 janvier 2014 1
22 juin 2008 à 16:12
ce code doit surement geler le programme pendant que ça télécharge , ça craint !
hvb Messages postés 939 Date d'inscription vendredi 25 octobre 2002 Statut Membre Dernière intervention 27 janvier 2009 3
25 juin 2006 à 23:02
desolé d'entrer dans le debat si tard...
pour faire simple et court :
fais une requete GET et enregistre le resultat ou tu veux.
http://www.vbfrance.com/codes/REQUETE-HTTP-GET-POST_36181.aspx
sousoulebarbu Messages postés 101 Date d'inscription mercredi 27 juillet 2005 Statut Membre Dernière intervention 11 janvier 2009
25 juin 2006 à 21:19
En utilisant cette fonction, tu arrive à retomber sur
"Aucune émission ne correspond à votre recherche..."?????
C'est bizard que j'y arrive pas.
Pour les personnes qui ont ce problème, j'utilise maintenant la fonction:
Private Declare Function URLDownloadToFile Lib "urlmon" Alias _
"URLDownloadToFileA" (ByVal pCaller As Integer, ByVal szURL As String, _
ByVal szFileName As String, ByVal dwReserved As Integer, _
ByVal lpfnCB As Integer) As Integer

A utiliser comme ça: URLDownloadToFile(0,url, filename, 0, 0)
et tout fonctionne parfaitement
Afficher les 26 commentaires

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.