Télécharger un fichier avec VB .net
van'
-
toto -
toto -
Bonjour,
est ce que quelqu'un connait un moyen de télécharger automatiquement un fichier sur internet avec VB .net.
Merci
est ce que quelqu'un connait un moyen de télécharger automatiquement un fichier sur internet avec VB .net.
Merci
3 réponses
-
Je vais commenter le code de BLODOX pour que tu comprenne.
Private Sub DOWNLOAD_FILE() 'Declaration du sub
Dim REMOTE_URL As String = "http://......" ' adresse de la page ou du fichier à récuperer
Dim F As Integer = FreeFile()
Dim WEB_CLIENT As New System.Net.WebClient() 'Création du controle client
'
Dim DNL_FILE as String = "monfichierdereception" 'Adresse de reception
'
Try
WEB_CLIENT.DownloadFile(REMOTE_URL, DNL_FILE) 'Téléchargement
Catch ex As Exception ' S'il y a une erreur alors
MsgBox(ex.Message) 'affichier l'erreur dans une Message Box
End Try
'
End Sub 'Fin du Sub -
Si c'est dans le sens OrdiDistant -> MonOrdi
Essayes ça :
Private Sub DOWNLOAD_FILE()
'
Dim REMOTE_URL As String = "http://......" ' adresse de la page ou du fichier à récuperer
Dim F As Integer = FreeFile()
Dim WEB_CLIENT As New System.Net.WebClient()
'
Dim DNL_FILE as String = "monfichierdereception"
'
Try
WEB_CLIENT.DownloadFile(REMOTE_URL, DNL_FILE)
Catch ex As Exception
MsgBox(ex.Message)
End Try
'
End Sub
a+-
-
Salut,
Dim REMOTE_URL As String = "http://......" ' adresse de la page ou du fichier à récuperer
Dim F As Integer = FreeFile()
Dim WEB_CLIENT As New System.Net.WebClient()
Dim FileName1 As String = "C:/MonFichier""
Try
WEB_CLIENT.DownloadFile(REMOTE_URL,FileName1)
Catch ex As Exception
MsgBox(ex.Message)
End Try
PS: Je n'est pas testé, Désolé si je me trompe -
-
-
je cherche aussi le moyen de le faire mais je n'en trouve pas