Protected Sub LinkButton2_Click(sender As Object, e As System.EventArgs) Handles LinkButton2.Click
  Dim buffer_tot As Byte() = File.ReadAllBytes("c:\tmp\buffer.dat")

  Using ms As MemoryStream = l.BufferToMemoryStream(buffer_tot), br As New BinaryReader(ms)
    Dim n As Integer
    Do While ms.Position < buffer_tot.Length
      n += 1
      'leggo il nome dell'immagine
      Dim nome As String = br.ReadString()

      'leggo l'immagine
      Dim L0 As Integer = br.ReadInt32()
      Dim buffer0 As Byte() = br.ReadBytes(L0)
      l.WriteBinaryFile(String.Format("c:\tmp\{0}", nome), buffer0)
    Loop
  End Using

End Sub