Discussion :

[Fireofmage]

Bonjour tout le monde, voilà j'ai un programme, et j'ai instauré un bouton "mise à jour" pour que lorsque l'on clique dessus, un fichier .rar s'installe. Donc j'ai configuré sa avec My.Computer.Network.DownloadFile, le fichier .rar s'installe bien dans le dossier, mais il est impossible à ouvrir ! Lorsque c'est DownloadFile qui télécharge le dossier, le fichier.rar devient corrompu donc il est impossible à ouvrir !

J'ai pensé que c'était l'hébérgeur, mais non j'ai essayer avec RapidShare, MediaFire et plein d'autres, et toujours pareil, le fichier devient corrompu.

J'ai peut-être fait une erreur dans le code dont je vous donne :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
        My.Computer.Network.DownloadFile("http://www.toofiles.com/fr/oip/documents/rar/maj.html", "maj.rar")
        MsgBox("La Mise à Jour a bien été installée !")
    End Sub

Voilà si quelqu'un peux m'aider !

Merci n_n

[Ascendris]

Ton deuxième paramètre dans la ligne de code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

My.Computer.Network.DownloadFile("http://www.toofiles.com/fr/oip/documents/rar/maj.html", "maj.rar")

devrait pas plutôt être le chemin exact ou tu dois placer le fichier? Ex : "C:/Temp/Maj.rar" ?? Et non simplement "maj.rar"?

[tomlev]

Bah l'URL que tu indiques renvoie un fichier HTML, pas un fichier RAR... je parie que si tu ouvres le fichier téléchargé tu vas y trouver du HTML

[Fireofmage]

J'ai corriger sa, mais j'ai toujours le même problème, fichier endommagé :'(

[Ascendris]

Es-tu sur que tu as le bon lien URL pour télécharger ton fichier?

[Fireofmage]

Oui bien sûr, si on le télécharge avec le lien il s'ouvre mais si on le télécharge en cliquant sur le bouton sa ne marche pas

J'ai remplacé le lien regardé par vous même, je n'ai pas fais d'erreur :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
        My.Computer.Network.DownloadFile("http://www.mediafire.com/file/hmjkv2tjxqa7qz3/maj.rar", "maj.rar")
        MsgBox("La Mise à Jour a bien été installée !")
    End Sub

Je précise que ce n'est pas que pour moi, je le partage a d'autres personnes par la suite.

Voilà, en attendant une réponse.

Merci !