Lettura e scrittura di files

1. Lettura
Dim Testo as string = System.IO.File.ReadAllText(“c:\filedaleggere.t”)

2. Scrittura
s stringa da scrivere
Using sw As StreamWriter = File.CreateText(“D:\filedascrivere.txt”)
sw.Write(s)
sw.Close()
End Using

2b. Scrittura
Dim objCodi As IO.StreamWriter
objCodi = New IO.StreamWriter(“filedascrivere.txt”)
objCodi.WriteLine(cf)
objCodi.Close()

3. Lettura file csv o simile
Ovvie varianti con file a larghezze definite ecc

Dim strPar As New Microsoft.VisualBasic.FileIO.TextFieldParser(“filedaleggere”, System.Text.Encoding.Default)
With strPar
.TextFieldType = FileIO.FieldType.Delimited
.SetDelimiters(“,”)
End With
arrLeggi = strPar.ReadFields
Do Until strPar.EndOfData
arrLeggi = strPar.ReadFields
[…]
Loop
strPar.Close()

4. Lettura e scrittura binaria

Private br As System.IO.BinaryReader
Private Fs As System.IO.FileStream
Fs = New System.IO.FileStream(nomefile, IO.FileMode.Open, IO.FileAccess.Read)
br = New System.IO.BinaryReader(Fs)
[…] es.
Dim vett(maxByte – 1) As Byte
vett = br.ReadBytes(maxByte)
br.Close()
Fs.Close()

Private bw As System.IO.BinaryWriter
Fs = New System.IO.FileStream(nomefile, IO.FileMode.Create)
bw = New System.IO.BinaryWriter(Fs)
[…] es.
Dim vett(maxByte – 1) As Byte
bw.Write(vett)
bw.Close()
Fs.Close()

Lascia un commento

Il tuo indirizzo email non sarà pubblicato. I campi obbligatori sono contrassegnati *