VB - Comment lire et écrire un fichier binaire?

Question

Comment lire un tableau d'octets brut de tout fichier ...

Dim bytes() as Byte 

..et puis écrire que tableau d'octets de nouveau dans un nouveau fichier? J'ai besoin de lui comme un tableau d'octets pour faire un peu de traitement entre les deux.

---

J'utilise actuellement:

Pour lire

Dim fInfo As New FileInfo(dataPath) 
Dim numBytes As Long = fInfo.Length 
Dim fsAs New FileStream(dataPath, FileMode.Open, FileAccess.Read) 
Dim br As New BinaryReader(fs) 
Dim bytes As Byte() = br.ReadBytes(CInt(numBytes)) 
br.Close() 
fs.Close() 

Pour écrire

Dim fs As System.IO.FileStream 
fs = New System.IO.FileStream(outpath, System.IO.FileMode.Create) 
fs.Write(bytes, 0, bytes.Length) 
fs.Close() 

Answer 1

Dim data() as Byte = File.ReadAllBytes(path1) 
File.WriteAllBytes(path2, data) 

Answer 2

System.IO.File.ReadAllBytes("myfile.txt") 

Answer 3

Essayez ceci: -

Dim bytes() as Byte 
bytes = File.ReadAllBytes(fileName) 
'' # Do stuff to the array 
File.WriteAllBytes(otherFileName, bytes)