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

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

Ce document intitulé « [tuto]téléchargé un fichier .xml,.rar,.zip,.exe .....à partir de vb » issu de CodeS SourceS (codes-sources.commentcamarche.net) est mis à disposition sous les termes de la licence Creative Commons. Vous pouvez copier, modifier des copies de cette page, dans les conditions fixées par la licence, tant que cette note apparaît clairement.
Rejoignez-nous