Il blog per tutti gli smanettoni del pc

Download di un file VB.NET

dic 29

Il framework .net della Microsoft ha veramente cambiato il modo di programmare . Prima per realizzare il seguente programma, occorrevano parecchi minuti se non ore .

Scaricare un file da internet è davvero semplice. Ecco un esempio :

Sub main()
Try
  Dim webC As New Net.WebClient
  Dim patchFile As String = "http://www.google.it/intl/it_it/images/logo.gif"
  Dim filename As String = patchFile.Substring(patchFile.LastIndexOf("/") + 1)
  webC.DownloadFile(patchFile, filename)
Catch ex As Exception
  MsgBox(ex)
End Try
End Sub
  1. Sto utilizzando un progetto console di visual studio. Sub Main è la routine principale . Viene invocata all’inizio del programma
  2. Try..Catch..End Try è un importante costrutto per la gestione degli errori. Se all’interno di TRY si genera un errore , il programma non viene interrotto , ma viene eseguito il codice all’interno di CATCH
  3. Instanziamo la classe Net.WebClient nell’oggetto  WebC
  4. patchFile è l’indirizzo del file
  5. filename è il nome del file . patchFile.LastIndexOf(“/”) restituisce la posizione dell’ultimo / . Con patchFile.Substring ritagliamo i caratteri che ci servono
  6. DownloadFile è il cuore dello script . Come primo parametro occorre fornire l’indirizzo http del file. Il secondo parametro è invece l’indirizzo di destinazione

L’indirizzo di destinazione puo’ essere anche del tipo “C:\mydocument\nomefile.tipo”. Se passiamo solamante il nome del file, come nell’esempio sopra, il download viene salvato nella cartella bin del progetto (Visual Studio 2008\Projects\nameproject\nameproject\bin)

2 Commenti a “Download di un file VB.NET”

  1. emagiannu
    13:33 on febbraio 16th, 2010

    e se volessi salvarlo in un’altra directory?

  2. Gregorio
    15:07 on febbraio 16th, 2010

    Basta che modifichi la variabile filename . Esempio :

    Dim filename As String = “C:\Users\alessio\” & patchFile.Substring(patchFile.LastIndexOf(“/”) + 1)

    Se la directory non è fissa puoi usare un FolderBrowserDialog.

    Bye Bye ;)

Lascia un Commento