' Il seguente script è un esempio di come si può scaricare un file da un server FTP. Può essere utilizzato semplicemente cambiando i percorsi dei files. Dopo che il file è stato scaricato, questo viene anche rielaborato per trasformarlo da file in lunghezza fissa ad un CSV. Si riporta anche questa parte in quanto può essere utile come esempio per eventuali necessità di rielaborazione.
dim FTP as System.Net.WebClient
FTP = new System.Net.WebClient
FTP.Credentials = new System.Net.NetworkCredential ("<utente>","<password>")
Dim fileData As Byte() = FTP.DownloadData("ftp://<url>/<nome file>")
Dim f As System.io.FileStream = System.IO.File.Create("<nome file scaricato>")
f.Write(fileData, 0, fileData.Length)
f.Close()
' Trasforma il file in un CSV
Dim fi As System.IO.StreamReader = New system.IO.StreamReader("<nome file scaricato>")
Dim fo As System.IO.StreamWriter = New system.IO.StreamWriter("<nome file CSV>")
Dim l As String
While Not fi.EndOfStream
l = fi.ReadLine
if not empty( Substr2(l, 25))
l = Substr2(l, 1, 14) + "," + Substr2(l, 15, 1) + "," + Substr2(l, 16, 1) + "," + Substr2(l, 17, 8) + "," + Substr2(l, 25)
fo.WriteLine(l)
end if
End While
fi.Close()
fo.Close()
Deletefile("<nome file scaricato>")