Téléchargement WebBrowser

Question

Bonjours.

J'ai une appli avec un webBrowser. Apres plusieurs action sur les pages, je valide un formulaire qui me lance un téléchargement (boite de dialogue classique du téléchargement).
J'aurais voulu savoir s'il été possible de ne pas avoir cette boite de dialogue et spécifier directement le chemin où enregistrer le fichier.

Je précise que je ne connais pas le nom du fichier a télécharger (pas d'url directe vers le fichier) donc je ne peux pas faire de downloadFile avec un webclient.

J'espère que quelqu'un aura une solution.

Cordialement,

Robertõ La Moule

kinneri · Answer

Bonsoir,

ok, mais d'ou souhaites tu faire le telechargement ?


pour quelle type de fichier ?


A+

roberto la moule · Answer

Merci d'avoir répondu.

Donc pour le type du fichier ca peu être n'importe quoi(zip,rar,exe ...).
Ensuite pour répondre à la question "d'où" c'est d'une page internet (si j'ai bien compris la question)

Cordialement,

Robertõ La Moule

kinneri · Answer

salut,

normalement si tu reçois une fenetre indiquant enregistrer, c'est que le lien est present.
ce qui fait que tu peux le faire via wabclient.
crée une forme avec un bouton est met le code qui suit.
remplace l'url par celui qui t'interresse.
il recupere le premier fichier telechargeable, si tu souhaites voir tous les fichiers disponible, place les dans un listbox.


Private
Sub Button1_Click(
ByVal sender 
As System.Object, 
ByVal e 
As System.EventArgs) 
Handles Button1.Click




AddHandler

 webclient.DownloadStringCompleted, 


AddressOf

 downloadstringcompleted



webclient.DownloadStringAsync(New Uri(
"http://www.01net.com/telecharger/windows/Utilitaire/compression_et_decompression/fiches/2257.html"))




End





Sub










Sub

 downloadstringcompleted(


ByVal

 sender 


As

 System.Object, 


ByVal

 e 


As

 System.Net.DownloadStringCompletedEventArgs)



Dim

 chaine 


As





String








Dim

 debut, fin 


As





Integer

, resultat 


As





String

, sauve 


As





String


chaine = e.Result


fin = chaine.IndexOf(





".exe"

, 1)debut = chaine.IndexOf(



"http://"

, fin - 300)resultat = chaine.Substring(debut, fin - debut + 4)

debut = resultat.LastIndexOf(



"/"

)fin = resultat.IndexOf(



".exe"

)sauve = resultat.Substring(debut + 1, fin - debut + 3)

webclient.DownloadFile(resultat, sauve)



End





Sub




A+

kinneri · Answer

j'ai oublier de dire que mon code est fait pour les exe, adapte le pour le reste.
A+

roberto la moule · Answer

Ok merci je teste ca et vous tiens au courrant

Téléchargement WebBrowser

5 réponses

Votre réponse

Discussions similaires