Nwlapcug.com


Come salvare un'immagine in un Database con MS Visual Basic 6

Come salvare un'immagine in un Database con MS Visual Basic 6


Il database salva le immagini in forma binaria, pertanto è possibile visualizzare le immagini su una pagina Web o Windows form. Il linguaggio Visual Basic ha una sintassi di connessione che consente di connettersi al database, specificare che le informazioni sono un'immagine e memorizzarlo in una delle tabelle. L'immagine può essere uno da una pagina Web o si trova sul disco rigido locale. Le immagini sono oggetti di grandi dimensioni, quindi le tabelle hanno bisogno di spazio sufficiente per memorizzare i file binari. Con abbastanza spazio sul disco rigido, è possibile creare un repository di grande immagine per l'applicazione di Visual Basic 6.

Istruzioni

1

Creare un oggetto di flusso di memoria e assegnarlo all'immagine. Il flusso di memoria legge i dati binari dall'immagine e li archivia in memoria. Questi dati binari verrà successivamente trasferiti in una matrice binaria. Il codice seguente crea il flusso di memoria e salva l'immagine:

Dim ms As new MemoryStream)
theImage.Save (ms, theImage.RawFormat)

"theImage" è l'ID dell'immagine che si trova sul vostro form di Visual Basic. Questo elemento di immagine punta a una posizione di un'immagine sul disco rigido.

2

Creare la connessione al database e la query SQL che inserisce l'immagine nel database. La connessione che si crea è dipenda dal server che si utilizza. Il codice seguente imposta la connessione e crea la query "Inserisci":

Dim conn As New SqlConnection(string_connection)
Dim query As String = "insert into Picture_Table (foto) valori (@Picture)"
Dim cmd As New SqlCommand(query, conn)

3

Impostare il parametro di immagine per il comando di query. Il codice seguente imposta un parametro per il codice SQL e allega l'immagine:

Dim ByteArray As Byte = ms. GetBuffer
comando. Parameters.Add(New SqlParameter("@Picture", SqlDbType.Image)). Valore = byteArray

4

Eseguire la query e salvare l'immagine nel database. Tutti i parametri sono impostati, ma l'immagine non è ancora salvato nel database. Il codice riportato di seguito consente di aprire la connessione al database, esegue il codice SQL e salva l'immagine nella tabella di database:

conn. Open)
comando. ExecuteNonQuery)
conn. Close)