Visualizza messaggi
Codice:
Public Sub GetFile()
Dim hClient As HttpClient
Dim sBuffer As String
hClient = New HttpClient As "hClient"
hClient.URL = "http://zackfairsite.altervista.org/meteopalermoftp.rar"
hClient.Async = False
hClient.Timeout = 60
hClient.Get
'Print "Begin"
If hClient.Status < 0 Then
Print "ERROR"
Else
' Success - read the data
If Lof(hClient) Then sBuffer = Read #hClient, Lof(hClient)
sDownloadBuffer &= sBuffer
End If
Print sDownloadBuffer
'Print "end"
End
però ho notato che se devo leggere per esempio il codice html di una pagina funziona perfettamente. Ma se devo scaricare un file, chiaramente nella funzione non viene indicato alcun percorso e inoltre non c'è la scrittura su disco di quello che ho scaricato. Vorrei capire come posso adattarla a scaricare per esempio un file .iso e scriverlo su un percorso che indico io. Come posso fare ? Vi ringrazio in anticipo
