Bonjour à tous

J'utilise ceci pour télécharger un fichier zip (tirage du loto)

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Private Function Telecharge(Nom As String) As Boolean
     Dim U As String = Url & Nom
     Using Wc As New Net.WebClient
         Try
             Wc.DownloadFile(U, Doc & Nom)
             Return True
         Catch ex As Exception
             Messages.Add(U)
             Messages.Add("Erreur " & Nom & " " & Prenom & " " & My.Computer.Info.ToString & Environment.NewLine _
                          & My.Computer.Info.OSFullName)
             MessageBox.Show("Il y a eu un problème au téléchargement" & Environment.NewLine _
                                 & "le fichier " & Nom & Environment.NewLine & "n'a pas été téléchargé")
             Return False
         End Try
     End Using
Depuis quelques jours , la taille du fichier est mauvais , il manque des lignes

La taille du fichier téléchargé est de 126 976 octets et si je télécharge avec Edge la taille du fichier est 131 072 octets

Quelle peut en être la raison ??