Visualizzazione dei risultati da 1 a 4 su 4
  1. #1
    Utente di HTML.it L'avatar di pietro09
    Registrato dal
    Jan 2002
    Messaggi
    10,116

    [vb.net] salvare in modo binario un documento col suo nome

    Debbo salvare un documento in modo binario, insieme al suo nome.
    L'esempio che ho fatto sembra funzionare perfettamente.
    Scrivo perché il codice mi pare abbastanza contorto e cerco il vostro aiuto per migliorarlo.
    Ho scelto un nome di file strano per tenere conto di caratteri "strani" "°àèéìòù'+- .jpg"

    codice:
    Protected Sub Salva(sender As Object, e As System.EventArgs) Handles Button1.Click
    	'leggo una immagine in modo binario in un buffer di byte()
    	Dim f As String = "C:\dati\ProveNikon\images\°àèéìòù'+- .jpg"
    	Dim nome As String = Path.GetFileName(f)
    	Dim buffer As Byte() = ReadBinaryFile(f)
    
    	Using st As Stream = File.Open("c:\tmp\test", FileMode.Create, FileAccess.Write), bw As New BinaryWriter(st)
    		'scrivo la stringa nome
    		bw.Write(nome)
    
    		'dò uno spazio di 100 bytes perciò porto il puntatore alla posizione 100
    		Dim offset As Integer = 100
    		st.Seek(offset, SeekOrigin.Begin)
    
    		'scrivo l'immagine
    		bw.Write(buffer)
    	End Using
    
    
    End Sub
    
    Protected Sub Leggi(sender As Object, e As System.EventArgs) Handles Button2.Click
    	Using st As Stream = File.Open("c:\tmp\test", FileMode.Open, FileAccess.Read), br As New BinaryReader(st)
    		'leggo il nome dell'immagine
    		Dim nome As String = br.ReadString()
    
    		Dim offset As Integer = 100
    
    		'porto il puntatore alla posizione 100
    		st.Seek(offset, SeekOrigin.Begin)
    
    		'leggo l'immagine
    		Dim buffer As Byte() = br.ReadBytes(CInt(st.Length - offset))
    
    		'salvo l'immagine su disco col suo nome
    		l.WriteBinaryFile("c:\tmp\" & nome, buffer)
    
    		'creo l'immagine dal buffer di byte e la salvo nello stream di risposta
    		l.ImgSaveToResponseOutputStream(l.ImgLoad(buffer))
    	End Using
    End Sub
    Pietro

  2. #2
    Moderatore di Programmazione L'avatar di alka
    Registrato dal
    Oct 2001
    residenza
    Reggio Emilia
    Messaggi
    24,480
    Originariamente inviato da pietro09
    Scrivo perché il codice mi pare abbastanza contorto e cerco il vostro aiuto per migliorarlo.
    Ci sono quattro istruzioni... dov'è che è contorto?
    MARCO BREVEGLIERI
    Software and Web Developer, Teacher and Consultant

    Home | Blog | Delphi Podcast | Twitch | Altro...

  3. #3
    Utente di HTML.it L'avatar di pietro09
    Registrato dal
    Jan 2002
    Messaggi
    10,116
    Originariamente inviato da alka
    Ci sono quattro istruzioni... dov'è che è contorto?
    forse il contorto sono io

    E' che sono anni che non leggo-scrivo file in questo modo e sono abbastanza insicuro.

    Mi servirebbe sapere se si fa così o se ho sbagliato aproccio.

    Ciao
    Pietro

  4. #4
    Moderatore di Programmazione L'avatar di alka
    Registrato dal
    Oct 2001
    residenza
    Reggio Emilia
    Messaggi
    24,480
    Originariamente inviato da pietro09
    Mi servirebbe sapere se si fa così o se ho sbagliato aproccio.
    Le tue domande sono sempre contorte, o di difficile risposta, perché non si capisce mai qual è il problema effettivo.

    Vuoi sapere se c'è un modo migliore, in generale, di leggere e scrivere un file, oppure se c'è un'implementazione diversa di ciò che tu leggi e scrivi nello specifico? O altro?

    Qualsiasi codice si possa scrivere, è sempre migliorabile.

    Bisogna che indichi qual è il tuo dubbio, o in cosa lo trovi contorto o problematico.
    MARCO BREVEGLIERI
    Software and Web Developer, Teacher and Consultant

    Home | Blog | Delphi Podcast | Twitch | Altro...

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2026 vBulletin Solutions, Inc. All rights reserved.