Système de téléchargement / d'installation
DarkSpX
Messages postés
88
Statut
Membre
-
yg_be Messages postés 24281 Date d'inscription Statut Contributeur Dernière intervention -
yg_be Messages postés 24281 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour, je viens vers vous car, je ne sais comment faire par la suite.
En effet, je suis en train de faire un système de mise à jour pour le jeu d'un amis, mais n'est pas cela le problème car, tout sa fonctionne très bien. Mon problème est le système de téléchargement et d'installation du nouveau programme. En faite, quand il y a une mise à jour, le logiciel propose le téléchargement et, j'aimerais qu'a la fin du téléchargement, il installe automatiquement le nouveau programme. Mon souci est que je ne connais le code permettant de reconnaître la fin du téléchargement.
Merci de me venir en aide.
voici le code :
Imports System.Net
Public Class Form4
Sub setup()
Telecharger = New WebClient
Telecharger.DownloadFileAsync(New Uri(TextBox1.Text), (TextBox2.Text))
End Sub
Private Sub Button_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click
setup()
Button1.Enabled = False
Button1.Text = "Veuillez patienter"
End Sub
Dim WithEvents Telecharger As WebClient
Private Sub Telecharger_DownloadProgressChanged(ByVal sender As Object, ByVal e As System.Net.DownloadProgressChangedEventArgs) Handles Telecharger.DownloadProgressChanged
ProgressBar1.Value = e.ProgressPercentage
End Sub
Private Sub Form4_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim download As New WebClient
Dim downloadlink As String = download.DownloadString("site")
TextBox1.Text = downloadlink
TextBox2.Text = "lien docs"
TextBox1.Visible = False
TextBox2.Visible = False
End Sub
End Class
En effet, je suis en train de faire un système de mise à jour pour le jeu d'un amis, mais n'est pas cela le problème car, tout sa fonctionne très bien. Mon problème est le système de téléchargement et d'installation du nouveau programme. En faite, quand il y a une mise à jour, le logiciel propose le téléchargement et, j'aimerais qu'a la fin du téléchargement, il installe automatiquement le nouveau programme. Mon souci est que je ne connais le code permettant de reconnaître la fin du téléchargement.
Merci de me venir en aide.
voici le code :
Imports System.Net
Public Class Form4
Sub setup()
Telecharger = New WebClient
Telecharger.DownloadFileAsync(New Uri(TextBox1.Text), (TextBox2.Text))
End Sub
Private Sub Button_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click
setup()
Button1.Enabled = False
Button1.Text = "Veuillez patienter"
End Sub
Dim WithEvents Telecharger As WebClient
Private Sub Telecharger_DownloadProgressChanged(ByVal sender As Object, ByVal e As System.Net.DownloadProgressChangedEventArgs) Handles Telecharger.DownloadProgressChanged
ProgressBar1.Value = e.ProgressPercentage
End Sub
Private Sub Form4_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim download As New WebClient
Dim downloadlink As String = download.DownloadString("site")
TextBox1.Text = downloadlink
TextBox2.Text = "lien docs"
TextBox1.Visible = False
TextBox2.Visible = False
End Sub
End Class
A voir également:
- Système de téléchargement / d'installation
- Site de telechargement - Accueil - Outils
- Restauration systeme windows 10 - Guide
- Telechargement - Télécharger - Traitement de texte
- Téléchargement - Télécharger - Compression & Décompression
- Adobe Reader - Télécharger - PDF
2 réponses
Timer ?
Cordialement, Arion320
Public Class Form1
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Timer1.Start()
End Sub
Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
If Me.ProgressBar1.Value = Me.ProgressBar1.Maximum Then
Me.Timer1.Stop()
'Installation (Ton Setup() )
End If
End Sub
End Class
Cordialement, Arion320
yg_be
Messages postés
24281
Date d'inscription
Statut
Contributeur
Dernière intervention
Ambassadeur
1 585
Je suppose que tu ne veux pas que ton programme soit bloqué jusqu'à la fin du téléchargement?
Je pense que, dans setup(), avant
tu peux ajouter
Ainsi, tu peux déclarer
Telecharger.DownloadFileAsync(New Uri(TextBox1.Text), (TextBox2.Text)),
tu peux ajouter
AddHandler Telecharger.DownloadFileCompleted, AddressOf Telecharger_Download_Fini
Ainsi, tu peux déclarer
sub Telecharger_Download_Fini, qui sera appelée à la fin du téléchargement.