Donnez votre avis

[tuto]téléchargé un fichier .xml,.rar,.zip,.exe .....à partir de vb

Posez votre question

Bonjour à toutes et tous,


Je vous présente mon tutoriel qui permet de télécharger des fichiers à partir de votre hébergeur.

Pré-requis


Il vous faut :

-1 Bouton
-1 Progress Bar
-1 Timer
-1 RichTextbox

Code


Placez votre bouton, la progress & la RichTextBox
Sur le bouton mettez ce code :

        Dim address As String = "http://votresite/setup.exe]"
        Me.RichTextBox1.AppendText("Recherche de mise a jour" & vbCrLf)
       
        Dim num As Integer = FileSystem.FreeFile
        Dim client As New WebClient
        
        Me.RichTextBox1.AppendText("Cr" & ChrW(233) & "action du contrôle client " & vbCrLf)
        
        Dim fileName As String = "config.xml"
        Me.RichTextBox1.AppendText("Votre config.xml a été téléchargé" & vbCrLf)
        Try
            client.DownloadFile(address, fileName)
            Me.RichTextBox1.AppendText("Fini " & vbCrLf)
        Catch exception1 As Exception
        End Try
        Me.Timer1.Enabled = False
        Me.Timer1.Interval = 100
        Me.Timer1.Enabled = True
        Me.ProgressBar1.Value = 100
        Interaction.MsgBox("Fichier téléchargé", MsgBoxStyle.OkOnly, Nothing)

Ne vous reste qu'à déclarer les variables ...

Cordialement , Saw
Ajouter un commentaire

Commentaires

Commenter la réponse de ghuysmans99